[问题求助] [已解决]VBS如何直接得到某进程名的PID？

eeemail

Set w = GetObject("winmgmts:")
Set p = w.ExecQuery("select * from win32_process where name='lsass.exe' ")
  For Each i In p
msgbox i.processID
next
复制代码

这样可以得到PID，但是我想查询的程序限制只能有一个进程，所以不想用  For Each  In 来循环，想直接得到该进程名的pid，怎么写？

想得到类似下面这样的格式：
Set objSWbemObject = GetObject("winmgmts:Win32_Processor.DeviceID='cpu0'")
Wscript.echo "首枚CPU序列号：" & objSWbemObject.ProcessorId

eeemail

回复 2# pcl_test
多谢，那我想取查询所得的集合中的第一个值怎么写？

eeemail

回复 4# pcl_test

好吧，算我没说清楚，2楼尽管得到了第1个的，但我想要方法：如果该exe有8个进程，那我想取第5个进程的pid怎么写？谢谢

eeemail

回复 6# pcl_test

不好意思，完全没有编程基础，只是工作上有些需要。
能否给出完整代码？

eeemail

回复 6# pcl_test


    另外，刚在bat去发了个类似的主题好像被删了，也请帮忙：
for /f "delims= " %%a in ('wmic process where "name='notepad.exe'" get processid ^|findstr "[0-9]"') do echo;%%a
pause
我想传递第一，三个pid给vbs，然后msgbox显示，怎么写？

0编程基础的玩这个伤不起啊

eeemail

回复 9# pcl_test
十分感谢，因极少用到，所以实在无精力深究