Solved Trying to automatically place a telephone call

[JohnPapa]

I am trying to automatically place a telephone call from within Access13.

If I place the following URL (used in the sub), the call is placed
"http://admin:q0FBzy4G4M@192.168.90.23/command.htm?number=99407373&outgoing_uri=URI"

I get the error message indicated in the attachment. A similar code for incoming calls are identified by A13. I can show this code if it would help.

Private Sub imgOut_Click()
Dim xhr As Object
Dim webServiceURL As String
Dim actionType As String
Dim thisRequest As String
Dim targetWord As String
 


'Dim strURL As String
'strURL = funGetStrOut()


webServiceURL = "http://admin:q0FBzy4G4M@192.168.90.23/command.htm?number=99407373&outgoing_uri=URI"               'strURL


thisRequest = webServiceURL


'use late binding
Set xhr = CreateObject("Microsoft.XMLHTTP")


xhr.Open "GET", thisRequest, False
xhr.Send


If xhr.Status = 200 Then
  Debug.Print xhr.responseText
  MsgBox xhr.getAllResponseHeaders
Else
  MsgBox xhr.Status & ": " & xhr.statusText
End If


    
End Sub

 

[Gasman]

I thought I had deja vu there.
Why have you started a new thread about this?

Error when calling a URL

I use the A13 runtime to run my software on a client's pcs and it is not easy to debug. I am calling a URL from my software and this call would communicate with the telephony system and do a dial. When I run my code I get, "The expression On Click you entered as the property setting...

www.access-programmers.co.uk

 

[JohnPapa]

I did not remember this. Thanks Gasman and apologies. Should I continue the old thread?

 

[Gasman]

I would, as you have a few replies there already?

 

[JohnPapa]

I switched to the existing thread.