Cannot launch UFT from VB script on Win 8

Document ID:KM00728975
Creation Date:24-Jan-2014
Modified Date:11-Mar-2014
- Micro Focus Products:
  quicktest professional 11.50
  
  quicktest professional 11.51
  
  quicktest professional 11.52
  
  unified functional testing 11.50
  
  unified functional testing 11.51
  
  unified functional testing 11.52
  
  unified functional testing 11.53

Summary

On Win 8, if UFT was set to "Run as Administrator", AOM scripts are not able to invoke UFT.

Error

On Win 7 or previous version of Windows, the VB script below an be used to invoke QTP/UFT

Dim qtApp
Dim qtTest
Dim qtResultsOpt
Dim qtAutoExportResultsOpts
Set qtApp = CreateObject("QuickTest.Application")
qtApp.Launch ' Start UFT
qtApp.Visible = True

However, on Win 8, if UFT was set to "Run as Administrator" under "Properties" - "Compatibility", the error below will prompt out:

Error: Unspecified error

Code: 80004005

Source: (null)

It indicates that the line of "Set qtApp = CreateObject("QuickTest.Application")" causes the error.

Cause

DCOM is not set properly.

Fix

The steps below will fix the issue:

1. Run "dcomcnfg.exe".

2. Select "Component Services" - "Computers" - "My Computer" - "DCOM Config".

3. Select "QuickTest Professional Automation".

4. Right click and select "Properties".

5. In the properties dialog box, switch to "Identify" tab

6. Select "The launching user" instead of "The interactive user"

Run the script again, and the issue should be resolved.