www.gusucode.com > 全球营销软件站整站源码4月最新数据 4.0源码程序 > 801wyxqf\ask\usercenter.asp
<!--#include file="conn.asp"--> <!--#include file="inc/const.asp"--> <!--#include file="inc/check.asp"--> <% Dim HtmlContent,XMLDom,HeadTitle HeadTitle = "个人中心" HtmlContent = NewAsp.LoadTemplate("usercenter") HtmlContent = Replace(HtmlContent, "{$HeadTitle}", HeadTitle) HtmlContent = Replace(HtmlContent, "{$ClassID}", 0) HtmlContent = Replace(HtmlContent, "{$Points}", NewAsp.UserSession.documentElement.selectSingleNode("userinfo/@points").text) HtmlContent = Replace(HtmlContent, "{$Experience}", NewAsp.UserSession.documentElement.selectSingleNode("userinfo/@experience").text) HtmlContent = Replace(HtmlContent, "{$AnswerPoint}", NewAsp.UserSession.documentElement.selectSingleNode("userinfo/@answerpoint").text) HtmlContent = Replace(HtmlContent, "{$SharePoint}", NewAsp.UserSession.documentElement.selectSingleNode("userinfo/@sharepoint").text) HtmlContent = Replace(HtmlContent, "{$RewardPoint}", NewAsp.UserSession.documentElement.selectSingleNode("userinfo/@rewardpoint").text) HtmlContent = Replace(HtmlContent, "{$PunishPoint}", NewAsp.UserSession.documentElement.selectSingleNode("userinfo/@punishpoint").text) HtmlContent = Replace(HtmlContent, "{$Asktotal}", NewAsp.UserSession.documentElement.selectSingleNode("userinfo/@asktotal").text) HtmlContent = Replace(HtmlContent, "{$Askpend}", NewAsp.UserSession.documentElement.selectSingleNode("userinfo/@askpend").text) HtmlContent = Replace(HtmlContent, "{$Askdone}", NewAsp.UserSession.documentElement.selectSingleNode("userinfo/@askdone").text) HtmlContent = Replace(HtmlContent, "{$Askvote}", NewAsp.UserSession.documentElement.selectSingleNode("userinfo/@askvote").text) HtmlContent = Replace(HtmlContent, "{$Askshare}", NewAsp.UserSession.documentElement.selectSingleNode("userinfo/@askshare").text) HtmlContent = Replace(HtmlContent, "{$Askstop}", NewAsp.UserSession.documentElement.selectSingleNode("userinfo/@askstop").text) HtmlContent = Replace(HtmlContent, "{$Askoverdue}", NewAsp.UserSession.documentElement.selectSingleNode("userinfo/@askoverdue").text) HtmlContent = Replace(HtmlContent, "{$Answertotal}", NewAsp.UserSession.documentElement.selectSingleNode("userinfo/@answertotal").text) HtmlContent = Replace(HtmlContent, "{$Adopted}", NewAsp.UserSession.documentElement.selectSingleNode("userinfo/@adopted").text) Response.Write NewAsp.ArchiveHtml(HtmlContent) NewAsp.CloseConn() %>