<%@LANGUAGE="VBSCRIPT" CodePage="65001"%> <% Response.CharSet = "utf-8" Session.CodePage = "65001" %> <% id = isid(Request("id"),0) Set rs= Server.CreateObject("ADODB.Recordset") strSql="select * from p_main where id="&id rs.open strSql,Conn,1,1 xs_pai = Rs("s_pai") xS_name = rs("S_name") xs_img = rs("s_img") xs_content = rs("s_content") xs_time = rs("s_time") rs.close set rs=nothing %> <%=xs_name%><%=web_name%>
    <% sql = "select * from p_class where s_pai=0 order by s_order asc, id desc" Set Rs = Conn.Execute(sql) If Not Rs.Eof Then Do While Not Rs.Eof %>
  • "><%=Rs("s_name")%>
  • <% Rs.MoveNext Loop End If Rs.Close Set Rs = Nothing %>
网站首页 > 项目展示
<%=xs_name%>
发布时间:<%=formatdatetime(xs_time,2)%>


<%=xs_content%>