QC导出到excel文件所使用的插件 正式版
投诉建议：
千万流量共享 百度高权重排名
软件大小： 2.3M
软件厂商：
软件语言： 英语
软件授权： 免费
软件评级：
应用平台：WinAll
更新时间：
编辑推荐：
QC导出到excel文件所使用的插件，欢迎大家下载，导出缺陷、用例所必须 从QC里导出测试用例到EXCEL的办法及导出乱码的解决办法相信有很多同学会要用这个功能。这个方法无法导出测试用例的层级，也无法导出测试用例的步骤，只能导出视图上已有字段内容。 1、进入测试计划，点击视图-&测试网格2、填写筛选条件，选出你要的测试用例3、如要全部导出，右键点击一条测试用例选导出-&全部，输入文件名，默认.xls文件 保存即可 如要部分导出，用ctrl或shift选中你要导出的用例，右键点击一条选中的tc选导出-&选定，输入文件名，默认.xls文件 保存即可 这时候，查看导出的excel，貌似大部分会是乱码。解决方法如下：在上述第三步时，输入文件名后，保存类型选择为 .html文件，保存好后再用excel打开即可解决乱码问题。
读取QC中的bug列表输出到Excel报表中把qc服务器上bug输出到本地excel表中，利用Quality Center Open test Architecture API -OTA COM 9.0编写脚本代码读取服务器上bug列表，以下代码在vb中编写，调试通过。 注意：The OTAClient.dll (OTA COM 9.0 Type Library) 从服务器上下载后保存在你本机文件夹\Program Files\Common Files\Mercury Interactive\Quality Center下。代码：
Dim QCConnection As TDConnection Dim BugFactory As BugFactory
Dim BugList Dim Bug As Bug Dim Row As Integer Dim Excel, Sheet
On Error GoTo makeConnectionErr
If (QCConnection Is Nothing) Then Set QCConnection = New TDAPIOLELib.TDConnection End If
If (QCConnection Is Nothing) Then GoTo makeConnectionErr
QCConnection.InitConnectionEx &http://192.168.1.180:8080/qcbin& QCConnection.Login &pcl&, && 'DEFAULT = Domain, QualityCenter_Demo = Project QCConnection.Connect &深圳博为峰信息技术有限公司&, &mis&
If QCConnection.Connected = True Then
Debug.Print &Connection Success&
If QCConnection.LoggedIn = True Then Debug.Print &Logedin& If QCConnection.ProjectName && &mis& Then
If QCConnection.ProjectConnected = True Then Debug.Print &ok& End If End If End If
Else MsgBox &Connection Failed& End If
'Check status.
Set BugFactory = QCConnection.BugFactory Set BugList = BugFactory.NewList(&&)
Set Excel = CreateObject(&Excel.Application&) Excel.WorkBooks.Add Set Sheet = Excel.ActiveSheet Row = 1 Sheet.Cells(Row, 1).Value = &BG_BUG_ID& Sheet.Cells(Row, 2).Value = &Summary& Sheet.Cells(Row, 3).Value = &DetectedBy& Sheet.Cells(Row, 4).Value = &Priority& Sheet.Cells(Row, 5).Value = &Status& Sheet.Cells(Row, 6).Value = &AssignedTo&
Row = 2 For Each Bug In BugList Sheet.Cells(Row, 1).Value = Bug.Field(&BG_BUG_ID&) Sheet.Cells(Row, 2).Value = Bug.Summary Sheet.Cells(Row, 3).Value = Bug.DetectedBy Sheet.Cells(Row, 4).Value = Bug.Priority Sheet.Cells(Row, 5).Value = Bug.Status Sheet.Cells(Row, 6).Value = Bug.AssignedTo Row = Row + 1 Next Excel.ActiveWorkbook.SaveAs (&c:\QualityCenter_DEFECTS.xls&) Excel.Quit Set Excel = Nothing Set BugList = Nothing
QCConnection.ReleaseConnection Set QCConnection = NothingmakeConnectionErr: Debug.Print Err, fName, Err.Descrīption & vbCrLf & errmsg软件截图1
368.0KB|983.0KB|11MB|38MB|12MB|18MB|
聚超值推荐
今日更新推荐
软件分类目录
同类软件下载排行
热门关键词
为您推荐：