问题描述：
在VBS里调用组件然后打开指定网页，然后自动填写表单。这个我会。
现在的问题是怎样用VBS向一个已经用IE打开的页面自动填值呢？
比如我用IE打开一个页面，现在我想调用VBS脚本自动向该页面赋值，请问这样得VBS脚本怎样写，感谢各路大侠解囊相助~！
谁最先给出答案，分就是谁的。
.
问题解答：
8.解决了开启CrossFire功能后运行HQV benchmark DVD，会出现硬件加速被关闭的问题。注意：这是集成催化剂控制中心(英文版本)的驱动，需要先安装微软Microsoft.NET Framework组件
'下面代码针对已打开的IE网址进行页面填表操作。
Dim oShellApp, oShellAppWindows, WebBrowser
Set oShellApp = CreateObject("Shell.Application")
Set oShellAppWindows = oShellApp.Windows
For Each WebBrowser In oShellAppWindows
If LCase(TypeName(WebBrowser.document)) = "htmldocument" Then
'请把下面这行修改为实际网址
If WebBrowser.LocationURL = "http://www.ln.chinaunicom.com/index.shtml" Then
'下面开始自动填写表单，请根据实际进行修改：:
WebBrowser.document.frames(0).document.loginonform.UserId.Value = "" '
WebBrowser.document.frames(0).document.loginonform.passwd.Value = "" '
WebBrowser.document.frames(0).document.loginonform.verifycode.Value = "" '
WebBrowser.document.frames(0).document.loginonform.submit
End If
End If
Next
Sub test()
Dim ie
Set ie = CreateObject("internetexplorer.application")
ie.Visible = True
ie.navigate "http://www.ln.chinaunicom.com/index.shtml"
While ie.busy Or ie.readystate <> 4
Wend
ie.document.frames(0).document.loginonform.UserId.Value = "" '
ie.document.frames(0).document.loginonform.passwd.Value = "" '
ie.document.frames(0).document.loginonform.verifycode.Value = "" '
ie.document.frames(0).document.loginonform.submit
End Sub
举例说明~~~~~~
我的不明白
ATI冶天Radeon 9500/9550/9600/9700/9800/X300/X600/X700/X800/X850/X1300/X1600/X1800/X1900/X1950系列显卡最新催化剂驱动6.12官方正式完整(控制中心)版For WinXP/XP-MCE（2006年12月14日发布）由于ATi发布的每款催化剂驱动都会给Radeon系列显卡带来在功能、性能、兼容性等各方面的提升，所以现在的每月一版催化剂驱动都是广大A卡用户所翘首以待的一件大事，甚至已经成为每月一道不可获缺的驱动大餐。依照ATi的惯例，6.12版催化剂驱动在今天准时发布，下面来看看新版驱动的具体更新内容，在新特性方面：支持开启CrossFire功能后进行DirectX视频加速。在修正BUG方面：1.修正了在Windows XP下运行《黑与白II》时选择最低图形设置时的低帧速问题。2.修正了运行《无冬之夜》时，当开启super AA和CrossFire后，会导致游戏主菜单显示不正确的问题。3.催化剂控制中心的“Centered Timings”部分完全简体中文汉化。4.解决了使用PowerDVD软件播放DVD影片时会出现画面一顿一顿的情况。5.当使用Avivo视频转换程序转换一个VCD编码的文件时，其容量大小不会超过300MB。6.解决在LCD/CRT+LCD模式之间切换容易出现的热键冲突问题等。7.修正了在开启CrossFire功能后运行Windows XP游戏《保龄球》和《智慧迷宫》，会导致游戏主菜单显示不正确的问题。8.解决了开启CrossFire功能后运行HQV benchmark DVD，会出现硬件加速被关闭的问题。注意：这是集成催化剂控制中心(英文版本)的驱动，需要先安装微软Microsoft.NET Framework组件
上海旅游网