hola a to2.
vereis me ocurre el siguiente problema y no consigo saber el porque sucede esto.
tengo el siguiente codigo:
Código:
function Enviar(numtelf)
' Create the xml object
Set GetConnection = CreateObject("Microsoft.XMLHTTP")
GotothisURL="<A href="http://111.23.45.677/cgi-local/envia.cgi?login="&UserSMS&"&password="&PasswordSMS&"&numero="&numtelf&"&msg="&MsgSMS">" Conect to specified URL
GetConnection.Open "get", GotothisURL, False
GetConnection.Send
' ResponsePage is the response we will get when visiting GotothisURL
ResponsePage = GetConnection.responseText
' We will write
if RegExpTest("SE HA ENVIADO",ResponsePage) = true then 'OK
response.write " Enviado correctamente. : "&numtelf&"<br>"
Enviar= true
else
response.write " No se ha enviado : "&numtelf&"<br>"
Enviar = false
end if
Set GetConnection = Nothing
end function
mi problema es que de forma aleatoria y sin yo cambiar nada me dá el siguiente error:
error : 80004005 Unspecified error
el error me da en la linea GetConnection.Send
alguien puede decirme a que se debe dicho error?
gracias