关于xml,da

Question

<?xml version="1.0"?>
<information>
<usergroup>
<user>aaaaa</user>
<user>bbbbb</user>
</usergroup>
</information>

Answer 1

发错了，解决了一起给分
http://community.csdn.net/Expert/topic/3235/3235068.xml?temp=.4345362

Answer 2

发错了，解决了一起给分
http://community.csdn.net/Expert/topic/3235/3235068.xml?temp=.4345362
  

Answer 3

发错了，解决了一起给分
http://community.csdn.net/Expert/topic/3235/3235068.xml?temp=.4345362

Answer 4

http://community.csdn.net/Expert/topic/3235/3235068.xml?temp=.4345362
Dim userDocument As XmlDocument             
        Dim userNode As XmlNode                     
        Dim userList As XmlNodeList                 
        Dim userListLoop As XmlNodeList             
        Dim user As XmlNode                         
        Dim userInfo As XmlElement                          userDocument = New XmlDocument                If Dir(Server.MapPath("user.xml")) <> "" Then
            userDocument.Load(Server.MapPath("user.xml"))
        Else
            Return False
        End If        Try
            userNode = userDocument.SelectSingleNode("infomation")
            userList = userNode.ChildNodes
            userListLoop = userList.Item(0).ChildNodes            For Each user In userListLoop
                userInfo = user                'このユーザーは存在する、TRUEに戻る
                If userInfo.GetAttribute("userid").Equals(userid) _
                    And userInfo.GetAttribute("password").Equals(password) Then
                    viewstate("roles") = userInfo.GetAttribute("role")
                    Return True
                End If
            Next
            Return False
        Catch ex As Exception
            Return False
        End Try