VBS列出进程名

最新推荐文章于 2024-02-22 17:01:50 发布
原创 最新推荐文章于 2024-02-22 17:01:50 发布 · 1.5k 阅读 · 1 ·
CC 4.0 BY-SA版权
版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。
文章标签：

#each

本文介绍了一段使用 VBS 脚本批量获取系统中运行的所有进程名称及其ID，并将这些信息写入到一个名为 abc.txt 的文件中的方法。此脚本利用了 WMI (Windows Management Instrumentation) 和 FSO (File System Object) 对象来实现。

set ws=createobject("wscript.shell")
set fso=createobject("scripting.filesystemobject")
set f1=fso.opentextfile ("abc.txt",2,1)
for each ps in getobject("winmgmts:").instancesof("win32_process")
f1.writeline("进程名"&ps.name&"    "&"进程id"&ps.processid)
next

vbs枚举进程 vbs列出进程的详细列表
09-01
主要介绍了vbs枚举进程 vbs列出进程的详细列表,需要的朋友可以参考下
进程列表信息.vbs
cunzhangxp的专栏
09-18 1348
strComputer = InputBox("请输入计算机名或者IP地址", "输入")file = "d:/TaskInfo_" & strComputer & ".txt"   保存信息的文件名Set objWMIService = GetObject("winmgmts:" _    & "{impersonationLevel=impersonate}!//" & strCom
vbs 通过 WMI 得到进程列表及其它相关信息
qffhq 点积
01-30 1442
    Dim WMI As Object, pp, p As Object    Dim i As Integer    得到管理对象     Set WMI = GetObject("winmgmts://./root/cimv2")    查询进程    Set p = WMI.ExecQuery("select * from Win32_Process ")    保存结果 
通过VBS访问WMI，获取当前所有进程信息
软件自动化测试专栏
08-24 4354
<br />获取本机当前所有进程信息：<br /> <br /> <br />strComputer ="." Set objWMIService = GetObject("winmgmts://" & strComputer & "/root/cimv2") Set colProcess = objWMIService.ExecQuery("Select * from Win32_PerfFormattedData_PerfProc_Process",,48) For Each objItem
VBS启动Process
wqw195at
01-20 147
VBS启动Process 2010年06月09日 　　Run 方法返回一个整数。Run 方法启动在新 Windows 进程中运行的程序。可以让脚本等到程序执行完后再继续执行。这允许您同步运行脚本和程序。strCommand 参数内的环境变量自动扩展。如果某个文件类型已正确注册到某个程序中，则对该类型的文件调用 Run 方法时将执行该程序。例如，如果您的计算机系统中装有 Word，则对 *...
VBS 获取当前进程 ID
weixin_30505485的博客
11-29 820
Function CurrProcessId Dim oShell, sCmd, oWMI, oChldPrcs, oCols, lOut lOut = 0 Set oShell = CreateObject("WScript.Shell") Set oWMI = GetObject(_ "winmgmts:{impersona...
查杀进程 VBS
灵台方寸山斜月三星洞
08-28 1354
今天一位狐朋狗友说他老婆玩游戏入迷了，想让她的游戏运行不了。 VBS短小精干用来干这种卑劣的事，最合适不过：（注释已经很详细了，就不多说了） On Error Resume Next '-----------------初始化，可以自定义的数据后都有说明，要重
vbsprocess
dugu666的专栏
11-30 329
Set LoginProfiles = GetObject("winmgmts:").InstancesOf ("Win32_NetworkLoginProfile")   for each Profile in LoginProfiles       WScript.Echo Profile.Name      WScript.Echo Profile.LastLogon   next Dim
显示所有进程vbs脚本
08-03
显示所有进程vbs脚本，用来观看系统运行了那些程序。
VBS命令-进程操作代码(检测进程, 结束进程)
热门推荐
我是guyue，guyue就是我O(∩_∩)O
06-27 1万+
//检测进程 进程名 = "qq.exe" 返回值 = IsProcess(进程名) If 返回值 = True Then     MessageBox "发现进程" ElseIf 返回值 = False Then     MessageBox "没有发现进程" End If //检测进程 优化后的代码 If IsProcess("qq
使用wincc vbs脚本查找进程及如何运行进程
weixin_30664539的博客
07-16 1314
使用vbs代码查看某个进程是否在运行，本文要检查的进程名为 QRscan.exe，其代码如下： sub CheckProcess Dim WMI,Objs,Process,ObjSet WMI=GetObject("WinMgmts:")Set Objs=WMI.InstancesOf("Win32_Process")Process="" '遍历所有在运行的进程For Each ...
杀死指定进程名称的小VBS
weixin_34281477的博客
11-07 210
以下是一小段杀死指定进程名字的小vbs，希望对大家有帮助。 Function KillProc(strProcName) On Error Resume Next Set objWMIService = GetObject("winmgmts:{impersonationLevel=impersonate}!\\.\root\cimv2") ...
VBS妙用，进程控制 转自网络
weixin_30776545的博客
07-15 276
VBS妙用，进程控制 转自网络 VBS（Visual Basic Script）作为一种简单而强大的脚本语言，在现代Windows操作系统中日益发挥重要的作用。我记得在读大学的时候，著名的Melissa（梅丽莎）和“I love you”病毒就是由VBS编写的，恶作剧般的“万花谷”网页病毒也包含了大量的VBS代码。它像一把双刃剑，既是我们日常操...
<WndObj001>Wscript.Shell详解
weixin_30709809的博客
04-01 1383
声明：本人新学按精，对于程序中经常出现的Obj=Creatobject("wscript.shell")有各种疑问，而本论坛并无关于该object的详细介绍。故baidu之。在此对资料的各位原作者表示感谢。以下是自己搜索过程中得到的一些信息与理解，也想让诸位看看我得到的信息正确与否。故发帖共享。如果有哪里出现错误，请各位不吝指正。Wscript.shellWscript.shell是Wshshe...
VBS简介、实例（一）—— 整蛊小病毒
最新发布
Tang961216的博客
02-22 4899
VBS的简介、实例
如何结束vbs死循环进程
yangyi91171的专栏
07-16 8887
新建VBS文件输入如下代码，dim WSHshellset WSHshell = wscript.createobject("wscript.shell") WSHshell.run "taskkill /im wscript.exe /f ",0 ,true 运行，即可
VBScript 监控并结束指定进程的代码
转角遇到她的专栏
09-02 2677
需要监控一些进程，防止一些进程的开启，发现指定进程运行就关闭它。 代码（monprocess.vbs）： On Error Resume Next strComputer = "." arrTargetProcs = Array("calc.exe", "notepad.exe", "other.exe") '数组里为要监视的进程名 Set SINK = WScript.CreateObjec
VBS脚本实现Windows进程后台管理与控制
比如，可以通过cmd命令来列出当前的进程、杀死进程等。VBS脚本与cmd命令的结合，使普通用户也能进行复杂的系统管理操作。 在标签“VBS 进程 剪贴板 后台 挂机”中，我们可以了解到，这个软件可能还涉及到了一些自动...
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值