标题:关闭指定ie的例子
取消只看楼主
心中有剑
Rank: 2
等 级:新手上路
威 望:5
帖 子:611
专家分:0
注 册:2007-5-18
 问题点数:0 回复次数:1 
关闭指定ie的例子
曾经记得有人问过要关掉指定 浏览器的

Private Sub Command1_Click()
    CloseIE
End Sub
'只要应用shdocvw.dll
Private Sub CloseIE(Optional InIETitle As String = "")
    Dim IEList As New ShellWindows
    Dim IEFile As InternetExplorer
    On Error Resume Next
    '遍历当前地浏览器窗口
    For Each IEFile In IEList
        If InStr(IEFile.Document.Title, InIETitle) > 0 Then
            IEFile.Quit
        End If
        If InIETitle = "" Then
            IEFile.Quit
        End If
    Next
End Sub
搜索更多相关主题的帖子: 浏览器 IEFile 例子 Sub InIETitle 
2007-12-03 14:21
心中有剑
Rank: 2
等 级:新手上路
威 望:5
帖 子:611
专家分:0
注 册:2007-5-18
得分:0 
这个 我知道! 是ie, 而且你的这个关闭word也有问题的!

word 一个进程可以打开多个文件,所以关闭word不能用关闭进程的方法!

2007-12-03 17:43



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-190053-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.020772 second(s), 8 queries.
Copyright©2004-2025, BCCN.NET, All Rights Reserved