主题：[求助]关于批处理文件的生成问题

1、直接 shell("d:\test.bat")
 
或者 http://www.foxtable.com/webhelp/scr/0353.htm
 
2、
 
Dim P As New Process
P.StartInfo.FileName = "cmd.exe"
P.StartInfo.UseShellExecute = False
P.StartInfo.RedirectStandardInput = True
P.StartInfo.RedirectStandardOutput = True
P.StartInfo.CreateNoWindow = True
P.Start()
P.StandardInput.WriteLine("ping 127.0.0.1") ' 向cmd.exe输入command
P.StandardInput.WriteLine("exit")
Dim S As String = P.StandardOutput.ReadToEnd() ' 得到cmd.exe的输出
output.show(S)  

3、如果是要生成bat，参考 http://www.foxtable.com/webhelp/scr/0345.htm