论坛的讨论区类别和具体的讨论区可以动态的变化，相当方便。下面是部分代码：

<%
while(!bbsclass.EOF)
{
Response.Write("");
var classid=bbsclass.Fields.Item("classid").value;
var bbsname=Server.CreateObject("ADODB.Recordset");
bbsname.ActiveConnection = mycn;
bbsname.Source = "SELECT * FROM view_bbsinfo where classid="+classid+" order by bbsid";
bbsname.CursorType = 0;
bbsname.LockType = 1;
bbsname.Open();
while(!bbsname.EOF)
{
Response.Write("");
var link="javascript:popwin('userinfo.asp?username="+bbsname.Fields.Item("lastreplier").value+"')";
Response.Write("");
link="javascript:popwin('userinfo.asp?username="+bbsname.Fields.Item("username").value+"')";
Response.Write("");
bbsname.MoveNext();
}
bbsname.Close;
bbsclass.MoveNext();
}
bbsclass.Close();
%>

	主　　　　题	主 题	回 复	最后发表	版　主
"+bbsclass.Fields.Item("classname").value+"
	【"+bbsname.Fields.Item("bbsname").value+"】    ※ "+bbsname.Fields.Item("miaoshu").value+"	"+bbsname.Fields.Item("num_title").value+"	"+bbsname.Fields.Item("num_reply").value); Response.Write("	"+bbsname.Fields.Item("lastreplier").value+" "); %> <%=bbsname.Fields.Item("lastreplytime").value%> <% Response.Write("	"+bbsname.Fields.Item("username").value+"

其中bbsclass纪录集为讨论区的分类，bbsname为具体讨论区。

是呀，这样我也看不清楚，说说哪里来得，呵呵，完整些！