jindouguang 发表于 2009-1-14 14:59:30

急急急 哪位达人救我于水深火热之中吧 知道 怎么用QTP取记事本当中 文字啊

哪位达人知道 怎么用QTP取记事本当中 文字啊
就是 右键某个网页之后 查看它的 源文件从源文件当中找到 以某段文字打头的一段话 把那段话付到某个变量上
达人解答一下前面的步骤我都想到了
wait 1
'Browser("阿玻罗信贷网").Page("阿玻罗信贷网").Frame("ALDS_9").Image("保存退出").Click,, micRightBtn
Browser("阿玻罗信贷网").Page("阿玻罗信贷网").Frame("ALDS_9").WebElement("返回首页").Click 1,1, micRightBtn
Set keys_test=createobject("wscript.shell")

keys_test.sendkeys "V"
wait 1
'keys_test.sendkeys "{enter}"
With Window("记事本")
        .Activate
        With Window("记事本")
                .WinEditor("Edit").Type micCtrlDwn + "f" + micCtrlUp
                With .Dialog("查找")
                        .WinEdit("查找内容(N):").Set "评分卡评级"
                        .WinButton("查找下一个(F)").Click
                End With
        End With
        .Activate
End With

查找完了怎么取那个记事本的值啊 ？

[ 本帖最后由 jindouguang 于 2009-1-14 15:39 编辑 ]

jindouguang 发表于 2009-1-14 15:19:42

:'( 没人啊
自己先顶一下自己

我就是不太清楚怎么 把ctrl＋c 得到文字信息 传到 变量当中
如果这一步知道了其他的都好办

jindouguang 发表于 2009-1-14 16:10:44

:'(

lingxin5013 发表于 2009-1-15 09:57:39

设置变量进行传递

asoqa 发表于 2009-1-15 10:21:58

回复 2# 的帖子

获取剪贴板内容的方式：
Set cb = CreateObject("Mercury.Clipboard")
MsgBox cb.GetText

jindouguang 发表于 2009-1-16 17:02:30

楼上是 牛人   坚定完毕谢谢楼上 一针见血 bingo
页: [1]
查看完整版本: 急急急 哪位达人救我于水深火热之中吧 知道 怎么用QTP取记事本当中 文字啊