怎样测试已经控制了最大长度的控件的最大长度阿

yfyl0309 · 发表于 2007-9-5 11:27:40

但是web属性的控件是没有type 方法的呀难道真的只能把它识别成win属性的然后再用type 方法吗？请教高手说的 type可以输入普通字符而且可以插入追加具体是怎么操作的呢

19thangel · 发表于 2007-9-5 13:32:06

用sendkey模拟输入

yfyl0309 · 发表于 2007-9-5 15:00:45

各位前辈到底是怎么用 type 和sendkeys 的呢
有没有前辈可以就百度的搜索文本框举一个 type 和sendkeys 具体用法的例子呢就输几个简单的字符就可以了谢谢了
公司一个礼拜前让我自己看qtp 说是要用来测一个网页公司从来没人用过而且就我一个人我看的头都大了只能来请教各位前辈了麻烦大家了

19thangel · 发表于 2007-9-5 15:44:29

打开百度，焦点定在对话框，输入“sousuo”，点击确定。

Browser("百度一下，你就知道").Page("百度一下，你就知道").WebEdit("wd").click
Dim WshShell
set WshShell = CreateObject("Wscript.Shell")
WshShell.SendKeys "sousuo"
Set WshShell = nothing
Browser("百度一下，你就知道").Page("百度一下，你就知道").WebButton("百度一下").Click

type看了下帮助，貌似webedit的属性不支持。

yfyl0309 · 发表于 2007-9-5 16:17:28

楼上的非常感谢你的解答但是我试了下这样的话 WebEdit("wd")中是空的 "sousou"并没有输进去呀

yabest · 发表于 2007-9-5 16:24:14

原帖由 yfyl0309 于 2007-9-5 16:17 发表
楼上的非常感谢你的解答但是我试了下这样的话 WebEdit("wd")中是空的 "sousou"并没有输进去呀

可能webedit没得到焦点吧，你试试手工点击，让焦点落在这webedit上。

yfyl0309 · 发表于 2007-9-5 16:31:33

Browser("百度搜索").Page("百度一下，你就知道").WebEdit("wd"). FireEvent "onfocus"
  Browser("百度搜索").Page("百度一下，你就知道").WebEdit("wd").Set "1"
      Dim WshShell
      set WshShell = CreateObject("Wscript.Shell")
      WshShell.SendKeys "sousuo"
Set WshShell = nothing
Browser("百度搜索").Page("百度一下，你就知道").WebButton("百度一下").click

我把脚本改成这样搜索结果是 “1“                "sousuo" 没有输进去

19thangel · 发表于 2007-9-5 16:38:31

Set "1"以后焦点没了，再点一次试试

yfyl0309 · 发表于 2007-9-5 17:59:30

对了    非常感谢各位热心帮忙了我来总结一下TYPE 和SENDKEYS的用法说的不对的还请各位前辈指正
首先作用是  模拟键盘动作输入字符
对于web属性的控件没有type方法  但是可以用低级录制模式将控件识别成win属性的就可以用type了

sendkeys 用法前辈们已经说得很清楚了  需要注意的是一定要让控件得到焦点  不然就会犯我那样的错误了哦sdlkfj5

解决了这个问题觉得很开心  再次谢谢大家的帮忙

yabest · 发表于 2007-9-5 18:34:00

原帖由 yfyl0309 于 2007-9-5 16:31 发表
Browser("百度搜索").Page("百度一下，你就知道").WebEdit("wd"). FireEvent "onfocus"
  Browser("百度搜索").Page("百度一下，你就知道").WebEdit("wd").Set "1"
      Dim WshShell
      set WshShell = CreateObject("Wscript.Shell")
      WshShell.SendKeys "sousuo"
Set WshShell = nothing
Browser("百度搜索").Page("百度一下，你就知道").WebButton("百度一下").click

我把脚本改成这样搜索结果是 “1“                "sousuo" 没有输进去
.

改成这样就可以了！用Click模拟鼠标点击来获得焦点！

Browser("百度搜索").Page("百度一下，你就知道").WebEdit("wd").Click
Dim WshShell
set WshShell = CreateObject("Wscript.Shell")
WshShell.SendKeys "sousuo"

复制代码

danmy · 发表于 2007-9-6 09:32:34

WebEdit 好像有个属性是最大长度吧？不记得了，一会看看

milan330330 · 发表于 2007-9-6 10:30:21

type 记得我是在输入ＱＱ密码的时候用过~~

wuyu702 · 发表于 2007-10-25 11:58:26

学习啊

		自动登录	找回密码
密码			(注-册)加入51Testing

[求助] 怎样测试已经控制了最大长度的控件的最大长度阿

站长推荐 /1