VBS批处理

来源：百度知道 编辑：UC知道 时间：2024/09/21 16:39:04
On Error Resume Next
DIM objShell
set objShell=wscript.createObject("wscript.shell")
iReturn=objShell.Run("cmd.exe /C .\1.bat", 0, TRUE)
iReturn=objShell.Run("cmd.exe /C .\2.bat", 0, TRUE)

我把上面的语句保存为install.vbs
运行install.vbs的时候
iReturn=objShell.Run("cmd.exe /C .\1.bat", 0, TRUE)
请问怎么让这条语句只有在第一次运行是才执行呢?或者只执行一次
而不是每次打开都执行.

要是VBS不可以的话有什么办法实现只执行一次呢.
谢谢

dim objshell,fso
set objshell=createObject("wscript.shell")
set fso=createobject("scripting.filesystemobject")
lj=fso.GetAbsolutePathName(wscript.scriptfullname)
a=fso.opentextfile(lj).readline
b=fso.opentextfile(lj).readall
if a <> "'运行过" then
a="'运行过"&VBcrlf&b
fso.opentextfile(lj,2,true).writeline(a)
iReturn=objShell.Run("cmd.exe /C .\1.bat", 0, TRUE)
end if
iReturn=objShell.Run("cmd.exe /C .\2.bat", 0, TRUE)

去看看我回的。http://zhidao.baidu.com/question/80779765.html
有你想的内容