用回车键查询
Browser("系统登录").Page("贵阳市新型农村合作医疗信息管理系统").Frame("main").WebEdit("ylzh").FireEvent("onfocus")
set WshShell =CreateObject("WScript.Shell")
WshShell.SendKeys "{ENTER}" 我是按照 kai_top朋友的方法
sdlkfj5 非常非常感谢 谢谢 晶晶 的回复。别人帮助了你,你也帮助了别人。这样论坛才能健康发展呀。呵呵! 晶晶还是很不错的,一年前的帖子,还以为会找不到人呢?居然真的出来了帮助大家了,谢谢晶晶,也学习晶晶~~sdlkfj3 哈哈,我今天也遇到这个问题了,多谢晶晶
回复 #1 晶晶 的帖子
学习中 learning支持
我觉得也是,自己解决问题之后,一定要将方法写出来;这样才能够真正得起到作用,使得其它人少走弯路。资源共享嘛,表扬晶晶,感谢 支持一下 国改革 个回归后 支持,我今天也遇到这个问题,刚好用得着:victory: 汗一个,原来这个帖子经历这么长的时间 支持一下:victory: 谢谢,我也碰到了类似的问题回复 36# 的帖子
我也刚好碰到了类似的问题。谢谢kai_top和晶晶同学。
但照晶晶的办法,为什么不行呢?
找原因ing~~
[ 本帖最后由 dog487 于 2008-11-10 11:53 编辑 ]
回复 37# 的帖子
还没有回复?~~[ 本帖最后由 dog487 于 2008-11-10 17:09 编辑 ]
别忘了了FireEvent("onfocus")
谢谢,吃一堑长一智,这句话很重要:“焦点在什么状态下点击Enter”,所以先要用FireEvent("onfocus")方法触发获得焦点的事件。 :victory: 很感谢前人的铺路,今天也遇到这个问题了,解决了,谢谢大家。代码如下:'使用键盘回车加载信息
Browser("**系统_2").Page("**系统_2").Frame("I2_2").WebEdit("WebEdit").Set "22"
Browser("**系统_2").Page("**系统_2").Frame("I2_2").WebEdit("WebEdit").FireEvent("onfocus")
set wshShell =CreateObject("WScript.Shell")
wshShell.SendKeys "{ENTER}"
wait 5