<%=home%>

<% page=request.querystring("page") if page="" then page=1 end if pages = pages set rstopic2 = server.createobject("adodb.recordset") sql = "select * from guestbook where shenhe<>0 order by time desc" rstopic2.open sql,conn,1,3 if not(rstopic2.BOF or rstopic2.EOF) then rstopic2.pagesize = pages maxpagecount=rstopic2.pagecount r=cint(rstopic2.RecordCount)'记录总数 rstopic2.absolutepage = page '当前页数 rcount=0 pagestart=page-3 pageend=page+3 if pagestart<1 then pagestart=1 end if if pageend>maxpagecount then pageend=maxpagecount end if do while not rstopic2.eof and rcount <% if trcolor="" then bgcolor1=""&tColor2&"" bgcolor2=""&tColor1&"" trcolor=1 else bgcolor1=""&tColor1&"" bgcolor2=""&tColor2&"" trcolor="" end if %> > <% rstopic2.movenext rcount=rcount+1 loop set rstopic2=nothing %> <%else%> 开幕式即将开始

<%end if%>

<%=rstopic2("username")%>
　

class=tdc style="Word-Break:Break-all" width="462"> <% if rstopic2("laccess")="1" and Session("guestbookfeiyue") = "" then%> <%else%> <%=ubbcode(rstopic2("content"))%> <%end if%> <% sqlr="select * from reply where t_id="&rstopic2("id")&"" set rsr=conn.execute(sqlr) ii=0 if not (rsr.eof or rsr.bof) then do while not rsr.eof if ii mod 3=1 then response.write("

") elseif ii mod 3=2 then response.write("

") else response.write("

") end if %> <% rsr.movenext ii=ii+1 loop set rsr=nothing end if %>