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

jindouguang

哪位达人知道 怎么用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

没人啊
自己先顶一下自己

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

jindouguang

lingxin5013

设置变量进行传递

asoqa

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

jindouguang

楼上是 牛人   坚定完毕  谢谢楼上 一针见血 bingo