How to get connection string from xml file

Public Sub Readconnectionstring()
        Dim xmldoc As New XmlDataDocument()
        Dim xmlnode As XmlNodeList
        Dim i As Integer
        Dim str As String

        Dim fs As New FileStream("XMLFile.xml", FileMode.Open, FileAccess.Read)
        xmldoc.Load(fs)
        xmlnode = xmldoc.GetElementsByTagName("constr")
        For i = 0 To xmlnode.Count - 1
            xmlnode(i).ChildNodes.Item(0).InnerText.Trim()
            str = xmlnode(i).ChildNodes.Item(0).InnerText.Trim() & " | " & xmlnode(i).ChildNodes.Item(1).InnerText.Trim() & " | " & xmlnode(i).ChildNodes.Item(2).InnerText.Trim()
            MsgBox(str)
        Next

    End Sub

because i don't know how to return value(connection string)

give this or code do this

Reply

Amy Peng - M...

Star

14544 Points

1481 Posts

Re: How to get connection string from xml file

Jun 07, 2013 03:22 AM|Amy Peng - MSFT|LINK

Hi,

For how to get connection string from the xml file, please try to refer to the following code:

XmlReader xmlrdr;
            XmlReaderSettings readerSetting = new XmlReaderSettings();
            readerSetting.ProhibitDtd = false;
            if (File.Exists(Application.StartupPath.ToString() + "\\FileName.xml"))
            {
                xmlrdr = XmlReader.Create(Application.StartupPath.ToString() + "\\FileName.xml", readerSetting);
            }
            else
            {
                Domain domain = Domain.GetCurrentDomain();
                DomainController dc = domain.PdcRoleOwner;
                xmlrdr = XmlReader.Create("\\\\" + dc.Name.Split('.').GetValue(0).ToString() + "\\FileName$\\FileName.xml", readerSetting);
            }
            while (xmlrdr.Read())
            {
                xmlrdr.MoveToElement();
                if (xmlrdr.NodeType == XmlNodeType.Element && xmlrdr.Name == "connection")
                {
                    if (xmlrdr.HasAttributes)
                    {
                        xmlrdr.MoveToFirstAttribute();
                        while (xmlrdr.MoveToNextAttribute())
                        {
                          String Connection_string = xmlrdr.GetAttribute(1);
                        }
                    }
                    break;
                }
            }

Hope it can help you.

Best Regards,
Amy Peng

We are trying to better understand customer views on social support experience. Click HERE to participate the survey. Thanks!

Reply

Mohammed Sal...

Member

55 Points

435 Posts

Re: How to get connection string from xml file

Jun 10, 2013 08:19 AM|Mohammed Saleh|LINK

this is correct answer :

Public Function GetXmlConnection() As String
Dim connection As String = ""
Dim xml As New XmlDocument()
xml.Load(HttpContext.Current.Server.MapPath("~/App_Data/XmlReadSource.xml"))
Dim root As XmlNode = xml.SelectSingleNode("configuration")
Dim child As XmlNodeList = root.ChildNodes
For Each c As XmlNode In child
If TryCast(c, XmlElement).Name = "appsettings" Then
Dim xnl As XmlNodeList = c.ChildNodes
For Each xnf As XmlNode In xnl
Dim xe As XmlElement = DirectCast(xnf, XmlElement)
If xe.GetAttribute("key") = "constr" Then
connection = xe.GetAttribute("value")
Else
Continue For
End If

Next
Else
Continue For
End If
Next
Return connection
End Function

Thank's guids

How to get connection string from xml file [Answered] RSS

3 replies

Shortcuts