RESPONDER UNA PREGUNTA

Si para responder la pregunta, crees necesario enviar un archivo adjunto, puedes hacerlo a traves del correo [email protected]

    Pregunta:  67904 - EJECUTABLE VB6 OBJETO XMLHTTPREQUEST FALLA SEND EN WINDOWS
Autor:  Juan José .
Hola Amigos, les comento un inconveniente que tengo con VB6 en Win7 (algunas PC, otras no). Una rutina (codificada en un proyecto tipo DLL, referenciada por el EXE de mi aplicación) que utilizo para enviar un string XML a un Web Service, funciona perfecto desde fuentes en Win7, pero desde el EXE no... Me da un error en el Send "El Sistema no puede ubicar el recurso especificado".

Esta es la rutina:

Private Sub enviarComandoMV(ByVal sXml As String, ByVal sSoapAction As String, ByVal sURL As String)
On Error GoTo ERROR_ENVIAR
' Enviar el comando al servicio Web
' usar XMLHTTPRequest para enviar la información al servicio Web
Dim oHttReq As XMLHTTPRequest
Set oHttReq = New XMLHTTPRequest

' Enviar el comando de forma síncrona (se espera a que se reciba la respuesta)
oHttReq.Open "POST", sURL, False
' las cabeceras a enviar al servicio Web
' (no incluir los dos puntos en el nombre de la cabecera)
oHttReq.setRequestHeader "Content-Type", "text/xml; charset=utf-8"
oHttReq.setRequestHeader "SOAPAction", sSoapAction

' enviar el comando
oHttReq.send sXml 'AQUI DA EL ERROR EL EXE !

'este será el texto recibido del servicio Web
procesarRespuestaMV oHttReq.responseText
Exit Sub

ERROR_ENVIAR:
....
...
..


Nombre
Apellidos
Correo
Comentarios