zoukankan      html  css  js  c++  java
  • QTP的那些事判断进程是否存在

    代码如下,以判断ie进程是否存在为例:

    on error resume next
    set y=getobject("winmgmts:\\.\root\cimv2")
    set ws=createobject("wscript.shell")
    set x=y.execquery("select * from win32_process where name='iexplore.exe'")
    for each i in x
         msgbox "IE进程存在"
         wscript.quit
    next
    msgbox "IE进程不存在"

    代码如下,以QQ进程是否存在为例:

    on error resume next
    set y=getobject("winmgmts:\\.\root\cimv2")
    set ws=createobject("wscript.shell")
    set x=y.execquery("select * from win32_process where name='qq.exe'") 
    for each i in x
    msgbox "发现qq进程"
    ws.run "123.bat"
    wscript.quit
    next
    msgbox "没有qq进程"
    ws.run "456.bat" 
     
    也可以采用如下额的方式:采用tasklist命令的方式'tasklist^|findstr /i "%DstPro%"'
    Dim objws
    Set objws=WScript.CreateObject("wscript.shell")
    Do
     objws.Run "c:\a.vbs",,True
     WScript.Sleep 3000
     objws.Run "tskill iexplore"
     objws.Run "c:\b.vbs",,True
     WScript.Sleep 3000
     objws.Run "tskill iexplore"
     objws.Run "c:\c.vbs",,True
     WScript.Sleep 3000
     objws.Run "tskill iexplore"
     objws.Run "c:\d.vbs",,True
     WScript.Sleep 3000
     objws.Run "tskill iexplore"
    Loop 

    作者:高级测试开发网
    博客地址:https://seniortesting.club
    本文版权归作者和博客园共有,欢迎转载,但未经作者同意必须保留此段声明,且在文章页面明显位置给出原文连接,否则保留追究法律责任的权利。

  • 相关阅读:
    Python爬虫学习遇到的问题
    爬取网页内容后写入文件报错UnicodeEncodeError: 'gbk' codec can't encode的问题解决方案
    第14.6节 使用Python urllib.request模拟浏览器访问网页的实现代码
    Mina源码阅读笔记(一)-整体解读
    使用异步 I/O 大大提高应用程序的性能
    同步和异步,阻塞和非阻塞
    位运算详解
    php引用传值详解
    PHP获取指定地区的天气
    新闻网站开发-手机端-基于Wordpress
  • 原文地址:https://www.cnblogs.com/seniortestingdev/p/2352435.html
Copyright © 2011-2022 走看看