我想把以下内容一起写到BAT文件内,执行时,再透过 >> 1.vbs 方式重新生成脚本,但出现问题,我把以下内容写到 BAT 中后,运行发现,某些内容没法输出到 1.VBS 内,如何解决???
1.vbs
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colProcesses = objWMIService.ExecQuery("Select * from Win32_Process")
For Each objProcess in colProcesses
If Right(objProcess.Name, 7) = "f1.bat" Then
Wscript.Quit
End If
Next
Set objShell = CreateObject("WScript.Shell")
objShell.Run "%windir%\data\f1.bat"
Wscript.Quit
[ Last edited by bjsh on 2007-7-31 at 10:24 AM ]
1.vbs
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colProcesses = objWMIService.ExecQuery("Select * from Win32_Process")
For Each objProcess in colProcesses
If Right(objProcess.Name, 7) = "f1.bat" Then
Wscript.Quit
End If
Next
Set objShell = CreateObject("WScript.Shell")
objShell.Run "%windir%\data\f1.bat"
Wscript.Quit
[ Last edited by bjsh on 2007-7-31 at 10:24 AM ]
