如何使用ShellExecute打开一个新的IE窗口

Question

使用ShellExecute Me.hwnd, "open", "http://www.sohu.com", "", "", vbNormalFocus 代码后，总是在一个IE中显示，如何能够在一个新的IE中显示，重新打开一个IE。非常感谢

Answer 1

a = ShellExecute(0&, vbNullString, "http://csdn.net", vbNullString, vbNullString, vbNormalFocus)

Answer 2

Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As LongPrivate Sub Command1_Click()
    ShellExecute Me.hwnd, "open", "http://www.baidu.com", "", "", vbNormalFocus
End Sub

Answer 3

刚明白楼主的意思。
如果你用IE打开，IE是单窗口方式的，打开一次就会新开一个窗口的；但如果系统默认的浏览器是傲游什么的多窗口浏览器，当然会在同一个窗口内打开。如果你非要用IE来在新窗口中打开，可以先获取IE的完整路径，然后用类似下面的方式来打开网页：
Shell "C:\Program Files\Internet Explorer\iexplore.exe http://www.baidu.com"