51Testing软件测试论坛

 找回密码
 (注-册)加入51Testing

QQ登录

只需一步,快速开始

微信登录,快人一步

手机号码,快捷登录

查看: 40542|回复: 62
打印 上一主题 下一主题

WinRunner的问题搜集

[复制链接]

该用户从未签到

跳转到指定楼层
1#
发表于 2007-5-22 12:13:12 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
1.WR是否支持vs.net
根据Mercury的介绍,他们的对.Net的支持转移到QuickTest Pro上了,如果你需要自动化测试.Net程序(不是web的),建议用

QuickTestPro。也就是说wr不支持vs.net开发的程序

2.我对比两个文件file1.txt和file2.txt,文本内容如下
file1.txt 内容如下:
10523 8315 6804 8387 3643 4550 3457 3649

file2.txt内容如下:
190176 155737 117417 145194 65314 81431 64522 63324

代码如下:file_compare("C:\\file1.txt","C:\\file2.txt","save");
为什么每次对比这两个文件结果都是通过的。
答:这个问题的原因在于它在前面的脚本中对文件进行了操作,没有关闭,所以这段代码运行总是通过

3.如何在winRunner中用Windows的API函数
在使用该API函数前需要先加载该函数然后声明API函数,代码如下
load_dll("user32.dll");
extern int PostMessageA(in long, in long, in long, in long);
win_get_info("{class:window, MSW_class:AfxMDIFrame42, label:\"!WinRunner.*\"}", "handle", hWnd);
PostMessageA(hWnd, 16, 0, 0);

请在尝试以上代码的时候,保存脚本,呵呵!
4.怎样处理跟踪键盘操作?
答:下边的代码希望对你有帮助
  function GetKeyStatus(in vKey){
    auto pid, thread_id, win_desc, hWnd, KeyState, win_log_name, win_full_desc, focused_obj_desc;
    win_desc = "{active:1}";     
    if (win_exists(win_desc)==0)     {         
      win_get_desc(win_desc, "", "", "", win_full_desc);
          GUI_map_get_logical_name( win_full_desc, "", win_log_name, "bla");
        win_get_info(win_desc, "handle", hWnd);
        pid = GetWindowThreadProcessId(hWnd, NULL);
        thread_id=GetCurrentThreadId();
          AttachThreadInput(pid,thread_id,TRUE);
        KeyState=GetKeyState (vKey);
        AttachThreadInput(pid,thread_id,FALSE);
        if (KeyState < 0)           
        return(0); # Key is pressed
      else         
        return (1); # Key is not pressed     
    }
    else
          return (-1); # No active window found, so cannot determine key state
  }
.WinRunner如何处理excel?答:其实解决方法有很多,这里列举两种。
  一.利用其他语言特性开发出dll提供给winrunner使用(vb,vc,delphi等)
  二.在其他环境中实现,用winrunner调用
  第一种我在这里不举例子了,第二种我利用vbs往excel中赋值给大家提供一种思路,代码如下:

'vbs中的代码
  Dim ExcelApp
  Dim itemX
  if WScript.Arguments.Count < 2 then
  r = msgbox("Requires 2 arguments", 48, "change_sheet")
  else
  dim fso
  set fso = createobject("scripting.filesystemobject")
  xlBook = fso.GetAbsolutePathName(WScript.Arguments(0))
  xlSheet = WScript.Arguments(1)
  set fso = Nothing
  Set ExcelApp = CreateObject("Excel.Application")
  ExcelApp.Workbooks.Open(xlBook)
  Set itemX = ExcelApp.ActiveWorkbook.Worksheets.Item(xlSheet)
  itemX.Activate
  
  excelApp.ActiveWorkbook.Worksheets(xlSheet).Range("A1").Select
  excelapp.ActiveCell.FormulaR1C1 = "1"
  excelApp.ActiveWorkbook.Worksheets(xlSheet).Range("B1").Select
  excelapp.ActiveCell.FormulaR1C1 = "2"
  excelApp.ActiveWorkbook.Worksheets(xlSheet).Range("c1").Select
  excelapp.ActiveCell.FormulaR1C1 = "3"

  ExcelApp.ActiveWorkbook.Save()
  ExcelApp.ActiveWorkbook.Close(1)
  ExcelApp.Quit()
  
  Set itemX = Nothing
  Set ExcelApp = Nothing

end if

winrunner中的调用代码:
dos_system("wscript \"C:\\excel_sheet.vbs\" \"C:\\SheetBook.xls\" \"Sheet2\"");
  
2.在WinRunner中如何实现得到transaction时间?
答:一般情况下transaction的时间只能在最后结果中得到,如何在脚本得到这个时间呢,下边的代码可以

帮助你:
public transactions[];
function start_my_transaction(in transaction_name)
{
    transactions[transaction_name] = get_time();
    tl_step("Start transaction: \"" & transaction_name & "\"",PASS,"Timestamp: " &

transactions[transaction_name]);
    return (transactions[transaction_name]);
}
function end_my_transaction(in transaction_name)
{
    auto end_time = get_time();
    auto rc;
    if(transactions[transaction_name] == "")
    {
          tl_step("End transaction: \"" & transaction_name & "\"",FAIL,"Transaction was

never started.");
          rc = -1;
    }
    else
          tl_step("End transaction: \"" & transaction_name & "\"",PASS,"Elapsed Time: "

& (rc = end_time - transactions[transaction_name]));
    delete transactions[transaction_name];
    return rc;
}

start_my_transaction("my_transaction");
wait(2);
rc = end_my_transaction("my_transaction");
pause("Elapsed time = " & rc);
北京地区对软件测试感兴趣的朋友可以和我交流:qq:306513768
我的博客:
http://www.51testing.com/?uid/110105
友情链接:www.diytest.net


[ 本帖最后由 rendaoyuan 于 2007-7-4 15:16 编辑 ]
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏
回复

使用道具 举报

该用户从未签到

2#
发表于 2007-5-22 18:11:51 | 只看该作者
不错,顶上去,欢迎大家多来讨论和总结WR
回复 支持 反对

使用道具 举报

该用户从未签到

3#
发表于 2007-5-23 09:27:27 | 只看该作者
不错,顶一下
回复 支持 反对

使用道具 举报

该用户从未签到

4#
发表于 2007-6-4 15:25:20 | 只看该作者
不错,顶一下
回复 支持 反对

使用道具 举报

该用户从未签到

5#
发表于 2007-6-5 13:09:45 | 只看该作者
还行
回复 支持 反对

使用道具 举报

该用户从未签到

6#
发表于 2007-6-5 13:15:59 | 只看该作者
郁闷啊,又没有分了
回复 支持 反对

使用道具 举报

该用户从未签到

7#
发表于 2007-6-5 13:16:14 | 只看该作者
谁给我点分数啊!
回复 支持 反对

使用道具 举报

该用户从未签到

8#
发表于 2007-6-20 15:01:43 | 只看该作者
tl_step("Start transaction: \"" & transaction_name & "\"",PASS,"Timestamp: " &

transactions[transaction_name]);

这个tl_step()函数是你自己写还是WR自带的啊???急,谢谢
我把你这整段代码copy进去WR报识别不了这个函数
回复 支持 反对

使用道具 举报

该用户从未签到

9#
发表于 2007-6-22 20:42:05 | 只看该作者

回复 #1 rendaoyuan 的帖子

很好阿
回复 支持 反对

使用道具 举报

该用户从未签到

10#
发表于 2007-6-26 16:26:09 | 只看该作者
不错,谢谢共享
回复 支持 反对

使用道具 举报

该用户从未签到

11#
发表于 2007-6-28 16:02:07 | 只看该作者
原帖由 weiwei555 于 2007-6-20 15:01 发表
tl_step("Start transaction: \"" & transaction_name & "\"",PASS,"Timestamp: " &

transactions);
这个tl_step()函数是你自己写还是WR自带的啊???急,谢谢
我把你这整段代码copy进去WR报识别不了 ...

TL——STEP(“STEPNAME”,PASS,“DESCRIPTION”)这个函数是WR自带的,是可以运行的。你再试试看
回复 支持 反对

使用道具 举报

该用户从未签到

12#
发表于 2007-7-2 08:56:28 | 只看该作者
正在学习Winrunner,学习一下!
回复 支持 反对

使用道具 举报

该用户从未签到

13#
发表于 2007-7-2 10:38:46 | 只看该作者
要是有一本全面的教材就好了!  我刚开始搞测试
回复 支持 反对

使用道具 举报

该用户从未签到

14#
发表于 2007-7-2 15:39:28 | 只看该作者

回复 #1 rendaoyuan 的帖子

不错,这个顶好~~~~~
回复 支持 反对

使用道具 举报

该用户从未签到

15#
发表于 2007-7-4 09:41:30 | 只看该作者
很经典的帖子
回复 支持 反对

使用道具 举报

该用户从未签到

16#
发表于 2007-7-4 09:42:59 | 只看该作者
在这里分不够用啊
回复 支持 反对

使用道具 举报

该用户从未签到

17#
发表于 2007-7-15 08:42:57 | 只看该作者
正在学习winrunner,楼主的帖子对我很有帮助
回复 支持 反对

使用道具 举报

该用户从未签到

18#
发表于 2007-7-19 10:51:08 | 只看该作者
不错,支持
回复 支持 反对

使用道具 举报

该用户从未签到

19#
发表于 2007-7-21 12:02:07 | 只看该作者
不错,支持
回复 支持 反对

使用道具 举报

该用户从未签到

20#
发表于 2007-7-24 09:26:09 | 只看该作者
hao 谢谢
回复 支持 反对

使用道具 举报

本版积分规则

关闭

站长推荐上一条 /1 下一条

小黑屋|手机版|Archiver|51Testing软件测试网 ( 沪ICP备05003035号 关于我们

GMT+8, 2024-11-13 03:33 , Processed in 0.080962 second(s), 27 queries .

Powered by Discuz! X3.2

© 2001-2024 Comsenz Inc.

快速回复 返回顶部 返回列表