如何用VB制作BAT文件

VB可通过Open 语句，用Print # 语句将格式化显示的批处理行命令数据写入顺序文件中。

Open 语句物慧，能够对文件输入/输出 (I/O)。

Print # 语句，将格式化显示的数据写入顺序文件中。

Output关键字，如果 pathname 指定的文件不存在，那么，在用

Append、Binary、Output、或 Random

方式打开文件时，可以建立这一铅和文件。

实现代码，在D盘根目录生成一个将D盘根目录下的文件槐蚂盯复制到E盘根目录的BAT批处理文件。

Private Sub Form_Click()

  Open "D:\Copy.bat" For Output As #1

      Print #1, "Copy D:\*.* E:\*.*"

  Close #1

End Sub

你要这样子写

a = Shell(App.Path &"\data\A.bat", vbNormalFocus)

忘记说了，补充一下

还有说明一下，当你用(App.Path 来指定路径的时候，在VB6里按F5运行是凳手哪会找枣码不到此文件的。你要把程序打包成exe后才有效果的，确保 你的薯衫exe文件和Data在一个目录中。！

因为你按F5运行后你的当前应用程序路径是你的VB的安装路径，而不是你的 当前工程文件所保存的路径。。。。。

'窗体上需要一个按钮

Private

Sub

Command1_Click()

Open

"销蚂C:\test.bat"

For

Output

As

#1

Print

#1,

"md

d:\op..\"

Close

#1

End

Sub

这歼悉样,点击按钮就在C盘下建立了一氏斗乎个test.bat的文件了.

---