您的位置：程序门 -> vb -> api



已经exe的名称，如何判断一个exe文件是否已经执行完成？


[收藏此页] [打印本页]选择字色：背景色：字体：[大][中][小]


已经exe的名称，如何判断一个exe文件是否已经执行完成？
发表于：2007-11-29 22:43:42 楼主
如题，   有什么好的办法吗？


发表于：2007-11-30 08:48:051楼 得分:0
可能要用api对进程实行监控，具体操作也没做过，你到网上搜搜看，应该有的
发表于：2007-11-30 09:01:042楼 得分:0
完成的定义是什么？
发表于：2007-11-30 09:14:293楼 得分:0
查看进程的state是否为闲置状态
可以通过查看kprocess结构
发表于：2007-11-30 09:35:274楼 得分:0
能否告知具体的解决方案，先谢谢了！
发表于：2007-11-30 09:59:175楼 得分:0
你是要知道他是否在运行
还是他是否被（其他进程)打开
还是他运行中处于空闲状态啊

有相关api的不难啊
发表于：2007-12-03 16:26:526楼 得分:0
我怎么觉得这个代码我贴过。。搞不明白大家为什么都想知道人家的程序运行完没有。这个代码是老掉牙的了，可能老网站都关了？
'等待需要api
private   const   infinite   =   -1&
private   const   synchronize   =   &h100000
private   declare   function   openprocess   lib   "kernel32"   （byval   dwdesiredaccess   as   long,   byval   binherithandle   as   long,   byval   dwprocessid   as   long)   as   long
private   declare   function   closehandle   lib   "kernel32"   （byval   hobject   as   long)   as   long
private   declare   function   waitforsingleobject   lib   "kernel32"   （byval   hhandle   as   long,   byval   dwmilliseconds   as   long)   as   long
'获取时间差需要api
private   declare   function   gettickcount   lib   "kernel32"   （)   as   long

private   sub   form_click（)
'shell   "explorer   http://www.dyjmgm.com/110/vote.asp",   vbnormalfocus
        msgbox   "所调用程序已经结束,该程序一共运行了:"   &   mwait（shell（"notepad",   vbnormalfocus))   &   "毫秒"   '   shell   函数返回值为   process   id   ,这里运行了记事本,当关闭记事本以后,就会弹出对话框
end   sub

'自定义等待函数,传入shell返回值就可以了,返回值为经过的时间
public   function   mwait（byval   mpid   as   long)   as   long
        dim   mtime   as   long
        mtime   =   gettickcount
        dim   phnd   as   long   '   process   handle
        phnd   =   openprocess（synchronize,   0,   mpid)   '   取得   process   handle
        if   phnd   <>   0   then
        call   waitforsingleobject（phnd,   infinite)   '   无限等待，直到程序结束
        call   closehandle（phnd)   '释放句柄资源
        end   if
        mwait   =   gettickcount   -   mtime
end   function

关键在于mwait函数，传入一个pid，既然你知道程序名，那么即使程序不是你打开的，也可以用这个函数，你先枚举进程列表，获取pid，传进去就可以了。
测试时点击一下窗体，然后关闭记事本即可看到效果。
发表于：2007-12-04 19:14:197楼 得分:0
      执行完成   可不代表关闭啊  
发表于：2007-12-06 21:07:098楼 得分:0
呵呵。执行完成，指部分代码完成还是全部完成呢。这个。。。。。问问楼主到底怎么描述才叫确切
发表于：2007-12-06 21:18:199楼 得分:0
那个exe如果是你的程序运行的
可以用waitforsingleobject这个api来得知它执行完成
发表于：2007-12-06 22:02:4010楼 得分:0
查看进程的state是否为闲置状态  
可以通过查看kprocess结构

不是说过了吗

相关文章
其他资讯

快速检索
分类导航标签a

最新资讯
热门点击