|
heicai
中级用户
积分 385
发帖 156
注册 2007-1-19
状态 离线
|
『楼 主』:
请教VBS实现对网页自动选择列表框的值
'On Error Resume Next
Set Wshell=WScript.CreateObject("WScript.Shell")
Set ie=WScript.CreateObject("InternetExplorer.Application")ie.navigate "https://edit.yahoo.com/registration?"
While ie.ReadyState<>4
Wscript.Sleep 200
Wend
ie.document.getElementById("mm").Options[2].Selected=true 最后这句是不是有问题？我想向列表框选择值。mm是月份的列表框。我想取第二个值
请各位老师指点一二！
[ Last edited by heicai on 2008-6-22 at 09:08 AM ]
|
|
 2008-6-22 09:07 |
|
|
slore
铂金会员
积分 5212
发帖 2478
注册 2007-2-8
状态 离线
|
 『第
2 楼』:
ie.document.getElementById("mm").value=2
|
S smile 微笑,L love 爱,O optimism 乐观,R relax 放松,E enthusiasm 热情...Slore |
|
|
2008-6-22 10:05 |
|
|
heicai
中级用户
积分 385
发帖 156
注册 2007-1-19
状态 离线
|
|
|
2008-6-22 10:14 |
|
|
heicai
中级用户
积分 385
发帖 156
注册 2007-1-19
状态 离线
|
『第
4 楼』:
#include "IE.au3"
$oIE=_IECreate ("https://edit.yahoo.com/registration?",0,0)
$oForm=_IEFormGetObjByName ($oIE, "regFormBody")
$oQuery = _IEFormElementGetObjByName ($oForm, "tos_agreed")
_IEFormElementCheckboxSelect($oQuery,1, "", 1, "byIndex")
不知道楼上的懂不懂AutoIt？？我想问多选框的勾选。我不知道怎么操作。
[ Last edited by heicai on 2008-6-22 at 10:28 AM ]
|
|
|
2008-6-22 10:19 |
|
|
heicai
中级用户
积分 385
发帖 156
注册 2007-1-19
状态 离线
|
『第
5 楼』:
| Quote: | Originally posted by slore at 2008-6-22 10:05 AM:
ie.document.getElementById("mm").value=2 |
|
ie.document.getElementById("mm").value=2 确实有效，可是同个页面另两个选择框同样方法就取不到值了。这是为什么呢？？
ie.document.getElementById("gender").value=2
ie.document.getElementById("secquestion").value=1
|
|
|
2008-6-22 11:00 |
|
|
slore
铂金会员
积分 5212
发帖 2478
注册 2007-2-8
状态 离线
|
『第
6 楼』:
ie.Document.getElementById("mm").value = 2
ie.Document.getElementById("gender").value = "m"
ie.Document.getElementById("secquestion").value = "What was the name of your first school?"
|
S smile 微笑,L love 爱,O optimism 乐观,R relax 放松,E enthusiasm 热情...Slore |
|
|
2008-6-22 13:35 |
|
|
slore
铂金会员
积分 5212
发帖 2478
注册 2007-2-8
状态 离线
|
『第
7 楼』:
AutoIt
没有用过。。。
|
S smile 微笑,L love 爱,O optimism 乐观,R relax 放松,E enthusiasm 热情...Slore |
|
|
2008-6-22 13:36 |
|
|
heicai
中级用户
积分 385
发帖 156
注册 2007-1-19
状态 离线
|
『第
8 楼』:
| Quote: | Originally posted by slore at 2008-6-22 01:35 PM:
ie.Document.getElementById("mm").value = 2
ie.Document.[ ... |
|
高手能否PM我你的QQ号码！敬佩
|
|
|
2008-6-22 13:51 |
|
|
slore
铂金会员
积分 5212
发帖 2478
注册 2007-2-8
状态 离线
|
『第
9 楼』:
。。。
实在不好提的问题就直接PM我好了……QQ都不怎么上的……
马上回学校，学校限电。。。网都不上的。用处不大。
|
S smile 微笑,L love 爱,O optimism 乐观,R relax 放松,E enthusiasm 热情...Slore |
|
|
2008-6-22 14:15 |
|
|
heicai
中级用户
积分 385
发帖 156
注册 2007-1-19
状态 离线
|
『第
10 楼』:
Set ie=WScript.CreateObject("InternetExplorer.Application")
WScript.CreateObject的返回值赋给 ie，我希望不再次创建页面，能否在已存在页面上也获得这样的返回值？
因为我希望由我手动打开网址，然后进行文本框、列表框的赋值选择
能否实现？？
|
|
|
2008-6-22 14:45 |
|
|
slore
铂金会员
积分 5212
发帖 2478
注册 2007-2-8
状态 离线
|
『第
11 楼』:
Set Wshell = WScript.CreateObject("WScript.Shell")
Set ie = WScript.CreateObject("InternetExplorer.Application")
ie.visible = True
ie.navigate "https://edit.yahoo.com/registration?"
While ie.ReadyState <> 4
Wscript.Sleep 200
Wend
|
S smile 微笑,L love 爱,O optimism 乐观,R relax 放松,E enthusiasm 热情...Slore |
|
|
2008-6-22 14:47 |
|
|
heicai
中级用户
积分 385
发帖 156
注册 2007-1-19
状态 离线
|
『第
12 楼』:
不是要这样。我是想手动打开IE访问到这个注册页面。
然后当我双击VBS时自动填表。
|
|
|
2008-6-22 14:50 |
|
|
slore
铂金会员
积分 5212
发帖 2478
注册 2007-2-8
状态 离线
|
『第
13 楼』:
那样的话只能sendkeys模拟按键。
必须由脚本创建的IE对象才可以那样操作。
|
S smile 微笑,L love 爱,O optimism 乐观,R relax 放松,E enthusiasm 热情...Slore |
|
|
2008-6-22 16:04 |
|
|
heicai
中级用户
积分 385
发帖 156
注册 2007-1-19
状态 离线
|
『第
14 楼』:
| Quote: | Originally posted by slore at 2008-6-22 04:04 PM:
那样的话只能sendkeys模拟按键。
必须由脚本创建的IE对象才可以那样操作。 |
|
sendkeys不是我所要的结果。
因为那样貌似不能选择列表框勾选多选框了。
而且发送过程中我点到什么就会发错位置了吧
是吗？
|
|
|
2008-6-22 16:12 |
|
