如何调用IE菜单中的internet选项

2004-8-23　作者：online　转载自：CSDN　网友评论 0 条　点击进入论坛

 　　以下是一段如何调用IE菜单中的“工具”->Internet选项的代码：

　　Option Explicit

　　Private Declare Function LaunchInternetControlPanel Lib "inetcpl.cpl" (ByVal hwndParent As Long) As Long

　　Private Declare Function LaunchConnectionDialog Lib "inetcpl.cpl" (ByVal hwndParent As Long) As Long

　　''调用ie-工具-internet选项对话框

　　Private Sub Command1_Click()

　　Dim rc As Long

　　rc = LaunchInternetControlPanel(Me.hWnd)

　　If rc = 0 Then

　　MsgBox "LaunchInternetControlPanel failed!", vbExclamation

　　End If

　　End Sub

　　''调用ie-工具-internet选项对话框中的连接

　　Private Sub Command2_Click()

　　Dim rc As Long

　　rc = LaunchConnectionDialog(Me.hWnd)

　　If rc = 0 Then

　　MsgBox "LaunchConnectionDialog failed!", vbExclamation

　　End If

　　End Sub

　　''shell方式调用ie-工具-internet选项对话框

　　Private Sub Command3_Click()

　　Shell "C:\windows\control.exe Inetcpl.cpl ", vbNormalFocus

　　End Sub

今日推荐

• ·2008年十大IT技术
• ·中间件标准将推动我国数字电视市场发展
• ·解决生产企业的订单管理问题[图]
• ·大型格式化打印技术
• ·高质量显示技术

• ·开源历史回顾 Linux操作系统的发展与文化
• ·新手学堂：安装Linux应该了解的六个问题
• ·给初学者的建议 谈一谈怎样走入Linux大门
• ·Linux与其他操作系统区别
• ·重复数据删除技术在数据保护过程中的应用

重点推荐

领军企业技术文库

最新专题

电子杂志订阅

技术热点