
<!--#Include File="WapConfig/WapHeader.asp"-->
<%
'以下为文件正文。

'以下是数据库的设置信息
Todo=Request.QueryString("ToDo")
if todo="LoginOk" then
	XML.writerow "恭喜您，已经成功登陆!"
ElseIf ToDo="NoLogin" Then
	XML.writerow "您现在还没有登录。"
	XML.writerow XML.A("","Login.asp","立即登录")
ElseIf ToDo="RegOk" Then
	XML.writerow "谢谢，您已经成功注册!现在可以开始您的心动之旅!"
ElseIf ToDo="NewOk" Then
	XML.writerow "您的帖子已经成功发布。"
	XML.writerow XML.A("","new_topic.asp","继续发帖")
ElseIf ToDo="NewReplyOk" Then
	XML.writerow "您已经成功回复帖子。"
	XML.WriteRow XML.A("","Topics.asp","返回帖子")
ElseIf ToDo="EditProfileOk" Then
	XML.writerow "您已经成功更新自己的资料。"
	XML.WriteRow XML.A("","UserAdmin.asp","管理中心")
ElseIf ToDo="NoNewsRecord" Then
	XML.writerow "Sorry，没找到你要找的帖子"
	XML.WriteRow XML.A("","SiteSearch.asp","继续搜索")
ElseIf ToDo="NoMemberRecord" Then
	XML.writerow "Sorry，本站没有此会员！"
	XML.WriteRow XML.A("","SiteSearch.asp","继续搜索")
End If
XML.WriteRow XML.ImgA("",XML.WapPath,"返回首页")
%>
<!--#Include File="WapConfig/WapFooter.asp"--> 
