Run-time error '-2147024770 (8007007e)': Automation error The specified module could not be found in vba

[Muktha]

Hello ,

when i execute the below VBA , run time error is displayed , Kindly help me with it

Sub Connection()
Dim objQCConnection
Set objQCConnection = CreateObject("TDApiOle80.TDConnection")

Dim sUserName, sPassword
sUserName = "Username"
sPassword = "Password"

objQCConnection.InitConnectionEx "https://url/qcbin/"
objQCConnection.Login "Username", "Password"

If (objQCConnection.LoggedIn <> True) Then
MsgBox "QC User Authentication Failed"
WScript.Quit
End If

 

[6StringJazzer]

For starters there is no object WScript declared or set. That does not explain the error you have but it means we cannot reproduce it.