Página 1 de 1

No lanza CreateObject()

Publicado: Jue Mar 16, 2023 7:34 pm
por XeviCOMAS
Me encuentro con un problemilla...
Dado este código, que se lanza correctamente...

Código: Seleccionar todo

	WITH OBJECT CreateObject( "MSXML2.XMLHTTP.6.0" )
	:Open( "GET", "http://" +AppData:cXCM_DynDNS+ ":81/SMSMensario?" + cTextSend, .F. )
	:Send()

        LogDebug( :ResponseText )
   END
Este es un proceso que me devuelve el saldo de mensajes, en otro proceso casi igual, el cTextSend cambia poruq ele envio un mensaje. Pero al volver a solicitar el saldo, como esa petición ya la ha hecho una vez, no llega a hacer la solicitud.

Resulta que si el texto 'cTextSend' es el mismo a enviar, no llega a lanzarse el :Open().
Es como que lo ha hecho una vez, la segunda vez que lo lanzo, me devuelve el mismo resultado, cuando de evaluarse no devolvería el mismo.

¿Hay alguna manera de "forzar" a lanzar el :Open() caiga quien caiga... o 'limpiar' el buffer del objeto MSXML2.XMLHTTP.6.0 ???

Me trae de cabeza!!!


Gracias por vuestro tiempo.