'功能：提交bug資訊到qc中
'函式引數：url代表連線qc的url（例如http://localhost:8080/qcbin),projectname代表需要執行'qc
'連線的工程名稱，username代表qc的使用者名稱，password代表連線qc的使用者的密碼，buginfo代
'表連線qc後提交的bug資訊，陣列型別,陣列中第乙個代表bug的狀態，第二個代表bug的主題，
'第****bug的優先順序，第四個代表bug需要指派給的人，第五個代表bug的發現人
function connectqc(url,projectname,username,password,buginfo())
'宣告qc物件
dim tdconnection
set tdconnection = createobject("tdapiole.tdconnection")
tdconnection.initconnection url' url for the db
tdconnection.connectproject projectname,username,password ' valid login information '登陸qc的工程名，使用者和密碼
'獲得登陸後的操作
if tdconnection.connected then
msgbox("connected to " + chr (13) + "server " + tdconnection.servername _
+ chr (13) +"project " + tdconnection.projectname )
else
msgbox("not connected")
endif
'get the ibugfactory 得到建立bug的物件
set bugfactory = tdconnection.bugfactory
'add a new empty bug
set bug = bugfactory.additem (nothing)
'fill the bug with relevant parameters
'提交bug的相關資訊
buginfo=new array(5)
bug.status = buginfo(0)
bug.summary = buginfo(1)
bug.priority = buginfo(2) ' depends on the db
bug.assignedto = buginfo(3) ' user that must exist in the db's users list
bug.detectedby = buginfo(4) ' user that must exist in the db's users list
'post the bug to database (commit)
bug.post
QTP的那些事 有關datatable物件的使用
注意我們在使用datatable的時候,如果採用的指令碼驅動的方式,那麼獲取行數的時候要注意了.一般有的人會採用datatable.getrowcount方法直接獲取行數，也認為可以獲取到當前的sheet的行數，實際則不然。實際是，上面的方法獲取的是globalsheet中的行數，而對於我們想要獲取...
QTP的那些事 判斷程序是否存在
如下，以判斷ie程序是否存在為例 on error resume next set y getobject winmgmts root cimv2 set ws createobject wscript.shell set x y.execquery select from win32 proces...
QTP的那些事 XPath的重要使用
開始的時候以為selenium比較的好，畢竟是開源的。有眾多的人的後台支援。但是後來發現它的好處在於它的物件的識別是通過xpath的方式，但是qtp現在也是支援xpath了，這個無疑是重要的乙個地方。對於不論頁面的元素如何的動態展示，如何的動態出現，我們都可以通過xpath來準備的定位到該物件，使用...