link:http://www.51testing.com/?uid-72002-action-viewspace-itemid-210607

'关闭所有打开的IE进程
systemutil.CloseProcessByName("iexplore.exe")

'设置对象超时时间：为1000S
setting("defaulttimeout")=1000000  
*defaulttimeout
*Sets or retrieves the delay for finding objects. DefaultTimeOut is a per-test setting.

'调用VBS文件
executefile "D:\chuchangceshi\public.vbs"

'systemutil对象
SystemUtil.Run "C:\Program Files\Internet Explorer\IEXPLORE.EXE","","C:\Documents and Settings\test","open","3"

open--  Opens the file specified by the FileName parameter. The file can be an executable file, a document file,   or a folder. Non-executable files are open in the associated application. 
 3--   Activates the window and displays it as a maximized window.

'Opens a specified URL in the browser 打开一个指定的URL地址
object.Navigate Location, [TargetFrame], [PostData], [Headers]

Browser("Browser").Navigate URL

'常见的IE浏览器打开窗口的操作语句
Browser("Browser").Dialog("选择数字证书").WinListView("您要查看的网站要求标识。请选择证书。").Select "normal"

'excel文件读取方式
 ==1
 Dim excel_ob,my_excel_workbook,my_excel_worksheet,range1,range2
 Set excel_ob =CreateObject("excel.application")
 excel_ob.Visible=True
 setmy_excel_workbook=excel_ob.Workbooks.Open("D:\MyVBscript\vba_excel.xls")
 Setmy_excel_worksheet=my_excel_workbook.Worksheets("test001")
 Sub test_copy()
  my_excel_worksheet.range("b1")=28
  Set range1=my_excel_worksheet.range("b1")
  Set range2=my_excel_worksheet.range("c3")
  range1.copy range2
  excel_ob.Workbooks.Close
  window("text:=microsoft excel").close
  'my_excel_worksheet.range("b1").copy my_excel_worksheet.range("b2")
 End Sub
  ==2
 Public FunctionQTP_Read_Excel(pathway,sheetname,x,y)
  Dim srcData,srcDoc,ret
  Set srcData = CreateObject("Excel.Application")
  srcData.Visible = True
  Set srcDoc = srcData.Workbooks.Open(pathway)
  srcDoc.Worksheets(sheetname).Activate
  ret = srcDoc.Worksheets(sheetname).Cells(x,y).value
  srcData.Workbooks.Close
  Window("text:=Microsoft Excel").Close
  QTP_Read_Excel = ret
 End Function

'调用已有的QTP脚本 RunAction
RunAction ActionName, [IterationMode , IterationRange , Parameters]
   ActionName:(String) The name of the action. 
   IterationMode:(Pre-defined constant ) Optional.
     oneIteration or 0 (Default) - runs the action only once
     rngIterations or 1 - runs iterations according to the third parameter.
   IterationRange:Not always required.
   Parameters:The values and storage locations for the called action's input and output parameters.
   eg:
 RunAction "https_portal_denglu [Login]", oneIteration

'判断指定文件是否存在
Function ReportFileStatus(filespec)
   Dim fso, msg
  Set fso = CreateObject("Scripting.FileSystemObject")
   If (fso.FileExists(filespec)) Then
      msg = True
   Else
      msg = False
   End If
   ReportFileStatus = msg
End Function

'获得当前对象属性信息 GetROProperty
object.GetROProperty (Property, [PropData])
 object: Any Web test object.
    Property: Required. A String value. The property to retrieve from the object.
    PropData: Optional. A Variant value. Not in use.
Return Type:A Variant value.  
 eg:'HWND是Browser("sts demo 演示")的一项属性
 Browser("sts demo 演示").GetROProperty("HWND")

'使用eqv
Performs a logical equivalence on two expressions
 result = expression1 Eqv expression2
         '比较两个表达式的值，当且仅当 表达式1和表达式2同为true或同为false时，结果才为true

'生成结果报告 Reporter.ReportEvent
Reporter.ReportEvent EventStatus, ReportStepName, Details [, in]
 EventStatus :
  0 or micPass: Causes the status of this step to be passed and sends the specified message to the report.
  1 or micFail: Causes the status of this step to be failed and sends the specified message to the report.
    When this step runs, the test or component fails.
  2 or micDone: Sends a message to the report without affecting the pass/fail status of the test or component.
  3 or micWarning: Sends a warning message to the report, but does not cause the test or component to
    stop running, and does not affect the pass/fail status of the test or component.
 ReportStepName: Name of the intended step in the report (object name).
 Details :Description of the report event. The string will be displayed in the step details frame. in the report.
 eg:
 If check eqv true Then
  reporter.ReportEvent 0,"pass","添加BS应用自动登录功能正确"
    else
  reporter.ReportEvent 1,"fail","添加BS应用自动登录功能失败"
    End If

获取表格对象的行数 RowCount
object.RowCount
Returns the number of rows in the table.
row=Browser("JIT Cinas").Page("JIT Cinas").Frame("mainFrame_4").WebTable("应用信息列表").RowCount

'获取列表对象单元格的值 GetCellData
object.GetCellData (vtRow, vtColumn)
Returns the text contained in the specified cell.
 object: A test object of type WebTable.
 vtRow: Required. A Variant value. The row number where the cell is located. The first row in the table is numbered 1.
 vtColumn: Required. A Variant value. The column number where the cell is located. The first column in the table is numbered 1.
 eg:
   micheng=Browser("JIT Cinas").Page("JIT Cinas").Frame("mainFrame_4").WebTable("应用信息列表").GetCellData(i,1) 

'对运行场景抓图 CaptureBitmap
object.CaptureBitmap FullFileName, [OverrideExisting]
 Saves a screen capture of the object as a .png or .bmp image using the specified file name.
 object: Any Standard Windows test object.
 FullFileName: Required. A String value. 
 OverrideExisting: Optional. A Boolean value. Indicates whether the captured image should be overwritten if the image file already exists in the test results folder.    Possible values: True/False (default) 

'按照索引获取对象中的值
   '获取表格对象的行数
     row=Browser("JIT Cinas").Page("JIT Cinas").Frame("mainFrame_4").WebTable("应用信息列表").RowCount
   '判断名称为bs的应用所在的行数，获取到配置信息图片的索引值
     dex=2 '索引的初始值
     For i=3 to row
        micheng=Browser("JIT Cinas").Page("JIT Cinas").Frame("mainFrame_4").WebTable("应用信息列表").GetCellData(i,1) 
   '获取所在行的应用名称
        If  trim(micheng)=trim("cs") Then
                     Exit for
        End If
        dex=dex+3 '进入下一行，图片索引值加3
      Next

'关闭指定的进程
systemutil.CloseProcessByName("iexplore.exe")'关闭所有打开的IE进程

　　第一种方法-----------------------------------

　　randomize'更新反回的数据

　　funcation rand(k,n)

　　n=int((k-1)*rnd+1)

　　rand=n

　　end funcation

　　第二种方法

　　n=randomnumber.value(1,255)

　　2 当运行到表中的某一行，自动导出表中的所有数据

　　3 webedit("txtpass").setsecure"sdsdf...."

　　如果参数化密码，可以直接在数据表中写入未加密的密码，它会自动识别，即不用把setsecure改为set

　　4　如果弹出对话框就获取上面提示信息并与表中的信息对比，不统一证明弹出的提示出错，主要用来验证

　　这里我总结了两点技巧：

　　一是：对于dialog中，虽然提示信息对象名称是"用户密码错误"，但如果信息对象名称是“该用户不存在”，不用更改会自动识别，我想主要是录制第一遍时，“用户密码错误”只是让运行时能找到这个控制，而不管它是什么内容，因为在对象仓库中，text不是决定该对象的属性。

　　二是：如果对于提示信息比较长的，可以用mid(error_message,n,m)取一部份特征提示信息进行验证，这样我想可以节省处理时间，又可以避免长度以及空格等字符的处理。

　　5 在运行时，向某一个单元格赋值:

　　datatable.value("kai",dtlocalsheet)="nanjing"

　　datatable.value("num")只在global形式下的一种省略形式；完整形式是datatable.value("num",dtlocalsheet)

　　-----取得某一具体行的值：

　　datatable.setcurrentrow(n);

　　msgbox(datatable.getsheet("global").getparameter("kai").Rawvalue)

　　或者kk=datatable.Rawvalue("kai","action1")

　　-----在run-time期间，添加一个action和参数

　　kk=datatable.addsheet("name").addparameter("kai","ddd").name'/value

　　6　with dialog("name")'可以省好多代码，看着也简洁

　　content=.wintreeview

　　end with

　　7 wintreeview.select(item)（根是0,列表第一个也是0）

　　wintreeview.getcontent

　　wintreeview.getitem(整行)+";"+

　　winlistview.getitem(行中的第一个字符段)

　　wincheckbox("").set"off"'/on

8 数据库检查点:

　　9 vbcr----chr(13)回车符

　　vblf----chr(10)换行符

　　vbcrlf----chr(13)+chr(10)结合

　　10 step run has two ways

　　一是在key-driven页面,另一个是在代码页面，前者走完项目，后者只是本acton第一行

　　11 对于时间，日期等的格式检查（一种是正则表达式，另一种是输出对比，如果不好对比，用mid截取一部分对比)

　　12 对于一些列表框或树结构，如果发生结点名称发生变化，此时如果报没有彼配的对象，此时可以把更改后面的名称如_2

　　13 对于动态变化的对象，要分清是对像还是属性；对于属性可以用gettoproperty("ddd");得到；而对于由于动态无法识别对像可以用描述性脚本：

　　14 对于属性是变化的，有时可以把该属性从识别对象里删除

　　15 从系统的文件中获取信息及删除文件

　　16 四舍五入可以在后面+0.5，进行自动解决

17 y=-------waitproperty("visible",true,10000)

　　18 on error resume next

　　on error goto o

　　19 window("").wintreeview("systreeview32").TYpe micctrldown+"p"+micctrlup

　　20 定义数组 name=array(1,2,"aa","bb");name(0)=1

　　21 进行日期YYYY-MM-DD的格式检查:

　　相关阅读：

　　QTP中的描述性编程

　　QTP脚本还可以这样写

　　QTP的登陆脚本设计

　　QTP中常有的VB函数

　  QTP中的参数传递

　　手工编写QTP测试脚本

　　QTP脚本触发WEB客户端控件的事件

link:

http://www.51testing.com/html/88/n-6388-3.html

【QTP编码小知识 六 参数】

　　相信很多人刚接手的新项目，理解自动化脚本中参数的传递是一个很耗费时间的过程，我们需要时间去吸收和理解它。这也不禁让人觉得，自动化项目的中，参数形式的拟定尤为重要，它也是在框架搭建时候的必备工作之一。无疑一个好的参数形式的拟定工作也是决定项目后期维护成本的重要因素。……

　　详情请查看：http://www.51testing.com/html/87/n-170187.html

【QTP编码小知识 五 “山寨”WebElement】

　　随着web开发技术变得越来越复杂，使QTP在处理web对象时也变得不那么容易，但是很多时候还是能通过调整对象属性的技巧，达到正确识别我们想要的对象（Web元素）。这同时也就提出了更高的要求，要能够了解一些Web开发的知识，分析测试页面的源程序。当然光分析仍然是有些马后炮，更好的应该是在界面开发时就为以后自动化测试做准备了。

　　确实在QTP的对象识别过程中，让QTP用户尤为头疼的就是对象识别。而当QTP识别不了对象时候，就不负责任的丢了一个"WebElement"给大家，而每个人都觉得这不是我想要的结果。那么如何更好的把这个WebElement做出我们想要的效果与操作呢？

　　……

　　详情请查看：http://www.51testing.com/html/74/n-108374.html

　　偏向喜欢使用对象库操作的QTP用户，在添加对象时候，会出现某几个子对象，都识别成一个对象，因为里面的所有属性几乎是一样的，很为难的不知道如何解决这个问题，借鉴与描述编程中的索引值index的使用，例如：

　　如何把index添加进去或者如何把这些描述的东西添加进去？在这里给了大家一个小的html page，大家下载下去后，可以先试试看，然后再看看下文，如何使用Index。自然这个不会识别成一个对象，因为它们的类型有区别，只是特定或者模拟某些情况而已。

　　……

　　详情请查看：http://www.51testing.com/?action-viewnews-itemid-96772

【QTP编码小知识 三 IE内存释放】

　　由于编码小知识出到第三帖，特此帖送出API手册一份，想要会自动化，还离不开Win32 API。

　　先说下小编对关于Web内存的一些小看法，之前已经有讨论过关于IE内存占用居高不下，导致了QTP对Web页面的操作出现种种问题。今天和大家说下简单的内存释放方法。首先我们使用的将浏览器最小化然后再做最大化的操作来实现这个释放工作。很多人知道，IE最小化后，内存占用不到2M，最大化后，会比之前最小化前占的内存更少。

　　……

　　详情请查看：http://www.51testing.com/?action-viewnews-itemid-94271

【QTP编码小知识 二】

　　大家看看下面代码，代码是运行在谷歌的主页面，如果大家要试的话，大家同样也可以试试这代码的运行结果。

　　代码运行完后，你会发现，原来在循环第2次连接点击的时候，抛出了一个“General run error”。这个是为什么会这样？之前也同样有论坛的朋友问到这样的问题，所以今天就在这里提到。

　　问题是出在了对第一个连接点击后，做了返回操作所导致的，在第一次back的时候，LinkObj对象就已经丢失了，失效了。所以你在做第2次操作的时候，LinkObj(i)就已经找不到了，因此它会出错。

　　正确的方法，这个也是我目前想到的，或者还有其它达人能做更好的方法出来。

　　……

　　详情请查看：http://www.51testing.com/html/52/n-93852.html

【QTP编码小知识 一】

　　你学习过了编程，知道了，如果and的条件，如果有一个否，哪么就全部为否，自然是这个是逻辑条件的问题，你有学过，所以你写成2个and的方法去简略代码。但问题往往发生在这里，就和变魔术一样，大人看不出，但小孩就可以看出里面的问题，因为成人的思想会被自己所谓的经验所左右。

　　这段代码的错误地方发生在那里，估计读到这里的人大部分已经猜到了，错误会发生在第1片中的2 3行！！你会问为什么？这应该没错才对的呀？

　　详情请查看：http://www.51testing.com/?action-viewnews-itemid-93797

为了自己查看比较方便，对BOOBOOKE内所有的QTP视频做个汇总贴.51Testing软件测试网a&xHk2Qp
================================================================================51Testing软件测试网 {(u7o#i @.q*[1e
[V] QTP 9的新特性 1 - 英文视频
urdL*B| Gb.C177152http://www.boobooke.com/v/bbk105051Testing软件测试网 n4m%V Blt|y%J$Z
是QTP 9软件中自带的视频讲座，英语讲座51Testing软件测试网9{-M BQu
j`
g%G,K
[V] QTP 9的新特性 2 - 英文视频
AY5h7FZ,Tr4E177152http://www.boobooke.com/v/bbk1051

j4q m?J177152QTP 9软件中自带的视频讲座，英语发音51Testing软件测试网c6c iBd jW-Gn
[V] QTP 9的新特性 3 - 英文视频
G
Z5CTu177152http://www.boobooke.com/v/bbk1052
7~ ` IK6Vu5_9QE:k177152QTP 9软件自带的视频讲座，英语发音，希望大家喜欢。
e0O,b ]H177152这些视频都在QTP 9的安装目录的help目录下面。51Testing软件测试网twCW1^)M1L7G2t
help目录包括了QTP全部的联机文档和帮助。
G:E u#{%@ V1o0k177152================================================================================
K7B8TJG%mAj177152[V]小布老师QTP系列培训视频 - 1
@9~XA!dE g177152http://www.boobooke.com/v/bbk1043
Y kn!M0S3d177152本讲讲了QTP的概述，希望大家喜欢。51Testing软件测试网5^ LXK3r-d-kh$J2P
[V] 小布老师QTP系列培训视频 - 2
|#cu Z3S3K5g177152http://www.boobooke.com/v/bbk1044
Eo$j ? n.c,Ts177152本讲讲了测试规划，希望大家喜欢。51Testing软件测试网t.X ]f:F&`BM
[V] 小布老师QTP系列培训视频 - 3
WDLF*F L7K;I177152http://www.boobooke.com/v/bbk1045
{QL y)A#s s177152本讲讲了录制测试脚本，是使用QTP的第一步，希望大家喜欢。
^"h(~!Gy*YdLd177152================================================================================51Testing软件测试网 g[&^,{x7kYq0^.r2_
小强作品-零基础学习软件测试-qtp-目录
+r[@{bx-d1771521 qtp目录分析
JBMT6f9z1771522 qtp界面分析51Testing软件测试网0PN(dx5ej }
3 qtp示例程序分析
Qsj5~3d1771524 qtp学习指南51Testing软件测试网1j9?nm1L!k
5 qtp基本操作录制与回放
#]0Z.s1V`&Oy1771526 qtp的三种录制方式
v[Pr N~1771527 增强help步骤51Testing软件测试网_&m\Wc
8 checkpoint
:P[&EQ6k w2oa1771529 参数化
5sP9eI x)N b&[17715210 Tools下的工具介绍
EV"K7B5P&o.p$LO17715211 qtp插件分析51Testing软件测试网 c.zM7j(D3W D
12 qtp测试用例设计考题51Testing软件测试网 N6Xg~a[8O3P@k&m
13 vbs
,C5U v6x6_Q17715214 recovery Scenarios51Testing软件测试网/b$i\bA5Pl
15 虚拟对象
]P9Obb$Qr
O/z17715216 专家视图测试脚本开发51Testing软件测试网s
XN'V},o*uJ
17 qtp描述性编程
u`WQ1vf(rV17715218 qtp测试脚本编写规范
^k7SwO
LsWj*D17715251Testing软件测试网t'vO/Lv7bd
[V]小强老师系列作品：QTP的安装目录分析
'qM'Sr-aL w3R"z177152http://www.boobooke.com/v/bbk1590
;P;w |fG\5l177152在本集中，小强老师向刚刚接触QTP的朋友介绍了QTP安装后的各个目录，重点介绍了大家需要关注的东西，希望对大家有帮助。51Testing软件测试网Z d `]TlZ]
[V] 小强老师系列作品：QTP界面剖析
z~&v
]N%t177152http://www.boobooke.com/v/bbk1594
+WJ|7E{ws177152本集是承接上集，小强老师向刚刚接触QTP的朋友介绍了QTP的常用界面和菜单选项，希望对大家有帮助。51Testing软件测试网#x[D+q+g3z3jn4f
[V] 小强老师系列作品：QTP示例程序之研究
r @W(J:mX#Um*w177152http://www.boobooke.com/v/bbk159851Testing软件测试网*s O}wKyN/[6s
本集是承接上集，小强老师向刚刚接触QTP的朋友介绍了QTP自带的示例程序-飞机订票系统，别小看这个示例程序，小程序里面有大文章，且听小强老师给你道来， 希望对大家有帮助。
@]k5LX0Z177152[V] 小强老师系列作品：QTP学习指南
8aME^(e8kk"S177152http://www.boobooke.com/v/bbk1515
J7Yp+H;X_ mNKs177152在本集中，小强老师根据自己的经验和体会，向刚刚接触QTP的朋友介绍了如何学习QTP的一些方法和经验，希望对大家有帮助。
6B-c;D#v{;Z5_ I177152[V] 小强老师系列作品：QTP脚本的录制和回放
7d(D$?5b$a[/b177152http://www.boobooke.com/v/bbk1591
*I$~OrTz)L177152在本集中，小强老师向刚刚接触QTP的朋友介绍了QTP最基本的脚本录制回放的功能，希望对大家有帮助。
US2Z%]&IhUF177152[V] 小强老师系列作品：QTP三种录制方式51Testing软件测试网Z`,O%?7}Z|
http://www.boobooke.com/v/bbk1516
5u5t.Z2EL177152这是该系列讲座的第三集。在本集中，小强老师向刚刚接触QTP的朋友介绍了QTP录制脚本的三种模式，希望对大家有帮助。
P{9@3? e^3uSR177152[V] 小强老师系列作品：QTP检查点之研究
.j_@;xA
Qq.Z,XF177152http://www.boobooke.com/v/bbk1595
o#gw3JC{q&SS177152本集是承接上集，小强老师向刚刚接触QTP的朋友介绍了QTP的重要功能 - 检查点，希望对大家有帮助。
c
_'DA8C"y^177152[V] 小强老师系列作品：QTP参数化之研究51Testing软件测试网"},EM0S'c,A)zt
http://www.boobooke.com/v/bbk1599
xUr#q0F'KVv177152本集是承接上集，小强老师向刚刚接触QTP的朋友介绍了QTP重要的功能-参数化， 希望对大家有帮助。51Testing软件测试网 Goh]*nt xF
[V] 小强老师系列作品：QTP的常用工具阐释
/q%gau}[p!r177152http://www.boobooke.com/v/bbk158951Testing软件测试网4^t{
G9` D
在本集中，小强老师向刚刚接触QTP的朋友介绍了QTP附带的常用工具，希望对大家有帮助。
k(`5`?r7C(Q177152[V] 小强老师系列作品：QTP插件分析51Testing软件测试网$E$VsRk)WS9zAIYY
http://www.boobooke.com/v/bbk168951Testing软件测试网%\9l9@"qa
在本集中，小强老师向刚刚接触QTP的朋友介绍了QTP插件的基本知识，希望对大家有帮助。51Testing软件测试网H6W(ND"V_{,boU_
[V] 小强老师系列作品：QTP认证考试试题分析一则51Testing软件测试网%AUAdyB
http://www.boobooke.com/v/bbk1575
k$U| S9C3U|*W177152小强老师针对想入行软件测试行业的菜鸟级别的朋友，推出了零基础学习软件测试系列培训视频。
D5j?J6Qa0ca177152在本集中，小强老师根据自己的经验和体会，向刚刚接触QTP的朋友介绍了如何QTP认证考试的一道典型题目的分析.
_pI2n_`mPs{177152[V] 小强老师系列作品：QTP中VBS介绍
[f?N%\X:grv'Pc e k177152http://www.boobooke.com/v/bbk1621
]'Gi{(V S177152在本集中，小强老师给大家介绍了QTP脚本语言VBS的基本知识，希望大家喜欢。51Testing软件测试网&e-Y5w
a-E_L
[V] 小强老师系列作品：QTP之场景恢复(Recovery Scenarios)
#@o"d*zgz177152http://www.boobooke.com/v/bbk1692
!k,{F'x b aD j-e177152在本集中，小强老师向刚刚接触QTP的朋友介绍了QTP的场景恢复(Recovery Scenarios)的基本知识，希望对大家有帮助。
/m1@Qy/P7Ar(_To!r1o177152[V] 小强老师系列作品：QTP中的虚拟对象入门51Testing软件测试网%WM"J-h F
http://www.boobooke.com/v/bbk1695
.aE8PR Xf"@177152在本集中，小强老师向刚刚接触QTP的朋友介绍了QTP中虚拟对象的基本知识，希望对大家有帮助。51Testing软件测试网6VT~hX2w/K y7OV
[V] 小强老师系列作品：QTP之专家视图和测试脚本开发51Testing软件测试网 s,bTK&S6t+TR
http://www.boobooke.com/v/bbk1690
4y3Y
K*@T:c9` tjb ~v m`177152在本集中，小强老师向刚刚接触QTP的朋友介绍了QTP的专家视图，并介绍了脚本开发的几个重要对象，希望对大家有帮助。
s)J$Rv G)R(a177152[V] 小强老师系列作品：QTP之描述性编程
ut4T-|w"l2O177152http://www.boobooke.com/v/bbk1691
su!j0Tu_'kDE,y177152在本集中，小强老师向刚刚接触QTP的朋友介绍了QTP的描述性编程的基本知识，希望对大家有帮助。51Testing软件测试网)t [ D#R
^5o;r u
[V] 小强老师系列作品：QTP之测试脚本开发规范51Testing软件测试网 IA8P6G/t @4U(M W+ar
http://www.boobooke.com/v/bbk1693
3UOXk`1^177152在本集中，小强老师向刚刚接触QTP的朋友介绍了QTP脚本开发的基本规范，希望对大家有帮助。51Testing软件测试网FH`HN.C
[V] 小强老师系列作品：QTP脚本的增强一则
T [BpK Tg0F177152http://www.boobooke.com/v/bbk159251Testing软件测试网;wJ3h.j
G)C
本集是承接上集，小强老师向刚刚接触QTP的朋友介绍了如何对录制的脚本进行增强，希望对大家有帮助。51Testing软件测试网)my#?.p`x"zX
51Testing软件测试网*]v9t&tHF%?LF
小强作品：QTP之Excel操作
Hc`%nw177152http://www.boobooke.com/v/bbk2835
5oEI'i5vG7A%c17715251Testing软件测试网:Nq S}On/Y
小强作品：QTP之描述性编程实例
)D7R9|vY8`[2Q
W177152http://www.boobooke.com/v/bbk283651Testing软件测试网)E/` ~8\f;Z3RBIg"l
51Testing软件测试网;V!e8X^!m,k!m-q`
小强作品：QTP之DLL
/C {ZP6U(y0y:X)S177152小强老师又出新品，QTP中使用动态库DLL技术，希望大家喜欢！
&TK5p'~I#x177152http://www.boobooke.com/v/bbk2834
|I[@.}-?f+f
Tj177152==============================================================================
uW-GVF0gW&GWs t177152Happy1tiann作品：使用QTP连接数据库
.S3oH DFI#Dy!h,J177152在线观看：http://www.boobooke.com/v/bbk201751Testing软件测试网%M gW,~(z
Happy1tian作品：QTP自动化对象模型51Testing软件测试网+AY/HNX
在线观看：http://www.boobooke.com/v/bbk209851Testing软件测试网pZ0|;^x n,ei
Happy1tian作品：QTP实战示例51Testing软件测试网'M0\Q[%x!vM
在线观看：http://www.boobooke.com/v/bbk2099

转自：http://www.51testing.com/?uid-84226-action-viewspace-itemid-132060

密码输入有两种方式，一种改用Set方法，一种SetSecure方法

用Set方法时直接输入密码就可以了

如果用SetSecure方法，则需要将明文转换为经过加密后的字符串，具体用Crypt对象的Encrypt方法。

比如密码是 mercury，用 Crypt.Encrypt("mercury") 可以得到一个值 "464d059be45f8d524b913574b017ed492a8b8d4b"

转自：http://www.51testing.com/?uid-77806-action-spacelist-type-blog-itemtypeid-1335

转载自caicai1724

美国的软件测试教育网站51Testing软件测试网8G Z*Xr0A!E%FN
http://www.csc.ncsu.edu/faculty/xie/softtestingedu.html51Testing软件测试网F,|*Nm VL1w
51Testing软件测试网aO8C U'lA
http://www.testingeducation.org/

-gL&hU0_ W2DqH0其他51Testing软件测试网1?W5c;_.k

l7Yn,O$\.rb z3UW0http://www.qasoftwaretesting.com/

http://www.onestoptesting.com/51Testing软件测试网3l#S7UHV%cH{

http://www.devbistro.com/articles/Testing/  （推荐）

http://www.soft.com/Institute/HotList/index.html

http://www.softwaretestingwiki.com/doku.php

/cB_Fd'L v0http://www.softwareqatest.com/51Testing软件测试网&q;Pv_W H-` l5}#B

51Testing软件测试网'T3C;\&h"C Y?hM
http://www.aptest.com/resources.html51Testing软件测试网/T'b0~2W!~ ?2^6}*v

RS!UQ(E*M
p6vD:x*]051Testing软件测试网
{
I8W0B zpc;ZF4G
http://www.itpub.net/582806,1.html （国内的论坛，里面的下载资料很多，所以推荐）51Testing软件测试网 F-i)yO)hN:O w

9Jr I%C0xi4Jc0 

国外大学的性能测试课程51Testing软件测试网p7p)H$E-i/N9N1g_O

http://www.cc.gatech.edu/classes/AY2005/cs4803epr_spring/51Testing软件测试网ucC9I#n4ty Ww B

测试论坛

http://www.testing-post.com/testing/

国外的软件测试电子杂志51Testing软件测试网_@f4sJLF1w"Z q

W5TD5H,M0EJ0http://www.stpmag.com/

_+J&` k[4Z y!\0E文文章下载站点51Testing软件测试网9d ks
s7e5Bn(\6rt

http://www.workroom-productions.com/papers.html

[Rf.E$@0http://www.informit.com/articles/index.asp?st=4136851Testing软件测试网{\YJe)v
http://www.informit.com/articles/index.asp?st=4127151Testing软件测试网.Lr JQh3pS`

博客

8o U0IoN:M:i x0http://testertested.blogspot.com/2007/02/there-is-no-four-and-six-in-testing.html

测试用例制定的原则

转载：等价类划分法分析与实践

   作者: okokokk    来源: 51Testing博客

1、Left 函数——返回 Variant (String)，其中包含字符串中从左边算起指定数量的字符。

语法：Left(string, length)

Left 函数的语法有下面的命名参数：
string——必要参数。字符串表达式其中最左边的那些字符将被返回。如果 string 包含 Null，将返            回 Null。 
length——必要参数；为 Variant (Long)。数值表达式，指出将返回多少个字符。如果为 0，返回零长度字符串 ("")。如果大于或等于 string 的字符数，则返回整个字符串。  

2、Mid 函数——从字符串中返回指定数目的字符。       

语法：Mid(string, start[, length])

参数

string ——字符串表达式，从中返回字符。如果 string 包含 Null，则返回 Null。

Start—— string 中被提取的字符部分的开始位置。如果 start 超过了 string 中字符的数目，Mid 将返回零长度字符串 ("")。

Length——要返回的字符数。如果省略或 length 超过文本的字符数（包括 start 处的字符），将返回字符串中从 start 到字符串结束的所有字符。

说明：要判断 string 中字符的数目，可使用 Len 函数。      

下面的示例利用 Mid 函数返回字符串中从第四个字符开始的六个字符：

Dim MyVar

MyVar = Mid("VB脚本is fun!", 4, 6) 'MyVar 包含 "scrīpt"。

注意   MidB 函数与包含在字符串中的字节数据一起使用。其参数不是指定字符数，而是字节数。

3、Len 函数——返回字符串内字符的数目，或是存储一变量所需的字节数。
语法：Len(string | varname)

参数

String——任意有效的字符串表达式。如果 string 参数包含 Null，则返回 Null。

Varname——任意有效的变量名。如果 varname 参数包含 Null，则返回 Null。

说明：下面的示例利用 Len 函数返回字符串中的字符数目：

Dim MyString

MyString = Len("VBscrīpt") 'MyString 包含 8。

注意：   LenB 函数与包含在字符串中的字节数据一起使用。LenB 不是返回字符串中的字符数，而是返回用于代表字符串的字节数。

4、Right 函数——从字符串右边返回指定数目的字符。
语法：Right(string, length)

参数

string ——字符串表达式，其最右边的字符被返回。如果 string 参数中包含 Null，则返回 Null。

Length——数值表达式，指明要返回的字符数目。如果为 0，返回零长度字符串；如果此数大于或等于 string 参数中的所有字符数目，则返回整个字符串。

说明：要确定 string 参数中的字符数目，使用 Len 函数。

下面的示例利用 Right 函数从字符串右边返回指定数目的字符：

Dim AnyString, MyStr

AnyString = "Hello World"      ' 定义字符串。

MyStr = Right(AnyString, 1)    ' 返回 "d"。

MyStr = Right(AnyString, 6)    ' 返回 " World"。

MyStr = Right(AnyString, 20)   ' 返回 "Hello World"。

注意： RightB 函数用于字符串中的字节数据，length 参数指定返回的是字节数目，而不是字符数目。

5、InStr 函数——返回某字符串在另一字符串中第一次出现的位置。
   语法：InStr([start, ]string1, string2[, compare])

参数

Start——可选项。数值表达式，用于设置每次搜索的开始位置。如果省略，将从第一个字符的位置开始搜索。如果 start 包含 Null，则会出现错误。如果已指定 compare，则必须要有 start 参数。

string1——必选项。接受搜索的字符串表达式。

string2——必选项。要搜索的字符串表达式。

compare ——可选项。指示在计算子字符串时使用的比较类型的数值。有关数值，请参阅“设置”部分。如果省略，将执行二进制比较。

设置--compare 参数可以有以下值：常数、值、描述
vbBinaryCompare
 0
 执行二进制比较。
 
vbTextCompare
 1
 执行文本比较。
 

返回值

InStr 函数返回以下值：

如果
 InStr 返回
 
string1 为零长度
 0
 
string1 为 Null
 Null
 
string2 为零长度
 start
 
string2 为 Null
 Null
 
string2 没有找到
 0
 
在 string1 中找到 string2
 找到匹配字符串的位置
 
start > Len(string2)
 0
 

说明

下面的示例利用 InStr 搜索字符串：

Dim SearchString, SearchChar, MyPos

SearchString ="XXpXXpXXPXXP"   ' 要搜索的字符串。

SearchChar = "P"   ' Search for "P".

MyPos = Instr(4, SearchString, SearchChar, 1)   ' 在位置 4 进行的文本比较。返回 6。

MyPos = Instr(1, SearchString, SearchChar, 0)   ' 在位置 1 进行的二进制比较。返回 9。

MyPos = Instr(SearchString, SearchChar)   ' 默认情况下，进行的是二进制比较（省略了最后的参数）。返回 9。

MyPos = Instr(1, SearchString, "W")   ' 在位置 1 进行的二进制比较。返回 0（找不到 "W"）。

注意   InStrB 函数使用包含在字符串中的字节数据，所以 InStrB 返回的不是一个字符串在另一个字符串中第一次出现的字符位置，而是字节位置。

6、LTrim、RTrim与 Trim 函数——返回不带前导空格 (LTrim)、后续空格 (RTrim) 或前导与后续空格 (Trim) 的字符串副本。
语法：LTrim(string)

      RTrim(string)

      Trim(string)

String——参数是任意有效的字符串表达式。如果 string 参数中包含 Null，则返回 Null。

说明：下面的示例利用 LTrim, RTrim, 和 Trim 函数分别用来除去字符串开始的空格、尾部空格、 开始和尾部空格：

Dim MyVar

MyVar = LTrim("   vbscrīpt ")   'MyVar 包含 "vbscrīpt "。

MyVar = RTrim("   vbscrīpt ")   'MyVar 包含 "   vbscrīpt"。

MyVar = Trim("   vbscrīpt ")   'MyVar 包含 "vbscrīpt"。

7、Rnd 函数——返回一个随机数。
语法：Rnd[(number)]

Number——参数可以是任意有效的数值表达式。

说明： Rnd 函数返回一个小于 1 但大于或等于 0 的值。number 的值决定了 Rnd 生成随机数的方式：

如果 number 为Rnd 生成
小于零——每次都相同的值，使用 number 作为种子。

大于零——序列中的下一个随机数。

等于零——最近生成的数。

省略——序列中的下一个随机数。
    因每一次连续调用 Rnd 函数时都用序列中的前一个数作为下一个数的种子，所以对于任何最初给定的种子都会生成相同的数列。

    在调用 Rnd 之前，先使用无参数的 Randomize 语句初始化随机数生成器，该生成器具有基于系统计时器的种子。

    要产生指定范围的随机整数，请使用以下公式：

Int((upperbound - lowerbound + 1) * Rnd + lowerbound)

   这里， upperbound 是此范围的上界，而 lowerbound 是此范围内的下界。

注意   要重复随机数的序列，请在使用数值参数调用 Randomize 之前，立即用负值参数调用 Rnd。使用同样 number 值的 Randomize 不能重复先前的随机数序列。

8、Randomize 语句——初始化随机数生成器。
语法：Randomize [number]

        查看(564) 评论(0) 收藏 分享 管理

4，Split
Returns a zero-based, one-dimensional array containing a specified number of substrings.
　　此函数可以把原来用某个特殊字符串连接起来的字符串分割开，得到一个一维的数组。
5，UBound
Returns the largest available subscrīpt for the indicated dimension of an array.
得到某个维度的最大值。
6，Trim
Returns a copy of a string without leading spaces (LTrim), trailing spaces (RTrim), or both leading and trailing spaces (Trim).

　　如果需要删除字符串左边的所有空格，那么可以使用LTrim  函数；如果需要删除字符串右边的所有空格，那么可以使用RTrim  函数。如果需要删除字符串左边和右边的所有空格，那么可以使用Trim  函数。
7，Ucase
Returns a string that has been converted to uppercase.
　　此函数可以把所有的字符都转换成相应的大写。
8，LCase
Returns a string that has been converted to lowercase.
　　此函数可以把所有的字符都转换成相应的小写。
9，Cstr
Returns an expression that has been converted to a Variant of subtype String.

　　由于VBscrīpt只有一种类型Variant，你可以使用此函数把某个变量强制转换成String类型。
10，CInt
Returns an expression that has been converted to a Variant of subtype Integer.
　　由于VBscrīpt只有一种类型Variant，你可以使用此函数把某个变量强制转换成Integer类型。
　　在描述性编程语句中，最常用的函数有：

11，Create
　　这是创建一类或一个对象时必须要使用的方法。

12，ChildObjects
　　使用此方法可以得到符合某些条件的一类对象的集合。

13，Count
　　使用使用此方法可以得到符合某些条件的一类对象的个数。
The following example uses the Create method to return a Properties collection object named EditDescrīption, and then uses the returned object to instruct QuickTest to enter the text: MyName in the first WebEdit object in the Mercury Tours page with the name UserName.
Set EditDesc = Descrīption.Create()
EditDesc("micclass").Value = "WebEdit"
EditDesc("Name").Value = "userName"

Set Lists = Browser("Welcome: Mercury").Page("Welcome: Mercury").ChildObjects(EditDesc)
NumberOfLists = Lists.Count()
If NumberOfLists > 0 Then
  Browser("Welcome: Mercury").Page("Welcome: Mercury").Lists(0).Set "MyName"
End If
　　一些具体的用法可以在 QTP的帮助里面找到。 个人的建议是：你最好按照 QTP里面提供的例子，自己使用这些函数自己写几行语句，运行后看一下运行结果，结合QTP帮助里面的说明，这样学习会快，也记得牢固。
　　在输出结果时， 常用的函数有 Msgbox 和 Print 函数。Msgbox 函数在 QTP8.2 及其以上版本都可以使用；Print 函数需要在 QTP 9.2 版本上使用，QTP 8.2 不支持此函数，不知道 QTP 9.0是否支持此函数。
　　希望大家共同总结一下，一起进步。

转自：

　在使用QTP测试WEB页面时，经常需要利用测试对象中的Object属性来访问和操作DOM，因此，QTP自动化测试工程师非常有必要掌握一些常用的DOM知识。 下面就列举了一些常用的DOM属性、方法和集合：

　　常用DOM 属性

　　●  className.同一样式规则的元素用相同的类名。可以通过className快速过滤出一组类似的元素。

　　●  document.用于指向包含当前元素的文档对象。

　　●  id.当前元素的标识。如果文档中包含多个相同id的元素，则返回一个数组。

　　●  innerHTML.用于指向当前元素的开始标记和结束标记之间的所有文本和HTML标签。

　　●  innerText.用于指向当前元素的开始标记和结束标记之间的所有文本和HTML标签。

　　●  offsetHeight, offsetWidth.元素的高度和宽度。

　　●  offsetLeft, offsetTop.当前元素相同对于父亲元素的左边位置和顶部位置。

　　●  outerHTML.当前元素的开始标记和结束标记之间的所有文本和HTML标签。

　　●  outerText.当前元素的开始标记和结束标记之间的所有文本，但不包括HTML标签。

　　●  parentElement.当前元素的父亲元素。

　　●  sourceIndex.元素在document.all集合中的索引（index）。

　　●  style.元素的样式表单属性。

　　●  tagName.当前元素的标签名。

　　●  title.在IE中，代表元素的tool tip文本。

　　常用DOM 方法

　　●  click().模拟用户对当前元素的鼠标点击。

　　●  contains(element).用于判断当前元素是否包含指定的元素。

　　●  getAttribute(attributeName, caseSensitive).返回当前元素所包含的某个属性，参数attributeName为属性名、caseSensitive表示是否大小写敏感。

　　●  setAttribute(attributeName, value, caseSenstive). 设置当前元素的属性。

　　常用DOM 集合

　　●  All[].当前元素中包含的所有HTML元素的数组。

　　●  children[].当前元素包含的孩子元素。

超过 600 本的免费电脑技术书籍

通过 digg 找到的这个网页，收集了 600 本以上的免费电脑技术书籍网址，内容包括图像处理，黑客技术，编程知识，资格认证教程，设计，Linux，网络技术，等等，内容相当丰富。经确认，其中一些书籍，链接已经失效，不过网页上有说明：“请报告死链接至 zikri [at] ITB.ac.id。”
G/l9e[x  

非常丰富的资源
>?/b46rG8  
http://zikri.indoglobal.com/books.html

转贴自：Taker2001

QuickTest 测试流程包括 7 个主要阶段：

B/S结构，即Browser/Server(浏览器/服务器)结构，是随着Internet技术的兴起，对C/S结构的一种变化或者改进的结构。在这种结构下，用户界面完全通过WWW浏览器实现，一部分事务逻辑在前端实现，但是主要事务逻辑在服务器端实现，形成所谓3-tier结构。B/S结构，主要是利用了不断成熟的WWW浏览器技术，结合浏览器的多种scrīpt语言(VBscrīpt、Javascrīpt…)和ActiveX技术，用通用浏览器就实现了原来需要复杂专用软件才能实现的强大功能，并节约了开发成本，是一种全新的软件系统构造技术。随着Windows 98/Windows 2000将浏览器技术植入操作系统内部，这种结构更成为当今应用软件的首选体系结构。显然B/S结构应用程序相对于传统的C/S结构应用程序将是巨大的进步。

C/S 与 B/S 区别：
　　Client/Server一般是建立在局域网的基础上的.Browser/Server是建立在广域网的基础上的.
１．硬件环境不同:
　　C/S 一般建立在专用的网络上, 小范围里的网络环境, 局域网之间再通过专门服务器提供连接和数据交换服务.
　　B/S 建立在广域网之上的, 不必是专门的网络硬件环境,例与电话上网, 租用设备. 信息自己管理. 有比C/S更强的适应范围, 一般只要有操作系统和浏览器就行
２．对安全要求不同
　　C/S 一般面向相对固定的用户群, 对信息安全的控制能力很强. 一般高度机密的信息系统采用C/S 结构适宜. 可以通过B/S发布部分可公开信息.
　　B/S 建立在广域网之上, 对安全的控制能力相对弱, 面向是不可知的用户群.
３．对程序架构不同
　　C/S 程序可以更加注重流程, 可以对权限多层次校验, 对系统运行速度可以较少考虑.
　　B/S 对安全以及访问速度的多重的考虑, 建立在需要更加优化的基础之上. 比C/S有更高的要求 B/S结构的程序架构是发展的趋势, 从MS的.Net系列的BizTalk 2000 Exchange 2000等, 全面支持网络的构件搭建的系统. SUN 和IBM推的JavaBean 构件技术等,使 B/S更加成熟.
４．软件重用不同
　　C/S 程序可以不可避免的整体性考虑, 构件的重用性不如在B/S要求下的构件的重用性好.
　　B/S 对的多重结构,要求构件相对独立的功能. 能够相对较好的重用.就入买来的餐桌可以再利用,而不是做在墙上的石头桌子
５．系统维护不同
系统维护是软件生存周期中,开销大, -------重要
　　C/S 程序由于整体性, 必须整体考察, 处理出现的问题以及系统升级. 升级难. 可能是再做一个全新的系统
　　B/S 构件组成,方面构件个别的更换,实现系统的无缝升级. 系统维护开销减到最小.用户从网上自己下载安装就可以实现升级.
６．处理问题不同
　　C/S 程序可以处理用户面固定, 并且在相同区域, 安全要求高需求, 与操作系统相关. 应该都是相同的系统
　　B/S 建立在广域网上, 面向不同的用户群, 分散地域, 这是C/S无法作到的. 与操作系统平台关系最小.
７．用户接口不同
　　C/S 多是建立的Window平台上,表现方法有限,对程序员普遍要求较高
　　B/S 建立在浏览器上, 有更加丰富和生动的表现方式与用户交流. 并且大部分难度减低,减低开发成本.
８．信息流不同
　　C/S 程序一般是典型的中央集权的机械式处理, 交互性相对低
　　B/S 信息流向可变化, B-B B-C B-G等信息、流向的变化, 更象交易中心 　

比如一些聊天软件，是c/s结构的因为满足这种软件的可维护和升级性，满足不同的人群的个性和喜好，自己制定自己的界面，安装自己喜欢的插件，但在b/s结构上实现这一点比较困难，并且可扩展性也不好。

比如说很多人每天上新浪网，只要安装了浏览器就可以了，并不需要了解新浪的服务器用的是什么操作系统，而事实上大部分网站确实没有使用windows操作系统，但用户的电脑本身安装的大部分是windows操作系统
软件系统的改进和升级越来越频繁，B/S架构的产品明显体现的更方便的特性。无论用户的规模有多大，有多少分支机构都不会增加任何维护升级的工作量，所有的操作只需要针对服务器进行，如果是异地只需要把服务器连接上网即可立即进行维护和升级，这对人力、时间、费用的节省是相当惊人的。
一个稍微大一点单位来说，系统管理人员如果需要在几百甚至几千部电脑之间来回奔跑，效率和工作量是可想而知的，但B/S架构的软件只需要管理服务器就行了，所有的客户端只是浏览器，根本不需要做任何的维护。所以客户机越来越"瘦"而服务器越来越"胖"是将来软件的主流发展方向，这使得升级和维护越来越容易而使用越来越简单。

link:http://www.51testing.com/?207050/action_viewspace_itemid_94773.html