先编写一个bat文件
@echo off echo 开始...... echo 解压文件 winrar x -o+ ./EnvironmentTools.zip C:\ echo 执行exe文件 start D:\eclipse\eclipse.exe echo 调用vb程序 start ./install_tcl.vbs ping 1.1.1.1 -n 1 -w 12000>NUL echo. & pause #install_tcl.vbs文件 Set objShell = CreateObject("Wscript.Shell") strCommandLine = "C:\eclipse.exe" '启动安装程序 objShell.Run(strCommandLine) set WshShell = CreateObject("WScript.Shell") WScript.Sleep 1000 '延时1秒 WshShell.SendKeys "{ENTER}" WScript.Sleep 1000 WshShell.SendKeys "{ENTER}" WScript.Sleep 1000
原文链接:https://www.f2er.com/vb/258737.html