暂无留言
") else Allrecord=rs.Recordcount path=request.ServerVariables("path_info") rs.pagesize= system("email") on error resume next page=clng(request("page")) if page<1 then page=1 if page>rs.pagecount then page=rs.pagecount rs.AbsolutePage = Page For iPage = 1 To rs.PageSize RecNo = (Page - 1) * rs.PageSize + iPage %><%=rs("user")%> 于 <%=rs("addtime")%> 发表留言: <% If DateDiff("s", rs("addtime"), Now) <60*60*24 then %> <%end if %> |
<% if rs("toadmin")=1 then%>
<%response.write("(此留言正在通过审核,当前不可见……)")%>
<%else%>
<% if rs("show")=1 then%>
<%=left(rs("content"),150)%>
<%if rs("reply")<>0 then%>
老师回复:<%=rs("replytime")%> <%=rs("reply")%> |