如何使用VB6.0 Shell函数转跳网站
如何使用VB6.0 Shell函数转跳网站 0分 我想变一个程序
程序里有一个文本框(1)和一个按钮(A)
我想变一个删除帖子程序
程序思路如下:
1.在文本框中输入帖子的编码(比如12345)
2然后点击按钮,就打开地址为http://hi.后面加上帖子编码的网址 (如http://hi.).
3.程序在打开那个网站自动在地址栏中输入javascript:__doPostBack('lbDel_1','')并转到,意思就是在当前页面转跳。
我设计的按钮的源码是:
Private Sub A_Click(Index As Integer)
Shell "explorer.exe http://hi. & "1.Text", vbNormalFocus
Shell "explorer.exe javascript:__doPostBack('lbDel_1','')"
End Sub
但是程序会出错说找不到路径。
请高手帮忙指点一下,将您设计的源码发过来。