ASP个人网站与动网整合非官方方法(3)

            '登录次数    :  UserSession.documentElement.selectSingleNode("userinfo/@userlogins").text 
            '金钱        :  UserSession.documentElement.selectSingleNode("userinfo/@userwealth").text 
            '积分        :  UserSession.documentElement.selectSingleNode("userinfo/@userep").text 
            '魅力        :  UserSession.documentElement.selectSingleNode("userinfo/@usercp").text 
            '最后登录IP  :  UserSession.documentElement.selectSingleNode("userinfo/@userlastip").text 
            '浏览器类型  :  UserSession.documentElement.selectSingleNode("agent/@browser").text 
            '浏览器版本  :  UserSession.documentElement.selectSingleNode("agent/@version").text 
            '操作系统    :  UserSession.documentElement.selectSingleNode("agent/@platform").text 
            '来访IP      :  UserSession.documentElement.selectSingleNode("agent/@ip").text 
            '举例应用: 
            Response.Cookies("username") = UserSession.documentElement.selectSingleNode("userinfo/@username").text 
            Response.Cookies("joindate") = UserSession.documentElement.selectSingleNode("userinfo/@joindate").text 
            If UserSession.documentElement.selectSingleNode("userinfo/@usersex").text="0" Then 
                Response.Cookies("sex") = "靓妹" 
            Else 
                Response.Cookies("sex") = "酷哥" 
            End if 
            Response.Cookies("lastlogin") = UserSession.documentElement.selectSingleNode("userinfo/@lastlogin").text