<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<%
set rs11=server.createobject("adodb.recordset")
sql = "select * from wenzhang where bigclassid=101 order by date asc"
rs11.open sql,conn,1,1
if Rs11.eof then
Response.Redirect "index.asp"
End if
id=request("id")
if id="" then
id=rs11("id")
end if
set rs12=server.createobject("adodb.recordset")
sql="select * from wenzhang where id="&id
rs12.open sql,conn,1,1
id2=rs12("id")
%>
<%=rs12("title")%><%=webtitle%>
<%
dim menuid
menuid=7
%>
<%
set rs=server.createobject("adodb.recordset")
sql = "select * from wenzhang where bigclassid=101 order by date asc"
rs.open sql,conn,1,1
if Rs.eof then
response.write""
End if
while not rs.eof
%>
