<!--#Include File="WapConfig/WapHeader.asp"-->
<%
'以下为文件正文。
'以下是数据库的设置信息
	Forum_id=Trim(Request.QueryString("Forum_id"))
	If Forum_id<>"" Then
		Session("Forum_id")=Forum_id
	Else
		Forum_id=Session("Forum_id")
	End If
'显示导航
Call HoriNavi()
XML.WriteOut XML.Div(,,"N")
XML.EveryPageSize=10 '每页显示的记录条数。默认为10。
XML.FieldId="Topic_ID" '数据库中的关键字段的名称。
XML.ErrorPagePath="" '当页面发生错误，或者没有记录时，跳转到的页面。默认为站点首页。
XML.RsInfoPlace="none" '设置显示的数据集合信息的位置[top\bottom\none,默认是top]
'XML.DBListNumber=True '设置数据记录前是否显示自动编号数字。
'XML.DBOrderNumber=True '设置数据记录前是否显示自动编号数字。
XML.GoFileName="topic_show_content.asp" '连接到页面的文件的名字。
XML.StrSql="Select * From Topics Where IsZhiDing=Yes and Forum_id=" & Forum_id & " Order By T_date Desc" '要查询数据库的SQL语句。
XML.DbListTypeMode=9 '当为9时，以设置DbListImgPath的属性值。
XML.DbListImgPath="Images/Up.gif"
XML.FieldShow="T_subject" 

XML.MdbList
XML.StrSql="SELECT * from Topics where Forum_id="  & Forum_id  & " and IsZhiDing<>Yes order by T_Last_Post desc"
XML.EveryPageSize=15
XML.FieldShow="T_subject"
XML.FieldHeader="F_RCount"'回复数量
XML.FieldFooter="F_Count" '主题数量
XML.FieldId="Topic_ID"
XML.DbListTypeMode=0 '
XML.GoFileName="topic_show_content.asp"
XML.ErrorPagePath=""
XML.RsInfoPlace="bottom" '设置显示的数据集合信息的位置[top\bottom\none,默认是top]
XML.DBOrderNumber=True '设置数据记录前是否显示自动编号数字。[新增较V1.5]
XML.MdbList()
XML.WriteRow XML.ImgA("","new_topic.asp?Forum_id=" & forum_id,"发新帖子")
'以下为返回链接等信息。
XML.WriteOut XML.Div(,,"N")
XML.WriteRow XML.ImgA("Images/topt.gif","forum.asp","返回上级")

%>
<!--#Include File="WapConfig/WapFooter.asp"--> 
