不要追求绝对的公平,红尘之中没有公平而言,人活一世,难得糊涂。
it is no use doing what you like, you have got to like what you do.
QTP连接QC的代码
上一篇 /
下一篇 2009-06-09 20:55:38
/ 个人分类:自动化测试
关于
QTP连接QC的代码
!t8wNVK'd051Testing软件测试网!jn{ P2?i)W;B;t T!E我们在编写QTP脚本的时候,为了某种需求需要去连接QC,进行一些操作
51Testing软件测试网VX5Csn$pqO9n)bJ'@0U?w0{0这里是调试通过的代码。
&U;fiXcc5|@+^0这部分代码是已经封装好了的。保存成一个VBS文件就可以利用了
#m\SuB0T2_ VN(N b'K$B0下面就来解释下 各句的具体含义。
k-| B9h
GTnmgD0
J/X~'aiP0I3l0'连接QC
4w1I1LH/mAj0HP+E;_6[j
?0//封装成函数(_)ZjG5M3h
x/J:u0Public Function TDConnection()
51Testing软件测试网5N(s
u{Hv51Testing软件测试网0\%`1h"qy&Q"c//定义一个对象s|3L(VB.f$}0Dim TDConnection
51Testing软件测试网-DA+E
We7_51Testing软件测试网TQF*Ydc1}?$fZ9i$I$f
//创建一个连接对象c[1sUa`([Df`0Set TDConnection = CreateObject("
TDApiole80.TDConnection")
5Oa0LG F;VB2R0u*KNF8Kx)@/x0//使用连接QC的连接对象的一个方法 参数是输入你的QC地址)QUK4vlT|o JW0TDConnection.InitConnectionEx "http://IP地址:host/qcbin/"
51Testing软件测试网.L];t.sZ51Testing软件测试网X_f"N7]F5Xg'\R//使用连接对象的登录函数 输入用户名 和密码*S9ua1~
{1g'g%o1W/[d0TDConnection.Login "用户名","密码"
#~2X&T gb01l!@(fM#oN;N7^E0//使用连接对象的连接方法 连接到域下的项目空间W?c9L!znh*H0K b0TDConnection.Connect "域名","项目空间名称"
W9B6w/i,R.|!d6aL0/N|!@/R o9N7~0//验证是否连接成功7m/OF,Xe8R'F0If TDConnection.Connected Then
r0ll8wR_m'F?f0VD%r~MlWs:X0 MsgBox("Connected to " + chr (13) + "Server " + TDConnection.ServerName+ chr (13) +"Project " + TDConnection.ProjectName )
51Testing软件测试网g%p4Q^8NO51Testing软件测试网TF)y I U-H^:s"e Else
51Testing软件测试网rK-T
N @%MCG-aMsgBox("Not Connected")
51Testing软件测试网Ak7N8{;_ LI k
H$C%F(eb?,b0End If
51Testing软件测试网%_5t]*A;x&?51Testing软件测试网 Vz mw%zf-jAn-\Pqsh0S:g051Testing软件测试网Hg.cv
L w$fl m///////////////////////////////////////////////////////////////////
2^J [/~aScT)F*M#NP0Set TDConnection = CreateObject("
TDApiole80.TDConnection")
${h$g#e8E?0@Y
eV }3Ozp8T/K0这句很多人 没有写80端口就会报错:
A%L%p h+p2U051Testing软件测试网Mr+j8z*VF:O///////////////////////////////////////////////////////////////////
51Testing软件测试网0{1t0AP,v9b KO
?51Testing软件测试网(y9FI#Bm9|4C8Ep注意:
/Dv7lO-b8u4f+p
M051Testing软件测试网#QvqN2b-q 使用这个之前必须要先安装TDConnection插件哦
51Testing软件测试网m,v NZ2R2r.Gj+y*q+J.H_x|0 地址就是:http://IP地址:host/qcbin/这个页面上 插件**
51Testing软件测试网] ]t n
YMz[r///////////////////////////////////////////////////////////////////
dfv"z"{Ay0;O jzy/Cg]/S}0f]?{"|GK%j0
相关阅读:
- UI自动化测试与软件测试开发工程师所面临的挑战 (fishy, 2009-6-01)
- 软件开发中的自动化测试 (51testing, 2009-6-02)
- QTP实例:使用JS操作ActiveX控件 (fishy, 2009-6-03)
- 自动化测试的一些好的网站 (Spark.lee, 2009-6-03)
- 实施自动化测试的六个目标和意义 (51testing, 2009-6-04)
- 对QTP自动化测试框架的一点认识 (fishy, 2009-6-05)
- 演进并非革命——小谈自动化测试 (fishy, 2009-6-08)
- 自动化测试开发小案例 (fishy, 2009-6-08)
- 浅谈QTP描述性编程(含实例) (fishy, 2009-6-08)
- QTP日期控件识别与参数化 (fishy, 2009-6-09)
收藏
举报
TAG:
自动化测试