QTP之关闭进程函数
上一篇 /
下一篇 2013-07-12 15:13:04
/ 个人分类:QTP自动化测试
'============================================================================
' 函数名称:CloseProcess
'
操作系统: win7
' 脚本作者: xxx
' 编写日期: 2013-7-10
'
测试功能:关闭指定的进程
'============================================================================
Sub CloseProcess(sProcessName)
For each Process in GetObject("winmgmts:{impersonationLevel=impersonate}").InstancesOf("Win32_process") '利用wmi遍历所有进程
If Process.Name = sProcessName Then '判断进程名称
Process.terminate '关闭指定进程
End If
Next
End Sub
收藏
举报
TAG: