Discussion:
Xml y Recordset
(demasiado antiguo para responder)
Maxi
2005-02-15 20:49:08 UTC
Permalink
Hola gente, he persistido con el metodo Save un recordset a un archivo XML.
Hasta aca esta todo de maravillas, ahora como puedo hacer desde Vb6 para
poder leer este archivo XML e interpretar lo que dice?

Gracias
--
--------------------------
Salu2
Maxi
Ronald Eduardo Sánchez
2005-02-15 21:44:31 UTC
Permalink
Maxi:
Sería con el metodo open

oRs.Open "C:\Prueba.xml", Nothing, , , adPersistXML

solo cambia el path donde tienes guardado el archivo

Saludos

Ronald Sánchez
San Salvador - El Salvador
(Desde el Pulgarcito de América)
Post by Maxi
Hola gente, he persistido con el metodo Save un recordset a un archivo XML.
Hasta aca esta todo de maravillas, ahora como puedo hacer desde Vb6 para
poder leer este archivo XML e interpretar lo que dice?
Gracias
--
--------------------------
Salu2
Maxi
Maxi
2005-02-16 12:45:35 UTC
Permalink
Hola, mill gracias!"! no pense que era tan simple :( yo me estab volviendo
loco con las librerias ufff, pensar que en .net es super simple, pero en vb6
nunca use XML :(

Mil gracias nuevamente!!!
--
--------------------------
Salu2
Maxi


"Ronald Eduardo Sánchez" <ronald.sanchez-arroba-swdeca.com> escribió en el
Post by Ronald Eduardo Sánchez
Sería con el metodo open
oRs.Open "C:\Prueba.xml", Nothing, , , adPersistXML
solo cambia el path donde tienes guardado el archivo
Saludos
Ronald Sánchez
San Salvador - El Salvador
(Desde el Pulgarcito de América)
Post by Maxi
Hola gente, he persistido con el metodo Save un recordset a un archivo
XML.
Post by Maxi
Hasta aca esta todo de maravillas, ahora como puedo hacer desde Vb6 para
poder leer este archivo XML e interpretar lo que dice?
Gracias
--
--------------------------
Salu2
Maxi
Ronald Eduardo Sánchez
2005-02-16 13:39:30 UTC
Permalink
para eso estamos ;-)

Saludos

Ronald Sánchez
San Salvador - El Salvador
(Desde el Pulgarcito de América)
Post by Maxi
Hola, mill gracias!"! no pense que era tan simple :( yo me estab volviendo
loco con las librerias ufff, pensar que en .net es super simple, pero en vb6
nunca use XML :(
Mil gracias nuevamente!!!
--
--------------------------
Salu2
Maxi
"Ronald Eduardo Sánchez" <ronald.sanchez-arroba-swdeca.com> escribió en el
Post by Ronald Eduardo Sánchez
Sería con el metodo open
oRs.Open "C:\Prueba.xml", Nothing, , , adPersistXML
solo cambia el path donde tienes guardado el archivo
Saludos
Ronald Sánchez
San Salvador - El Salvador
(Desde el Pulgarcito de América)
Post by Maxi
Hola gente, he persistido con el metodo Save un recordset a un archivo
XML.
Post by Maxi
Hasta aca esta todo de maravillas, ahora como puedo hacer desde Vb6 para
poder leer este archivo XML e interpretar lo que dice?
Gracias
--
--------------------------
Salu2
Maxi
Rubén Vigón
2005-02-16 14:57:17 UTC
Permalink
Hola Maxi,

Además de lo comentado, échale un vistazo a éste pequeño ejemplo que preparé para una consulta similar del foro de Access:
http://www.mvp-access.com/rubenvigon/news/tabla_a_xml.zip (78,2 Kb)

Un saludo!

Un saludo!

Rubén Vigón
Microsoft MVP Visual Basic
http://www.mvp-access.com/rubenvigon

Reunión de participantes del foro microsoft.public.es.vb (2005)
http://www.mvp-access.com/rubenvigon/reunion.asp
Juan Pablo Acevedo
2005-02-21 18:42:41 UTC
Permalink
En el ejemplo que está en tabla_a_xml.zip, al ejecutarlo me arroja un error
en la siguiente linea:
Dim Doc As MSXML2.DOMDocument

En referencias veo que me falta la librería Microsoft XML, v4.0, ¿Donde
puedo conseguir este componente?.

Mi problena original es que no puedo leer ningún archivo xml desde visual,
al ejecutar el método open del recordset siempre me arroja el error 3709.
por ejemplo; "Open "C:\Prueba\Prueba.xml", Nothing, , , adPersistXML"

Desde ya muchas Gracias
Juan Pablo Acevedo


"Rub�n Vig�n" <***@QUITAESTOwanadoo.es> escribi� en el mensaje news:u$***@TK2MSFTNGP14.phx.gbl...
Hola Maxi,

Además de lo comentado, échale un vistazo a éste pequeño ejemplo que
preparé para una consulta similar del foro de Access:
http://www.mvp-access.com/rubenvigon/news/tabla_a_xml.zip (78,2 Kb)

Un saludo!
Rubén Vigón
2005-02-22 07:31:31 UTC
Permalink
Hola Juan Pablo,

Puedes descargar el «parser» XML de Microsoft en la siguiente dirección:

Microsoft XML Core Services 4.0 Service Pack 2
This is the service pack 2 release of Microsoft XML Core Services (MSXML) 4.0, formerly called the Microsoft XML Parser. This version has a number of improvements compared to MSXML 3.0
http://www.microsoft.com/downloads/details.aspx?familyid=3144b72b-b4f2-46da-b4b6-c5d7485f2b42&displaylang=en

Un saludo!

Rubén Vigón
Microsoft MVP Visual Basic
http://www.mvp-access.com/rubenvigon

Reunión de participantes del foro microsoft.public.es.vb (2005)
http://www.mvp-access.com/rubenvigon/reunion.asp
Juan Pablo Acevedo
2005-03-02 22:11:13 UTC
Permalink
Gracias Rubén por el dato, ya descargué e instalé Microsoft XML Core
Services (MSXML) 4.0, ahora puedo hacer correr el ejemplo sin problemas.

Sin embargo mi problema inicial sigue como antes:

oRecordset.Open "C:\Prueba\Prueba.xml", Nothing, , , adPersistXML

Genera el error 3709, ya no se que mas probar ni donde consultar. Peor aun
si tenemos en cuenta que mi objetivo final es poder levantar un juego de
datos de una base alojada en un servidor web, por ejemplo:

oRecordset.Open "http://www.MiServer.com/Prueba.asp?SQL=SELECT * FROM
Tabla", Nothing, , , adPersistXML.

Cabe aclarar que si escribo en la barra de navegacion del explorador
"http://www.MiServer.com/Prueba.asp?SQL=SELECT * FROM Tabla", me devuelve un
xml con todos los nodos como corresponde.

En fin, no se como obtener datos de una base en internet en mi aplicación
Visual Basic.

Cualquier configuración, tip, consejo, será eternamente agradecido.

Juan Pablo Acevedo


"Rub�n Vig�n" <***@QUITAESTOwanadoo.es> escribi� en el mensaje news:uf0#***@TK2MSFTNGP09.phx.gbl...
Hola Juan Pablo,

Puedes descargar el «parser» XML de Microsoft en la siguiente dirección:

Microsoft XML Core Services 4.0 Service Pack 2
This is the service pack 2 release of Microsoft XML Core Services (MSXML)
4.0, formerly called the Microsoft XML Parser. This version has a number of
improvements compared to MSXML 3.0
http://www.microsoft.com/downloads/details.aspx?familyid=3144b72b-b4f2-46da-
b4b6-c5d7485f2b42&displaylang=en

Un saludo!

Rubén Vigón
Microsoft MVP Visual Basic
http://www.mvp-access.com/rubenvigon

Reunión de participantes del foro microsoft.public.es.vb (2005)
http://www.mvp-access.com/rubenvigon/reunion.asp
Ronald Eduardo Sánchez
2005-03-02 23:02:27 UTC
Permalink
Juan Pablo:
Deberias de ver el Link del Maestro SoftJaen para consultar ACCES
alojado en WEB

http://mvp-access.com/softjaen/bases/ado/sjspado016.htm


talvez te sirva la idea
--
Ronald Sánchez
San Salvador - El Salvador
(Desde el Pulgarcito de América)
Post by Juan Pablo Acevedo
Gracias Rubén por el dato, ya descargué e instalé Microsoft XML Core
Services (MSXML) 4.0, ahora puedo hacer correr el ejemplo sin problemas.
oRecordset.Open "C:\Prueba\Prueba.xml", Nothing, , , adPersistXML
Genera el error 3709, ya no se que mas probar ni donde consultar. Peor aun
si tenemos en cuenta que mi objetivo final es poder levantar un juego de
oRecordset.Open "http://www.MiServer.com/Prueba.asp?SQL=SELECT * FROM
Tabla", Nothing, , , adPersistXML.
Cabe aclarar que si escribo en la barra de navegacion del explorador
"http://www.MiServer.com/Prueba.asp?SQL=SELECT * FROM Tabla", me devuelve un
xml con todos los nodos como corresponde.
En fin, no se como obtener datos de una base en internet en mi aplicación
Visual Basic.
Cualquier configuración, tip, consejo, será eternamente agradecido.
Juan Pablo Acevedo
Hola Juan Pablo,
Microsoft XML Core Services 4.0 Service Pack 2
This is the service pack 2 release of Microsoft XML Core Services (MSXML)
4.0, formerly called the Microsoft XML Parser. This version has a number of
improvements compared to MSXML 3.0
http://www.microsoft.com/downloads/details.aspx?familyid=3144b72b-b4f2-46da-
Post by Juan Pablo Acevedo
b4b6-c5d7485f2b42&displaylang=en
Un saludo!
Rubén Vigón
Microsoft MVP Visual Basic
http://www.mvp-access.com/rubenvigon
Reunión de participantes del foro microsoft.public.es.vb (2005)
http://www.mvp-access.com/rubenvigon/reunion.asp
Juan Pablo Acevedo
2005-03-03 02:15:57 UTC
Permalink
Basandome en ese ejemplo, la página ASP me arroja el error "La operación de
múltiples pasos de OLE DB generó errores. Compruebe los valores de estado de
OLE DB si es posible. No se realizó ningún trabajo. " en la siguiente linea:
.Open SQL, oCnn, , , adCmdText

Para salvar esto, anteriormente, generé el XML usando el siguiente código:

<%
Const adPersistXML = 1
Response.ContentType = "text/xml"

Set Conn = Server.CreateObject ("ADODB.Connection")
Conn.open "DRIVER={Microsoft Access Driver
(*.mdb)};DBQ="&Server.MapPath("Deposito.mdb") &";"

sql=request.QueryString("SQL")
tag=request.QueryString("TAG")
set rs = Conn.Execute(sql)

rs.MoveFirst()

response.write("<?xml version='1.0' ?>")
response.write("<" & tag & "Sup>")
while (not rs.EOF)
response.write("<" & tag & ">")

for i=0 to (rs.fields.count)-1
response.write("<" & rs.fields(i).name & ">" & rs.fields(i) & "</" &
rs.fields(i).name & ">")
next
response.write("</" & tag & ">")
rs.MoveNext()
wend

rs.close()
conn.close()
response.write("</" & tag & "Sup>")
%>

Esta página ASP desde la linea de comandos del explorer me devuelve un XML
sin ningún error, pero no puedo abrirlo desde Visual basic, es acá cuando me
arroja el error 3709 en esta linea:

oRecordset.Open "http://www.MiServer.com/Prueba.asp?SQL=SELECT * FROM
Tabla&TAG=Nodo", Nothing, , , adPersistXML.

Muchas gracias por la paciencia

Juan Pablo Acevedo



"Ronald Eduardo Sánchez" <ronald.sanchez-arroba-swdeca.com> escribió en el
Post by Ronald Eduardo Sánchez
Deberias de ver el Link del Maestro SoftJaen para consultar ACCES
alojado en WEB
http://mvp-access.com/softjaen/bases/ado/sjspado016.htm
talvez te sirva la idea
--
Ronald Sánchez
San Salvador - El Salvador
(Desde el Pulgarcito de América)
Post by Juan Pablo Acevedo
Gracias Rubén por el dato, ya descargué e instalé Microsoft XML Core
Services (MSXML) 4.0, ahora puedo hacer correr el ejemplo sin problemas.
oRecordset.Open "C:\Prueba\Prueba.xml", Nothing, , , adPersistXML
Genera el error 3709, ya no se que mas probar ni donde consultar. Peor aun
si tenemos en cuenta que mi objetivo final es poder levantar un juego de
oRecordset.Open "http://www.MiServer.com/Prueba.asp?SQL=SELECT * FROM
Tabla", Nothing, , , adPersistXML.
Cabe aclarar que si escribo en la barra de navegacion del explorador
"http://www.MiServer.com/Prueba.asp?SQL=SELECT * FROM Tabla", me
devuelve
Post by Ronald Eduardo Sánchez
un
Post by Juan Pablo Acevedo
xml con todos los nodos como corresponde.
En fin, no se como obtener datos de una base en internet en mi aplicación
Visual Basic.
Cualquier configuración, tip, consejo, será eternamente agradecido.
Juan Pablo Acevedo
Hola Juan Pablo,
Microsoft XML Core Services 4.0 Service Pack 2
This is the service pack 2 release of Microsoft XML Core Services (MSXML)
4.0, formerly called the Microsoft XML Parser. This version has a number
of
Post by Juan Pablo Acevedo
improvements compared to MSXML 3.0
http://www.microsoft.com/downloads/details.aspx?familyid=3144b72b-b4f2-46da-
Post by Ronald Eduardo Sánchez
Post by Juan Pablo Acevedo
b4b6-c5d7485f2b42&displaylang=en
Un saludo!
Rubén Vigón
Microsoft MVP Visual Basic
http://www.mvp-access.com/rubenvigon
Reunión de participantes del foro microsoft.public.es.vb (2005)
http://www.mvp-access.com/rubenvigon/reunion.asp
SoftJaén
2005-03-03 15:57:48 UTC
Permalink
Post by Juan Pablo Acevedo
Basandome en ese ejemplo, la página ASP me arroja el error "La operación
de múltiples pasos de OLE DB generó errores. Compruebe los valores de
estado de OLE DB si es posible. No se realizó ningún trabajo. " en la
.Open SQL, oCnn, , , adCmdText
¿Pero has utilizado como modelo la página ASP que aparece en el ejemplo,
tal y como está escrita? Te lo pregunto porque el código de la página ASP
que has publicado, en nada se parece a la que figura en el artículo de mi
página web.

Aunque no te lo puedo afirmar con total rotundidad, ese error tiene toda la
pinta de que algo anda mal en la consulta SQL que estás utilizando para
abrir el objeto Recordset.

Si deseas efectuar una consulta SQL, a una base de datos de Access que
tienes alojada en un servidor de Internet, siempre y cuando éste último te
lo permita, ejecuta el código fuente, tal y como aparece en el mencionado
artículo. Una vez que compruebes que funciona bien, entonces haces las
modificaciones oportunas, porque te puedo asegurar que la página ASP hace
bien su trabajo, siempre y cuando, se le pase una consulta SQL correcta.

Un saludo

--
Enrique Martínez
[MS MVP - VB]

Nota informativa: La información contenida en este mensaje, así como el
código fuente incluido en el mismo, se proporciona «COMO ESTÁ», sin
garantías de ninguna clase, y no otorga derecho alguno. Usted asume
cualquier riesgo al poner en práctica, utilizar o ejecutar lo recomendado o
sugerido en el presente mensaje.

Loading...