Related pages:
Dim QCConnection
Set QCConnection = CreateObject("TDApiOle80.TDConnection")
MsgBox("Connect to QC Server")
QCConnection.InitConnectionEx "http://localhost:8080/qcbin"
MsgBox("Connection Established.")
QCConnection.login "sa", "123456789012"
MsgBox("Login Authenticated.")