Leer/recorrer xml encriptado

03/10/2005 - 22:04 por amaia | Informe spam
Hola Foro:

Tengo un xml, el cual, su contenido, está encriptado,
siendo toda una linea :
<Datos>uW43Iu/SpyZLhYTKRQHtdXAbwm9NK/ni5CbHWPHDDJoGjCaI9KAE
unSMvuGmlZTfEipGIxaYwuSptrnvt6j3HKIbN4D4c/t8Ioy+tLsbA1qjCS6
ocsGpWGDm3ravesS7tZAFlHYuHJjNwhpXkdSqXNiWWQS+6xzSqiJlbcGKsu
02izsrbxs56CQ0jmk5Ljnr</Datos>

puede decirme alguien como puedo desencriptar esto e ir
nodo por nodo?. TEngo este código que muy amablemente me
envió un chico:

Dim doc As New XmlDocument
Dim node As XmlNode
Dim nodes As XmlNodeList
'Se lee el archivo
doc.Load("c:\test.xml")
'Se buscan los nodos con el nombre de tag ProhibidosGV
nodes = doc.GetElementsByTagName("ProhibidosGV")
'Se recorre la lista de nodos y se obtiene el valor del
atributo DNI
For Each node In nodes
'De esta forma puedes obtener el valor de los atributos
Dim dni As String
dni = node.Attributes("DNI").InnerText
Next

pero claro, necesito tener desencriptado el xml. (el
código de desencriptado ya lo tengo). Agradeceria mucho de
antemano vuestra colaboración. Un saludo

AMAIA
 

Leer las respuestas

#1 skar
03/10/2005 - 22:24 | Informe spam
lo primero que debes de hacer es desencriptar el documento,

"amaia" wrote in message
news:014601c5c855$ad3f0150$
Hola Foro:

Tengo un xml, el cual, su contenido, está encriptado,
siendo toda una linea :
<Datos>uW43Iu/SpyZLhYTKRQHtdXAbwm9NK/ni5CbHWPHDDJoGjCaI9KAE
unSMvuGmlZTfEipGIxaYwuSptrnvt6j3HKIbN4D4c/t8Ioy+tLsbA1qjCS6
ocsGpWGDm3ravesS7tZAFlHYuHJjNwhpXkdSqXNiWWQS+6xzSqiJlbcGKsu
02izsrbxs56CQ0jmk5Ljnr</Datos>

puede decirme alguien como puedo desencriptar esto e ir
nodo por nodo?. TEngo este código que muy amablemente me
envió un chico:

Dim doc As New XmlDocument
Dim node As XmlNode
Dim nodes As XmlNodeList
'Se lee el archivo
doc.Load("c:\test.xml")
'Se buscan los nodos con el nombre de tag ProhibidosGV
nodes = doc.GetElementsByTagName("ProhibidosGV")
'Se recorre la lista de nodos y se obtiene el valor del
atributo DNI
For Each node In nodes
'De esta forma puedes obtener el valor de los atributos
Dim dni As String
dni = node.Attributes("DNI").InnerText
Next

pero claro, necesito tener desencriptado el xml. (el
código de desencriptado ya lo tengo). Agradeceria mucho de
antemano vuestra colaboración. Un saludo

AMAIA

Preguntas similares