vb如何调用IE打开一个需要登录的web页面?
解决方案 »
- sstab问题
- VB读取数据库问题
- vb读取文本文件问题
- 菜鸟请问当数据库采用模糊查询的时候,由于有的查到1个记录,有的查到多个记录,那么怎么设计好,谢谢!
- GetResponseHeader如何取得服务器返回的多个[set-cookie]问题!
- 文件复制的问题,高手请进来看看,高分相送!
- 郁闷,散分
- 請問有那個控件可以做出XP一樣的菜單﹖﹖
- 欢迎到www.vbuser.net,小站刚刚上传,希望大家帮忙测试一下
- VB中如何实现菜单分割???
- 我打算做一个工作流配置工具,关于图形交互这一块,我优先考虑选用一个免费的控件,大家给点建议。
- 使用drawtextex绘制文字时,如何设置文字字体属性?
Dim IE
Set IE = CreateObject("internetexplorer.application")
IE.Visible = True
IE.navigate "http://office.9zp.com"
End Sub
On Error GoTo MyErr
Dim i As Integer
Dim URL As String
Set IEForm = New SHDocVw.ShellWindows
For i = 0 To IEForm.Count - 1
URL = IEForm.Item(i).LocationURL
If InStr(1, URL, URLKey) Then
'找到窗口
Set IEWindow = IEForm.Item(i)
GetIEObject = True
Exit Function
End If
Next i
MyErr:
GetIEObject = False
End Function
你是说自动登陆是吗?
Shell "Explorer.exe http://www.csdn.net"
End Sub
另一个是在VB里获取用户名跟密码,实现登录。
这些都是很简单的。
比如说我要登录csdn 社区的"我的问题"这一界面,用户名和口令就请用各位的用户名和口令试试,谢谢!
如lgs35所说~
shell("C:\Program Files\Internet Explorer\IEXPLORE.EXE " + strUrl)
想要的留下邮箱。
谢谢!