Buenas Noches Gente !!!
Bueno, verán, este es mi problema:
Resulta que estoy haciendo una clase para leer ficheros .config (Ya se que hay clases por ahí, de hecho yo tengo una, pero quiero coger un poco de fluidez creando clases y por eso me he metido con este tema). Pues la cuestión es que al crear el Objeto Xml para leer el fichero INEXPLICABLEMENTE me lo elimina.
Bueno, aqui os pongo la funcion que he creado para conseguir el Attributo del XML.
Public Function DevuelveValor2(ByVal Llave As String)
Dim FichXml As Xml.XmlDocument
FichXml = New Xml.XmlDocument
FichXml.Load(FicheroConfiguracion & ".config")
Dim Child As Xml.XmlNode
For Each Child In FichXml.FirstChild.NextSibling.ChildNodes
If Child.HasChildNodes Then
Dim ChildApp As Xml.XmlNode
For Each ChildApp In Child.ChildNodes
If ChildApp.Attributes("key").Value = "BaseDatos" Then
Return ChildApp.Attributes("value").Value()
Else
Return Nothing
End If
Next
End If
Next
End Function
FicheroConfiguracion está definido fuera del constructor y del método, dentro del constructor, el cual recibe como parametro el nombre del fichero XML, hago lo siguiente: FicheroConfiguracion = Fichero (Fichero es el parametro del Constructor).
Bueno, que yo sepa lo tengo todo bien, ¿No?, vamos, no entiendo por que me elimina el fichero XML, es muy extraño, en fin, si pueden ayudarme les estaría muy agradecido.
Saludos Cordiales !!!
P.d.: Os he puesto el código con tabulaciones para que sea más legible, sin embargo, sale todo alineado a la izquierda, ¿Alguien sabe por que?