请问，怎样自动用VBS填写页面表单？

[balababy]

在VBS里调用组件然后打开指定网页，然后自动填写表单。这个我会。

现在的问题是怎样用VBS向一个已经用IE打开的页面自动填值呢？
比如我用IE打开一个页面，现在我想调用VBS脚本自动向该页面赋值，请问这样得VBS脚本怎样写，感谢各路大侠解囊相助~！

[-晴天]

自动填?ajax定时调用?

[zjsfdxbao]

-_-这个好象不属于WEB开发了吧...
VBScript实现这个比较困难(至少偶米想到...)
这得有ACTIVEX支持才可以,把API功能包含在ACTIVEX里,VBS里调用

[bugger_money]

这个没有考虑过,但是我想是可以通过的,可能需要更为复杂的程序来支撑.

[Microogle]

没办法就用sendkeys吧，也可以写个小点的EXE，然后用VBS保存起来，每次生成并调用(脑壳有毛病啊)。
或者用IE中添加菜单的方法来实现。

[wangkk125]

用ajax

[lyserver]

这个问题的难点在于IE的事件好像不是基于连接点的，因此无法在VBS里使用GetRef截获网页完成事件（具体还没测试），所以我用了一个延时，其它的则可以基于DOM访问页面元素了，俺根据www.googel.cn网页写了一段示例代码，实现了自动填写页面表单搜索项目和提交表单的功能，其它的网页，你可以按此思路分析后进行。
Dim IE,oInput,oButton,oDocument
Set IE = CreateObject("InternetExplorer.Application")
IE.Visible = True
IE.Navigate "http://www.google.cn"
wscript.sleep 1000 '延时1秒以等待网页打开完毕
Set Doc = IE.Document
Set oInput = Doc.getElementsByName("q")(0)
oInput.Value = "中国人" '填写表单
Call Doc.All.btnG.click() '提交表单

[qqlpp]

mark

[wap21]

mark

[lyserver]

看错问题了，建议LZ使用VB而不是VBS进行处理，因为在VB里可以实现对所有IE窗口的控制（通过ShellWindows），接下来思路就跟上面的一样了。
揭贴率：0%，太低了。