判断 ActiveX.EXE 是否已经在执行中

发布时间：2020-12-16 22:28:23 所属栏目：大数据来源：网络整理

导读：首先需要支持GetObject()，这在 http://topic.csdn.net/u/20080827/13/01b722a7-de68-46b8-a0c6-8d551a194e8f.html 中已经解决了。其次，你的问题看下面就明白了 VB code dim f as object ,bIsFirstCreate as boolean on error resume next set f = getobj

首先需要支持GetObject()，

这在 http://topic.csdn.net/u/20080827/13/01b722a7-de68-46b8-a0c6-8d551a194e8f.html 中已经解决了。

其次，你的问题看下面就明白了

VB code

   
   
    
    dim
    
     f 
    
    as
    
     
    
    object
    
    ,bIsFirstCreate 
    
    as
    
     
    
    boolean
    
     
    
    on
    
     
    
    error
    
     
    
    resume
    
     
    
    next
    
     
    
    set
    
     f 
    
    =
    
     
    
    getobject
    
    (...) 
    
    on
    
     
    
    error
    
     
    
    goto
    
     
    
    0
    
     
    
    if
    
     f 
    
    is
    
     
    
    nothing
    
     
    
    then
    
     
    
    set
    
     f 
    
    =
    
     
    
    createobject
    
    (...) bIsFirstCreate 
    
    =
    
     
    
    True
    
     
    
    end
    
     
    
    if

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!