<% rem 精华按留言本方式查看 Set RS = Server.CreateObject("ADODB.RecordSet") rs.Open exec, Conn, 0, 1 do until rs.eof %>
<%if rs("jh")=1 then %> <%else%> <%end if%> " align=absmiddle> <%=rs("title")%>
<%if rs("email")<>"" then %> " title="<%=rs("email")%>">邮箱 <% else %> 邮箱 <% end if %> <% if rs("qq")<>"" then %> " target="_blank" title="<%=rs("qq")%>">QQ <% else %> QQ <% end if %> <%if rs("url")<>"http://" then %> " target="_blank" title="<%=rs("url")%>">主页 <% else %> 主页 <% end if%>
" alt=<%if rs("male") then response.write "帅哥" else response.write "美眉"%> >
<% response.write rs("name") if rs("bl")=1 then if isMaster(rs("name")) then response.write "" else response.write "" end if end if%>
<%=ubbcode(rs("nei"))%>
  [ 发表时间:<%=rs("t")%> ] <% if theUser.reged then %> ">编辑 <% else %> 编辑 <% end if if theUser.master then %> ">管理 IP:<%=rs( 来源:<%=rs("comefrom")%>"> <% else %> 管理 IP:保密
来源:保密 <% end if %> 返上

<% rs.movenext loop rsclose() connclose() %>