Sign in to follow this  
Followers 0
Ningam

Update Quality Center with API

1 post in this topic

Hello all,

I am trying to update a status in HP Quality Center trought an API with AutoIt.

I understood that is possible with the "BugFactory", but I miss documentation to complete my script.

Thanks in advance for any help.

Regards,

;-------------------------------------------------------------------------------------------------------

;My current script (seems working fine, but I can not find how to update a case).

;-------------------------------------------------------------------------------------------------------

Func TestAPI()

$ObjName = RegRead("HKEY_CLASSES_ROOT\TDApiOle80.TDConnection\CurVer", "")

if $ObjName = "" Then

MsgBox(270384,"","QC not found")

Exit

EndIf

$HostName = "http://quality-center.fr:80/qcbin/"

$Domain = "ERP"

$Project = "01-Portefeuille"

$UserID = "My_User"

$PassWd = "My password"

$objOTAapi = ObjCreate($ObjName)

$objOTAapi.InitConnectionEx($HostName)

$objOTAapi.Login($UserID,$PassWd)

$LoginVal = $objOTAapi.LoggedIn

If $LoginVal <> True Then

MsgBox(0, "", "Login Failed")

Exit

EndIf

$objOTAapi.Connect($Domain, $Project)

$ProjectVal = $objOTAapi.Connected

;~ Get bug factory

$bfact = $objOTAapi.BugFactory

;Test bugfactory connection

$FieldList = $bfact.Fields

$bugfilter = $FieldList.count

MsgBox(0, "", $FieldList.Count)

$objOTAapi.DisconnectProject()

$objOTAapi.ReleaseConnection()

EndFunc

Share this post


Link to post
Share on other sites



Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!


Register a new account

Sign in

Already have an account? Sign in here.


Sign In Now
Sign in to follow this  
Followers 0