转到正文

宁静海

发现,理解,提升

存档

分类: QTP

原文

1.更新 mic.ini 文件:
路径 <QTP安装目录>\\bin\\mic.ini
找到 [RemoteAgent]这部分
修改以下值

 

HandleLongTrans=1

重起电脑

2.删除nt_tr.exe服务

 

命令行模式下。 [开始> 运行 > cmd]

 

cd C:\\Program Files\\HP\\QuickTest Professional\\binnt_tr.exe -remove

弹出对话框删除成功
重起电脑

 

 

 

Public Function IsExsitTab(tabControlH, tabHeadStr) As Boolean
    tabCount = tabControlH.Object.TabPages.Count
    For i = 0 to tabCount - 1
        Set currentTabPage = tabControlH.Object.TabPages.Item(i)
        tabHead = currentTabPage.Text
        If tabHead = tabHeadStr Then
            IsExsitTab = True
            Exit Function
        End If
    Next
    IsExsitTab = False
End Function

 

关联

 QTP 根据Head名选择DevExpress的Tab