| || |
If you have TP installed there is always a program called ‘COMSpy’ there. Until now I have not found out what COMSpy does.
Any hints are appreciated
Re: COMSpy ?
If you Start ComSpy before TestPartner and your application (That uses local COM objects) you will be able to detect the instance of the COM object and get an Attach name for it. After ComSpy and TestPartner are started open the Identify Tool. In the Domain Drop down, choose COM. If any COM objects are detected, they will show an Attach name under the respected application. Once you have an Attach name for the COM object you can use TestPartner as a "harness" and test it using/passing its methods and properties.
dim myComObject as TCOMObject
set myComObject = Testpartner.ComObject("Name in Identify Tool")
if myComObject.object.returnValue <> "6" then
Testpartner.usercheck("valuecheck", 0, "The check failed because " & myComObject.object.returnValue & " was not equal to 6 "