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: .... ... .. |