<!--#Include FILE="WapConfig/WapHeader.asp"-->
<%
'以下可以写文件正文 
'显示标题
XML.WriteOut "<h2>最新文章评论[30条]：</h2>"
XML.WriteOut "<ul><li>"
XML.StrSql="Select Top 30 FreeWordId,Id,Title,Content,DateTime,PersonName From FreeWordReply order by DateTime Desc" '要查询数据库的SQL语句。
XML.EveryPageSize=17 '每页显示的记录条数。默认为10。
XML.RsInfoPlace="None"
XML.FieldShow="Title"
XML.FieldHeader="PersonName"
XML.FieldFooter="DateTime"
XML.FieldId="Id"
XML.GoFileName="FreeWord_ReplyTopShow.asp"
XML.ErrorPagePath=""
XML.WriteRow "评论将显示用户号码，请勿发表不良言论。"
XML.MdbList()
XML.WriteOut "</li></ul>"
'以下为返回链接等
XML.WriteOut XML.Div(,,"N")
XML.WriteRow XML.A("","FreeWord_FindText.asp","文章搜索")
XML.WriteRow XML.A("","FreeWordRandom.asp","随机阅读")
XML.WriteRow XML.A("","FreeWordList.asp?Id=" & XML.MdbShow("FreeWordId"),"文章列表")
XML.WriteRow XML.A("","Index.asp","返回上级")
%>
<!--#Include FILE="WapConfig/WapFooter.asp"--> 
