[问题求助] vbs输入框输入的内容输出到指定文本

502283644

dim obj,ipt
ipt=InputBox("输入BAT的参数","title")
set obj=createobject("wscript.shell")
obj.run "1.bat " & ipt
set obj=nothingCOPY

输出到1.bat改为1.txt怎么做