Dim xmldoc As XmlDocument
        Dim xmlnode As XmlNode
        Dim xmllist As XmlNodeList
        Dim xmllist1 As XmlNodeList        Dim user As XmlNode
        Dim xe As XmlElement        xmldoc = New XmlDocument
        xmldoc.Load(Server.MapPath("user.xml"))        xmlnode = xmldoc.SelectSingleNode("infomation")
        xmllist = xmlnode.ChildNodes
        xmllist1 = xmllist.Item(0).ChildNodes        For Each user In xmllist1
            xe = user
            Response.Write(xe.GetAttribute("userid"))
            Response.Write(" ")
            Response.Write(xe.GetAttribute("password"))
            Response.Write("<br>")
        Next