资源描述：
《QuickTest Professional(QTP)常用使用方法整理》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。
1、1.模拟键盘操作1)WshShell.SendKeys应用SetWshShell=CreateObject("WScript.Shell")WshShell.SendKeys("DOWNARROW")WshShell.SendKeys("ENTER")KeyArgumentBACKSPACE{BACKSPACE}，{BS}，or{BKSP}BREAK{BREAK}CAPSLOCK{CAPSLOCK}DELorDELETE{DELETE}or{DEL}DOWNARROW{DOWN}END{END}ENTER{ENTER}or~ESC{ESC}HELP{H
2、ELP}HOME{HOME}INSorINSERT{INSERT}or{INS}LEFTARROW{LEFT}NUMLOCK{NUMLOCK}PAGEDOWN{PGDN}PAGEUP{PGUP}PRINTSCREEN{PRTSC}RIGHTARROW{RIGHT}SCROLLLOCK{SCROLLLOCK}TAB{TAB}UPARROW{UP}F1{F1}F2{F2}F3{F3}F4{F4}F5{F5}F6{F6}F7{F7}F8{F8}F9{F9}F10{F10}F11{F11}F12{F12}2)Extern.keybd_event模拟键盘'键盘模
3、拟函数，dec为虚拟键盘码PublicSubkeyBoard(dec)Extern.DeclaremicVoid,"keybd_event","user32.dll","keybd_event",micByte,micByte,micDWord,micULongExtern.keybd_eventdec,0,0,0EndSub'调用函数，执行敲击空格键的效果CallkeyBoard(32)1.自动截图，并将图片名称按当前系统时间命名'将当前系统时间转换成yyyymmddhhmmss格式Dims,ts=nowt=replace(s,":","")'去掉“
4、:”号t=replace(t,"-","")'去掉“-”号t=replace(t,"","")'去掉空格'截取当前屏幕，并按照系统时间保存desktop.CaptureBitmap"D:QTP测试结果测试截图项目明细表"&t&".bmp",true或者（有DataTable参数存在时）'pictureName为截图要显示的名字，parameterName为DataTable的列名PublicSubpictureCapture(pictureName,parameterName)Dimaa=year(now)&month(now)&day(now)
5、&Hour(now)&minute(now)&second(now)DimperName,dataNamerow=DataTable.GetCurrentRow'获取DataTable当前活动的行perName="_第"&row&"行"IfparameterName=""Thendesktop.CaptureBitmap"D:QTP测试结果测试截图"&pictureName&perName&a&".bmp",trueelse'dataName为dataTable中当前单元格中的值dataName=DataTable.GetSheet("Actio
6、n1").GetParameter(parameterName).ValueByRow(row)If(instr(dataName,"")orinstr(dataName,"/")orinstr(dataName,":")orinstr(dataName,"*")orinstr(dataName,"?")orinstr(dataName,"<")orinstr(dataName,">")orinstr(dataName,"
7、")orinstr(dataName,""""))Thendesktop.CaptureBitmap"D:QTP测试结果测试
8、截图"&pictureName&perName&"【该特殊字符不能用于文件命名】"&a&".bmp",trueelsedesktop.CaptureBitmap"D:QTP测试结果测试截图"&pictureName&perName&"【"&dataName&"】"&a&".bmp",trueEndIfEndIfEndSub使用：CallpictureCapture("业务维护_查询全部","")或者（没有Datatable存在时）'pictureName为截图要显示的名字PublicSubpictureCapture(pictureName)D
9、imaa=year(now)&month(now)&day(now)&Hour(now)&mi
