中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --

联盟域名:www.cn-dos.net 论坛域名:www.cn-dos.net/forum
DOS,代表着自由开放与发展,我们努力起来,学习FreeDOS和Linux的自由开放与GNU精神,共同创造和发展美好的自由与GNU GPL世界吧!

中国DOS联盟论坛
现在时间是 2026-08-09 01:01
中国DOS联盟论坛 » DOS批处理 & 脚本技术(批处理室) » 请教VBS实现对网页自动选择列表框的值 查看 1,207 回复 13
楼 主 请教VBS实现对网页自动选择列表框的值 发表于 2008-06-22 09:07 ·  中国 浙江 宁波 电信
中级用户
★★
积分 385
发帖 156
注册 2007-01-19 02:32
19年会员
UID 76955
性别 男
状态 离线
'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.Selected=true



最后这句是不是有问题?我想向列表框选择值。mm是月份的列表框。我想取第二个值
请各位老师指点一二!

[ Last edited by heicai on 2008-6-22 at 09:08 AM ]
2 发表于 2008-06-22 10:05 ·  中国 陕西 西安 电信
铂金会员
★★★★
积分 5,212
发帖 2,478
注册 2007-02-08 23:39
19年会员
UID 79003
性别 男
状态 离线
ie.document.getElementById("mm").value=2
本帖最近评分记录 (共 1 条) 点击查看详情
评分人分数时间
heicai +4 2008-06-22 10:14
S smile 微笑,L love 爱,O optimism 乐观,R relax 放松,E enthusiasm 热情...Slore
3 发表于 2008-06-22 10:14 ·  中国 浙江 宁波 电信
中级用户
★★
积分 385
发帖 156
注册 2007-01-19 02:32
19年会员
UID 76955
性别 男
状态 离线
感激不尽。谢谢楼上的
4 发表于 2008-06-22 10:19 ·  中国 浙江 宁波 电信
中级用户
★★
积分 385
发帖 156
注册 2007-01-19 02:32
19年会员
UID 76955
性别 男
状态 离线
#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 ]
5 发表于 2008-06-22 11:00 ·  中国 浙江 宁波 电信
中级用户
★★
积分 385
发帖 156
注册 2007-01-19 02:32
19年会员
UID 76955
性别 男
状态 离线
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
6 发表于 2008-06-22 13:35 ·  中国 陕西 西安 电信
铂金会员
★★★★
积分 5,212
发帖 2,478
注册 2007-02-08 23:39
19年会员
UID 79003
性别 男
状态 离线
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
7 发表于 2008-06-22 13:36 ·  中国 陕西 西安 电信
铂金会员
★★★★
积分 5,212
发帖 2,478
注册 2007-02-08 23:39
19年会员
UID 79003
性别 男
状态 离线
AutoIt
没有用过。。。
S smile 微笑,L love 爱,O optimism 乐观,R relax 放松,E enthusiasm 热情...Slore
8 发表于 2008-06-22 13:51 ·  中国 浙江 宁波 电信
中级用户
★★
积分 385
发帖 156
注册 2007-01-19 02:32
19年会员
UID 76955
性别 男
状态 离线
Originally posted by slore at 2008-6-22 01:35 PM:
ie.Document.getElementById("mm").value = 2
ie.Document.
高手能否PM我你的QQ号码!敬佩
9 发表于 2008-06-22 14:15 ·  中国 陕西 西安 电信
铂金会员
★★★★
积分 5,212
发帖 2,478
注册 2007-02-08 23:39
19年会员
UID 79003
性别 男
状态 离线
。。。

实在不好提的问题就直接PM我好了……QQ都不怎么上的……
马上回学校,学校限电。。。网都不上的。用处不大。
S smile 微笑,L love 爱,O optimism 乐观,R relax 放松,E enthusiasm 热情...Slore
10 发表于 2008-06-22 14:45 ·  中国 浙江 宁波 电信
中级用户
★★
积分 385
发帖 156
注册 2007-01-19 02:32
19年会员
UID 76955
性别 男
状态 离线
Set ie=WScript.CreateObject("InternetExplorer.Application")

WScript.CreateObject的返回值赋给 ie,我希望不再次创建页面,能否在已存在页面上也获得这样的返回值?
因为我希望由我手动打开网址,然后进行文本框、列表框的赋值选择
能否实现??
11 发表于 2008-06-22 14:47 ·  中国 陕西 西安 电信
铂金会员
★★★★
积分 5,212
发帖 2,478
注册 2007-02-08 23:39
19年会员
UID 79003
性别 男
状态 离线
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
12 发表于 2008-06-22 14:50 ·  中国 浙江 宁波 电信
中级用户
★★
积分 385
发帖 156
注册 2007-01-19 02:32
19年会员
UID 76955
性别 男
状态 离线
不是要这样。我是想手动打开IE访问到这个注册页面。
然后当我双击VBS时自动填表。
13 发表于 2008-06-22 16:04 ·  中国 陕西 西安 电信
铂金会员
★★★★
积分 5,212
发帖 2,478
注册 2007-02-08 23:39
19年会员
UID 79003
性别 男
状态 离线
那样的话只能sendkeys模拟按键。

必须由脚本创建的IE对象才可以那样操作。
S smile 微笑,L love 爱,O optimism 乐观,R relax 放松,E enthusiasm 热情...Slore
14 发表于 2008-06-22 16:12 ·  中国 浙江 宁波 电信
中级用户
★★
积分 385
发帖 156
注册 2007-01-19 02:32
19年会员
UID 76955
性别 男
状态 离线
Originally posted by slore at 2008-6-22 04:04 PM:
那样的话只能sendkeys模拟按键。

必须由脚本创建的IE对象才可以那样操作。

sendkeys不是我所要的结果。

因为那样貌似不能选择列表框勾选多选框了。
而且发送过程中我点到什么就会发错位置了吧
是吗?
论坛跳转: