none
Internet explorer是否正在工作 RRS feed

  • 问题

  •  

    菜鸟求知:

    用 GetObject(, "Excel.Application") 语句可以知道microsoft excel是否正在工作,那用什么语句可以知道internet explorer是否正在工作。谢谢。

    2008年10月30日 3:10

答案

  • 引用Microsoft internet control

     

    Dim SWs As New SHDocVw.ShellWindows
       Dim var As SHDocVw.InternetExplorer
      
       For Each var In SWs
          If InStr(1, var.FullName, "iexplore.exe", vbTextCompare) > 0 Then
                '正在工作
          End If
       Next

     
    2008年10月30日 3:42
    版主