Bonjour,
j'ai une application en vb6 qui fait un certain traitement liée à la base SQL, toutes les bases doivent être liées à ce traitement là.
Alors, pour que mon application soit capable de se connecter aux plusieurs bases : la chaines de connexion doit être paramétrable(Nom du serveur, Nom de la base, login et password)
là j'ai crée avec un code vb un fichier xml contenant toutes les chaines de connexion. Mais j'ai pas pu récupérer les données de ce fichier xml.
j'ai procédé comme suit :
mon code vb:
Private Sub cmdLoadXML_Click()
Dim sXmlFile As String
sXmlFile = "C:\dataP.xml"
Dim oXML As New DOMDocument
oXML.Load sXmlFile
If oXML.parseError.reason <> "" Then
MsgBox oXML.parseError.reason
Exit Sub
End If
Dim oNode As IXMLDOMNode
Dim oAttr As IXMLDOMAttribute
For Each oNode In oXML.documentElement.childNodes
Set oAttr = oNode.Attributes.getNamedItem("vconfirm" )
MsgBox oNode.nodeName & ": " & _
oNode.Text
Next oNode
Set oNode = oXML.selectSingleNode("//database//servername" )
If Not oNode Is Nothing Then
Me.txtServerName.Text = oNode.Text
End If
Set oNode = oXML.selectSingleNode("//database//databasename" )
If Not oNode Is Nothing Then
Me.txtDataBaseName.Text = oNode.Text
End If
Set oNode = oXML.selectSingleNode("//database//login" )
If Not oNode Is Nothing Then
Me.txtLogin.Text = oNode.Text
End If
Set oNode = oXML.selectSingleNode("//database//pwd" )
If Not oNode Is Nothing Then
Me.txtPwd.Text = oNode.Text
End If
End Sub
à l'éxecution il m'empêche de lire tout le fichier un message s'affiche : "Un seul élément de niveau supérieur est autorisé dans un document XML"
Comme j'ai compris il ne récupère qu'un seul niveau dans un fichier xml!!!
SVP j'ai besoin d'aide .
Après cette étape et lors de la récupération de la chaine de connexion l'application doit se connecter sur une base, puis faire le traitement dont j'ai parlé.
Merci d'avance.
