如何打开新窗口访问指定的WebSite?

MonkeyLin 2001-12-16 12:16:37
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)
Const SW_SHOW = 5


'这句只能在没有IE窗口时新开窗口打开"http://www.jinesc.com/bbs/login.asp",否则就用一个已打开的窗口
ShellExecute Me.hwnd, "open", "http://www.jinesc.com/bbs/login.asp", vbNullString, CurDir$, SW_SHOW
...全文
60 2 打赏 收藏 举报
写回复
2 条回复
切换为时间正序
请发表友善的回复…
发表回复
MonkeyLin 2001-12-16
  • 打赏
  • 举报
回复
怎么加?
是不是http://www.jinesc.com/bbs/login.asp target _blank
有哥 2001-12-16
  • 打赏
  • 举报
回复
好象要在网址后加上
target _blank
相关推荐
发帖
VB基础类

7681

社区成员

VB 基础类
社区管理员
  • VB基础类社区
加入社区
帖子事件
创建了帖子
2001-12-16 12:16
社区公告
暂无公告