<% dim letterKind letterKind=request("letterKind") if letterKind="" then letterKind=83 else letterKind=request("letterKind") kindname=request.QueryString("关于我们") end if set rs=server.CreateObject("adodb.recordset") sqlcmd="select top 1 id,title,smallImg,content from letter where letterKind="&letterKind&" and is_show order by id desc" rs.open sqlcmd,conn,1,1,1 if rs.eof then response.write "


对不起,暂无内容!
" else %>
  About us
  <%=left(trim(rs("content")), 450)%>.......
<%end if rs.close set rs=nothing conn=close 'set conn=nothing %>
   
  Web News
More……