2013-02-17 70 views
0

批次更改vbs代碼,使vbs無法讀取以供其使用。我該如何解決?批次更改vbs代碼,使vbs無法讀取使用

批號:

echo Const HIGH = 128 >> prio.vbs 
echo strComputer = "." >> prio.vbs 
echo Set objWMIService = GetObject("winmgmts:" _ >> prio.vbs 
echo & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2") >> prio.vbs 
echo Set colProcesses = objWMIService.ExecQuery _ >> prio.vbs 
echo ("Select * from Win32_Process Where Name = 'file.exe'") >> prio.vbs 
echo For Each objProcess in colProcesses >> prio.vbs 
echo objProcess.SetPriority(HIGH) >> prio.vbs 
echo Next >> prio.vbs 

VBS原單:

Const HIGH = 128 
strComputer = "." 
Set objWMIService = GetObject("winmgmts:" _ 
    & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2") 
Set colProcesses = objWMIService.ExecQuery _ 
    ("Select * from Win32_Process Where Name = 'file.exe'") 
For Each objProcess in colProcesses 
    objProcess.SetPriority(HIGH) 
Next 

VBS後:

Const HIGH = 128 
strComputer = "." 
Set objWMIService = GetObject("winmgmts:" _ 
Set colProcesses = objWMIService.ExecQuery _ 
    ("Select * from Win32_Process Where Name = 'file.exe'") 
For Each objProcess in colProcesses 
    objProcess.SetPriority(HIGH) 
Next 

幫助,請

回答

2

&字符在特殊的意義(命令鏈接),因此您必須將它們轉義以獲取字面符號:

echo ^& "{impersonationLevel=impersonate}!\\" ^& strComputer ^& "\root\cimv2") >> prio.vbs