sspku 发表于 2010-9-30 11:32:13

VBS脚本如何往textarea里写东西

界面上有个textarea，想通过按钮点击后，往里面写点内容怎么实现呢

runnerhuang 发表于 2010-9-30 15:09:22

如果正常的set无法填值的话，可以尝试模拟键盘输入sendkeys,例如：
Set WshShell = CreateObject("WScript.Shell")
WshShell.SendKeys "{DOWN}"

sspku 发表于 2010-9-30 15:24:42

怎么得到那个textarea呢

sspku 发表于 2010-9-30 16:29:33

怎么得到那个textarea呢

TIB 发表于 2010-9-30 16:40:32

怎么得到那个textarea呢
sspku 发表于 2010-9-30 16:29 http://bbs.51testing.com/images/common/back.gif

把这个对象添加到对象库，或者用描述性编程在脚本中描述出这个对象来

sspku 发表于 2010-9-30 16:55:53

回复 5# TIB


跟QTP没关系，纯粹的VBS脚本

TIB 发表于 2010-9-30 22:51:56

回复TIB


跟QTP没关系，纯粹的VBS脚本
sspku 发表于 2010-9-30 16:55 http://bbs.51testing.com/images/common/back.gif


那只能用VBS调用IE，访问DOM来找到那个对象

sspku 发表于 2010-10-1 13:37:46

vbs好像不能识别document的对象吧，像ajax那样通过getElementById得到对象

sspku 发表于 2010-10-3 09:47:16

没人知道嘛？ 顶起来

17800455 发表于 2010-10-5 12:26:04

你可通创建一下IE对象，通过dom去取

以下是一个例子，输入搜索关键字，自动转到百度搜索

contrent = inputbox ("百度一下你就知道！","请输入搜索内容！")

If contrent <> "" then
        Set ie = CreateObject("InternetExplorer.Application")
       
        ie.Navigate "www.baidu.com"
        ie.Visible = true
       
        While ie.Busy And ie.ReadyState <> 4
       
        Wend
       
        ie.Document.GetElementByID("kw").Value = contrent
        ie.Document.GetElementByID("su").click
       
        Set ie = Nothing
Else
       
        MsgBox "您已取消搜索",,"提示:"

End If

17800455 发表于 2010-10-5 12:27:14

你可以参考http://hi.baidu.com/qqqql　　这个空间

sspku 发表于 2010-10-5 21:55:11

如下为什么不行呢？ 没有getElementById这个方法么？？
Set objDom = CreateObject("microsoft.xmldom")
objDom.getElementById("res").value="ddd"

lyscser 发表于 2010-10-7 10:34:29

楼主你到底要做什么？
页: [1]
查看完整版本: VBS脚本如何往textarea里写东西