Envio de XML
Publicado por Rafael (1 intervención) el 15/09/2010 13:51:21
Buenos días.
Ante todo muchas gracias por vuestro interes y ayuda.
Mi "ploblema" es el siguiente:
Me han pedido que mande un XML, con un formato determinado, a una URL con varios métodos, en concreto la primera prueba es a uno llamado "PutServiceRequest". Y me tiene que devolver cierta información.
MI intento en VB6 ha sido este:
Dim ObjXML As XMLHTTPRequest
Set ObjXML = New XMLHTTPRequest
Dim docxml As MSXML.DOMDocument
Set docxml = New DOMDocument
Dim strRuta As String
docxml.async = False
Dim ruta As String
ruta = "C:\Desarrollo\ejemplo.xml"
If docxml.Load(ruta) Then
'MsgBox "SI"
Else
MsgBox "NO"
End If
strRuta = "http://xml.empresa.co.uk/invoke/test.deda/GetServiceRequest"
ObjXML.open "POST", strRuta, True, "usuario", "Password"
ObjXML.send docxml
Set ObjXML = Nothing
Set docxml = Nothing
Pero el OBJXML me devuelve:
<?xml version="1.0" encoding="UTF-8"?>
<Values version="2.0">
<value name="$errorDump">com.wm.app.b2b.server.UnknownServiceException: test.sesa:GetServiceRequest
at com.wm.app.b2b.server.ServerException.<init>(ServerException.java:35)
at com.wm.app.b2b.server.UnknownServiceException.<init>(UnknownServiceException.java:20)
at com.wm.app.b2b.server.HTTPInvokeHandler.process(HTTPInvokeHandler.java(Compiled Code))
at com.wm.app.b2b.server.HTTPDispatch.run(HTTPDispatch.java(Compiled Code))
at com.wm.util.pool.PooledThread.run(PooledThread.java(Compiled Code))
at java.lang.Thread.run(Thread.java:498)
</value>
<record name="$errorInfo" javaclass="com.wm.util.Values">
<value name="$errorDump">com.wm.app.b2b.server.UnknownServiceException: test.sesa:GetServiceRequest
at com.wm.app.b2b.server.ServerException.<init>(ServerException.java:35)
at com.wm.app.b2b.server.UnknownServiceException.<init>(UnknownServiceException.java:20)
at com.wm.app.b2b.server.HTTPInvokeHandler.process(HTTPInvokeHandler.java(Compiled Code))
at com.wm.app.b2b.server.HTTPDispatch.run(HTTPDispatch.java(Compiled Code))
at com.wm.util.pool.PooledThread.run(PooledThread.java(Compiled Code))
at java.lang.Thread.run(Thread.java:498)
</value>
<null name="$errorMsgId"/>
<value name="$error">test.deda:GetServiceRequest</value>
<value name="$localizedError">test.deda:GetServiceRequest</value>
<value name="$errorType">com.wm.app.b2b.server.UnknownServiceException</value>
<value name="$user">Default</value>
<null name="$pipeline"/>
</record>
<value name="$error">test.deda:GetServiceRequest</value>
<value name="$errorType">com.wm.app.b2b.server.UnknownServiceException</value>
</Values>
¿ALGUNA SUGERENCIA?
GRACIAS
Ante todo muchas gracias por vuestro interes y ayuda.
Mi "ploblema" es el siguiente:
Me han pedido que mande un XML, con un formato determinado, a una URL con varios métodos, en concreto la primera prueba es a uno llamado "PutServiceRequest". Y me tiene que devolver cierta información.
MI intento en VB6 ha sido este:
Dim ObjXML As XMLHTTPRequest
Set ObjXML = New XMLHTTPRequest
Dim docxml As MSXML.DOMDocument
Set docxml = New DOMDocument
Dim strRuta As String
docxml.async = False
Dim ruta As String
ruta = "C:\Desarrollo\ejemplo.xml"
If docxml.Load(ruta) Then
'MsgBox "SI"
Else
MsgBox "NO"
End If
strRuta = "http://xml.empresa.co.uk/invoke/test.deda/GetServiceRequest"
ObjXML.open "POST", strRuta, True, "usuario", "Password"
ObjXML.send docxml
Set ObjXML = Nothing
Set docxml = Nothing
Pero el OBJXML me devuelve:
<?xml version="1.0" encoding="UTF-8"?>
<Values version="2.0">
<value name="$errorDump">com.wm.app.b2b.server.UnknownServiceException: test.sesa:GetServiceRequest
at com.wm.app.b2b.server.ServerException.<init>(ServerException.java:35)
at com.wm.app.b2b.server.UnknownServiceException.<init>(UnknownServiceException.java:20)
at com.wm.app.b2b.server.HTTPInvokeHandler.process(HTTPInvokeHandler.java(Compiled Code))
at com.wm.app.b2b.server.HTTPDispatch.run(HTTPDispatch.java(Compiled Code))
at com.wm.util.pool.PooledThread.run(PooledThread.java(Compiled Code))
at java.lang.Thread.run(Thread.java:498)
</value>
<record name="$errorInfo" javaclass="com.wm.util.Values">
<value name="$errorDump">com.wm.app.b2b.server.UnknownServiceException: test.sesa:GetServiceRequest
at com.wm.app.b2b.server.ServerException.<init>(ServerException.java:35)
at com.wm.app.b2b.server.UnknownServiceException.<init>(UnknownServiceException.java:20)
at com.wm.app.b2b.server.HTTPInvokeHandler.process(HTTPInvokeHandler.java(Compiled Code))
at com.wm.app.b2b.server.HTTPDispatch.run(HTTPDispatch.java(Compiled Code))
at com.wm.util.pool.PooledThread.run(PooledThread.java(Compiled Code))
at java.lang.Thread.run(Thread.java:498)
</value>
<null name="$errorMsgId"/>
<value name="$error">test.deda:GetServiceRequest</value>
<value name="$localizedError">test.deda:GetServiceRequest</value>
<value name="$errorType">com.wm.app.b2b.server.UnknownServiceException</value>
<value name="$user">Default</value>
<null name="$pipeline"/>
</record>
<value name="$error">test.deda:GetServiceRequest</value>
<value name="$errorType">com.wm.app.b2b.server.UnknownServiceException</value>
</Values>
¿ALGUNA SUGERENCIA?
GRACIAS
Valora esta pregunta


0