按键精灵下拉框选择，下拉框怎么弄

来源：蜘蛛抓取(WebSpider) 时间：2018-06-15 09:06 标签： 按键精灵读取下拉框
按键精灵列表下拉框的变量怎么做 _ 综合讨论 - 按键精灵论坛
软件版本：2014.05软件大小：21.6M更新时间：07-04
软件版本：3.3.0软件大小：62.5M更新时间：5-24
软件版本：1.3.3软件大小：29.2M更新时间：06-14
软件版本：1.1.0软件大小：12.3M更新时间：12-29
查看: 5963|回复: 4
sdfsdfqwe3
我做了一个脚本
想用下拉框子来做选项
选项里分别有
两个选项但是我看教程里的例子是输入键盘的某个键做的小弟领悟不出来 该怎么做
请问如何让关机和停止脚本这两个动作插入到下拉框中
闽网文 (-037号小白求指教 按键精灵下拉框_按键精灵吧_百度贴吧
&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&签到排名：今日本吧第个签到，本吧因你更精彩，明天继续来努力！
本吧签到人数：0成为超级会员，使用一键签到本月漏签0次！成为超级会员，赠送8张补签卡连续签到：天&&累计签到：天超级会员单次开通12个月以上，赠送连续签到卡3张
关注：403,445贴子：
小白求指教 按键精灵下拉框收藏
按键精灵下拉框选择的时候才会显示相对应的多选框，没有选择就全部是隐藏的看不到多选框
全自动挂机app引流脚本工作室,别人主动来加你好友,新一代微商软件,精准男粉女粉流量,多款微商app引流脚本软件工作室,可任意定位加附近的人
控件.可见=0/10是隐藏，1是可见
Event Form1.Load
Form1.Container1.Visible = 0 / 1End Event
我明天给你个例子
登录百度帐号拒绝访问 | www.ggdoc.com | 百度云加速
请打开cookies.
此网站 (www.ggdoc.com) 的管理员禁止了您的访问。原因是您的访问包含了非浏览器特征(42b3fdfc4e7b43c5-ua98).
重新安装浏览器，或使用别的浏览器查看: 12632|回复: 32
如何用vba实现选取网页下拉菜单中选项
阅读权限10
在线时间 小时
比如我要选取这个版面最下方“选择主题分类”内随便哪项，如何实现
感觉和这个贴内的选取不一样，
前面打开网页部分都没有问题，就是不知道如何选取。
Sub Openwebpage()
Dim ie As Object
Dim doc As Object
Set ie = CreateObject(&InternetExplorer.Application&)
ie.Visible = True
ie.Navigate (&http://club.excelhome.net/forum-2-1.html&)
Do Until ie.readystate = 4
&&DoEvents
Set doc = ie.Document
。。。。。这边不知道怎么编了
阅读权限30
在线时间 小时
按键精灵运行演示
今天我也遇到了这个问题，经过几天的苦想，找到解决办法了。
原因是网页代码里关于下拉菜单这一块HTML代码没有onchange
解决的方法是：
userform1.WebBrowser1.Document.getElementBYID(&team_fight_select&).Focus‘网页下拉菜单&team_fight_select&获取焦点
& && && && && && && && && && && && &userform1.WebBrowser1.Document.getElementBYID(&team_fight_select&).Options(5).Selected = True'单击需选择的值
& && && && && && && && && && && && &userform1.WebBrowser1.Document.getElementBYID(&team_fight_select&).Focus'获取焦点
& && && && && && && && && && && && &userform1.WebBrowser1.Document.getElementBYID(&team_fight_select&).fireevent (&onchange&)'触发onchange事件，即更新网页内容
然后，世界太平了。。。。
阅读权限20
在线时间 小时
本帖最后由 zmj9151 于
09:37 编辑
针对网页 语言选择 的 下拉菜单，下列代码可实现自动选择繁体中文。
Set ie = CreateObject(&internetexplorer.application&)
ie.Visible = True
ie.navigate &http://pesdb.net/pes2017/&
Do Until ie.readystate = 4
& & DoEvents
Loop
With ie.Document
& & Set arrs = .getElementById(&select_language&) '所有选项的集合
& &
& & '2是繁体中文
& &
& & .getElementById(&select_language&)(2).Selected = True
End With
End Sub复制代码
阅读权限100
在线时间 小时
按键精灵运行演示
1234.gif (821.59 KB, 下载次数: 1)
15:43 上传
阅读权限100
在线时间 小时
我用按键精灵给你写了一个脚本，亲测可以用，发给你
URL = &http://pesdb.net/pes2017/&
Call RunApp(URL)
Delay 5000
MoveTo 256,237
LeftClick 1
MoveTo 225, 293
Delay 500
LeftClick 1复制代码
阅读权限100
在线时间 小时
哦，那应该怎么办呢？谢谢了
用VBA方法暂时没有找到，一般的这个click方法对于超链接，按钮之类的元素很好操作，但是对于这样的选项按钮好像显得不是那么好解决
阅读权限20
在线时间 小时
试过了，好像这两个方法都不行
doc.getElementById(&select_language&).Click
哦，那应该怎么办呢？谢谢了
阅读权限100
在线时间 小时
蓝天大侠，江湖急救啊！
请问以下这个网站：
http://pesdb.net/pes2017/
试过了，好像这两个方法都不行
doc.getElementById(&select_language&).Click
doc.All.tags(&option&)(2).Click
阅读权限100
在线时间 小时
蓝天大侠，江湖急救啊！
请问以下这个网站：
http://pesdb.net/pes2017/
用ID选择器选择
阅读权限20
在线时间 小时
蓝天大侠，江湖急救啊！
请问以下这个网站：
如何选择繁體中文语言啊，小弟在此跪下谢谢了，请蓝大神赐教啊！！！
网页源代码如下:
&div&Language:&&select id=&select_language& style=&margin-top: 97&&&option value=&ara&&العربية&/option&&option value=&bra&&Português do Brasil&/option&&option value=&chi&&繁體中文&/option&&option value=&eng& selected=&selected&&English&/option&&option value=&fra&&Français&/option&&option value=&ger&&Deutsch&/option&&option value=&gre&&Ελληνικά&/option&&option value=&ita&&Italiano&/option&&option value=&jpn&&日本語&/option&&option value=&kor&&한글&/option&&option value=&mex&&Español (México)&/option&&option value=&nld&&Nederlands&/option&&option value=&por&&Português&/option&&option value=&rus&&Русский&/option&&option value=&spa&&Español&/option&&option value=&swe&&Svenska&/option&&option value=&tur&&Türkçe&/option&&option value=&use&&English US&/option&&/select&&/div&
我的VBA代码为:
.Document.All(&select_language&)(3).Click
我这样写了以后，网站没有反应，还求蓝大侠指教一下啊，小弟在此跪下谢谢了
您需要登录后才可以回帖
玩命加载中，请稍候
玩命加载中，请稍候
Powered by
本论坛言论纯属发表者个人意见，任何违反国家相关法律的言论，本站将协助国家相关部门追究发言者责任！ & & 本站特聘法律顾问：徐怀玉律师 李志群律师

我要回帖

更多关于 按键精灵读取下拉框 的文章

 

随机推荐