python连接ALM

VBS脚本：

Public Function makeConnection(ByVal qcHostName$, qcDomain$, qcProject$, _ qcUser$, qcPassword$, Optional qcPort) As Boolean

'------------------------------------------------------------------------ ' This routine makes the connection to the gobal TDConnection object ' (declared at the project level as Global tdc as TDConnection) ' and connects the user to the specified project. '----------------------------------------------------------------------- Dim qcServer As String Const fName = "makeConnection" 'For error message

On Error GoTo makeConnectionErr errmsg = ""

' Construct server argument using format: ' "http://server:port/qcbin" qcServer = "http://" & qcHostName

If Not (IsMissing(qcPort)) Then If Len(qcPort) > 0 Then qcServer = qcServer & ":" & qcPort End If

qcServer = qcServer & "/qcbin"

' Check status (for demonstration purposes only). ' MsgBox tdc.LoggedIn 'Error: OTA Server is not connected ' MsgBox tdc.Connected 'False ' MsgBox tdc.ServerName 'Blank string

' Create the connection. errmsg = "Failed to create TDConnection" If (tdc Is Nothing) Then Set tdc = New TDConnection If (tdc Is Nothing) Then GoTo makeConnectionErr errmsg = ""

' Check status ' On Error Resume Next ' Debug.Print "Initial Status: " ' Debug.Print "LoggedIn", """" & tdc.LoggedIn & """" ' Debug.Print "LoggedIn Error", err.Description ' Debug.Print "Connected", """" & tdc.Connected & """" ' Debug.Print "ServerName", """" & tdc.ServerName & """" ' Debug.Print "ProjectName", """" & tdc.ProjectName & """" ' Debug.Print "ProjectName Error", err.Description ' Debug.Print "ProjectConnected", """" & tdc.ProjectConnected & """" ' Debug.Print "ProjectConnected Error", err.Description ' Debug.Print ' On Error GoTo makeConnectionErr ' ' Initial Status: ' LoggedIn Error OTA server is not connected. ' Connected "False" ' ServerName "" ' ProjectName Error OTA server is not connected. ' ProjectConnected Error OTA server is not connected.

tdc.InitConnectionEx qcServer ' Check status. ' On Error Resume Next ' Debug.Print "After InitConnectionEx: " ' Debug.Print "LoggedIn", """" & tdc.LoggedIn & """" ' Debug.Print "Connected", """" & tdc.Connected & """" ' Debug.Print "ServerName", """" & tdc.ServerName & """" ' Debug.Print "ProjectName", """" & tdc.ProjectName & """" ' Debug.Print "ProjectConnected", """" & tdc.ProjectConnected & """" ' Debug.Print ' On Error GoTo makeConnectionErr '' '' After InitConnectionEx: ' LoggedIn "False" ' Connected "True" ' ServerName "http://server06/qcbin/wcomsrv.dll" ' ProjectName "" ' ProjectConnected "False"

' Log on to server. tdc.Login qcUser, qcPassword

' Check status. ' Debug.Print "After Login: " ' Debug.Print "LoggedIn", """" & tdc.LoggedIn & """" ' Debug.Print "Connected", """" & tdc.Connected & """" ' Debug.Print "ServerName", """" & tdc.ServerName & """" ' Debug.Print "ProjectName", """" & tdc.ProjectName & """" ' Debug.Print "ProjectConnected", """" & tdc.ProjectConnected & """" ' Debug.Print ' After Login: ' LoggedIn "True" ' Connected "True" ' ServerName "http://server06/qcbin/wcomsrv.dll" ' ProjectName "" ' ProjectConnected "False"

' Connect to the project and user. tdc.Connect qcDomain, qcProject

' Exit status. ' Debug.Print "After Connect: " ' Debug.Print "LoggedIn", """" & tdc.LoggedIn & """" ' Debug.Print "Connected", """" & tdc.Connected & """" ' Debug.Print "ServerName", """" & tdc.ServerName & """" ' Debug.Print "ProjectName", """" & tdc.ProjectName & """" ' Debug.Print "ProjectConnected", """" & tdc.ProjectConnected & """" ' Debug.Print ' ' After Connect: ' LoggedIn "True" ' Connected "True" ' ServerName "http://server06/qcbin/wcomsrv.dll" ' ProjectName "ota_doc" ' ProjectConnected "True"

makeConnection = True Exit Function

makeConnectionErr: makeConnection = False ErrHandler err, fName, err.Description & vbCrLf & errmsg

End Function

Python脚本：

def makeConnect(self):
from win32com.client import Dispatch
tdc = Dispatch("TDApiOle80.TDConnection")
tdc.InitConnection(self.info['qcServer']) #ALM服务器名，如：http://192.168.1.10:8080/qcbin
tdc.Login(self.info['qcUser'],self.info['qcPassword']) #用户名，密码
tdc.Connect(self.info['qcDomain'],self.info['qcProject']) #域，项目
print tdc.Connected #如果已连接，则为True，还有其它属性，请参考VBS脚本

return tdc

python连接ALM相关推荐

python链接mysql 判断是否成功_【初学python】使用python连接mysql数据查询结果并显示...
因为测试工作经常需要与后台数据库进行数据比较和统计,所以采用python编写连接数据库脚本方便测试,提高工作效率,脚本如下(python连接mysql需要引入第三方库MySQLdb,百度下载安装) # ...
python连接oracle数据库_Python连接oracle数据库例子一
step1:下载cx_Oracle模块,cmd--pip install cx_Oracle step2: 1 import cx_Oracle #引用模块cx_Oracle 2 conn=cx_Or ...
简单介绍python连接telnet和ssh的两种方式
本文主要介绍了python连接telnet和ssh的两种方式,文中通过示例代码介绍的非常详细,具有一定的参考价值,感兴趣的小伙伴们可以参考一下 Telnet 连接方式 #!/usr/bin/env p ...
python连接MySQL并进行数据查询
python连接MySQL并进行数据查询 #建立数据库的连接 mydb = mysql.connector.connect(host="0.0.0.0",user="ro ...
python连接access数据库查询并打印出来_Python连接Access和读取Access数据库的例子
其实这个Python连接Access和读取Access数据库的例子是写给自己看的,网上已经有Python读取Access的例子了,我这个也是参考以上制作的. 而这个例子应该是只能在windows使用吧 ...
python连接sqlite数据库的代码_【Python 连接SQLite数据库文件】
涉及: Python连接db文件如何按照列名获取数据如何传入参数示例代码如下: # encoding=utf-8 import sqlite3 def get_signal_names(db_f ...
python连接elasticsearch查询数据
python连接elasticsearch获取数据原文:https://blog.csdn.net/ziqiaowang/article/details/54972279 # -*- encodin ...
mac版python连接mysql_Mac下Python连接MySQL · BlBana’s BlackHouse
Mac和Windows下安装mysqlclient坑点记录 Python连接MySQL(mysqlclient) Python连接MySQL类库pymysql python3:mysqlclient, ...
python连接mysql数据库数据库_python如何连接mysql数据库
先花点时间来说说一个程序怎么和数据库进行交互 1.和数据库建立连接 2.执行sql语句,接收返回值 3.关闭数据库连接使用MySQLdb也要遵循上面的几步.让我们一步步的进行. 1.MySQL数据库 ...

python连接ALM

python连接ALM相关推荐

最新文章

热门文章