"qtp.launch" throwing "class not registered" error

[auto_tester]

Hello,

I have an external VB script which opens qtp and run a test.
Below is my external script.

Code:

Set App = CreateObject("QuickTest.Application")
App.Launch
App.Visible = True
App.WindowState = "Maximized"' Maximize the QuickTest window
App.ActivateView "ExpertView"' Display the Expert View
App.open "C:\Users\My_Name\Documents\UFT\My Projects\Framework Project\Driver_Script", False
App.Test.Run
App.Test.Close
App.quit
Set App = Nothing

I am getting below error while running the script.

Script : Desktop\qtp.vbs
Line : 2
Char : 1
Error : Class not registered(Exception from HRESULT : 0x80040154 (REGDB_E_CLASSNOTREG))
Code : 80040154
Source : mscorlib

I am confused how to proceed on this.
Please help.

Thanks