Dim service,Process其中Process.Name在日文版Windows是小寫的"iexplore.exe",在中文版是大寫的"IEXPLORE.EXE"。所以要寫一個script能在日文和中文Windows下run,就要加上 UCase,把Process.Name改成大寫。
Set service = GetObject("winmgmts:")
For Each Process In service.InstancesOf("Win32_Process")
If UCase(Process.Name) = "IEXPLORE.EXE" Then
Wscript.Echo Process.processID
End If
Next
好奇怪,語系不同,ProcessName就不同。
沒有留言:
張貼留言