% if Request.Cookies("admin")="" then Response.Redirect("/2011") response.end() end if tt="发表新文章" title="新文章标题" content="新文章内容" mode="add" if Request.QueryString("id")<>"" then Set rs= Server.CreateObject("ADODB.RecordSet") sql="select * from content where id="& Request.QueryString("id") &"" id="&id=" & Request.QueryString("id") rs.open sql,conn,3,3 if rs.eof then Response.Redirect("/2011") mode="edit" title=rs("title") tt="修改文章:"&title content=rs("content") cid=rs("cid") if rs("toptime")<>"" then chk="checked" rs.close() end if if Request.QueryString("type")="add" then Set rs= Server.CreateObject("ADODB.RecordSet") sql="select * from content" rs.open sql,conn,3,3 rs.addnew if Request.Form("cid")<>"" then rs("cid")=Request.Form("cid") if Request.Form("cida")<>"" then rs("cid")=Request.Form("cida") if Request.Form("zd")<>"" then rs("toptime")=date() & " " & time() rs("time")=date() & " " & time() rs("title")=Request.Form("title") rs("content")=Request.Form("nr") if Request.Form("title")="" then response.end() rs.update rs.close Set rsa= Server.CreateObject("ADODB.RecordSet") sqla="select top 1 * from content ORDER BY id DESC" rsa.open sqla,conn,3,3 Response.Redirect("cont.asp?id="&rsa("id")) end if if Request.QueryString("type")="edit" then Set rs= Server.CreateObject("ADODB.RecordSet") sql="select * from content where id="& Request.QueryString("id") &"" rs.open sql,conn,3,3 if Request.Form("cid")<>"" then rs("cid")=Request.Form("cid") if Request.Form("cid")="" then rs("cid")="" if Request.Form("zd")<>"" then rs("toptime")=date() & " " & time() if Request.Form("zd")="" then rs("toptime")="" rs("time")=date() & " " & time() rs("title")=Request.Form("title") rs("content")=Request.Form("nr") rs.update rs.close Response.Redirect("cont.asp?id="&Request.QueryString("id")) end if if Request.QueryString("cid")<>"" then cid=Request.QueryString("cid") Set rsq= Server.CreateObject("ADODB.RecordSet") sqlq="select DISTINCT cid from content" rsq.open sqlq,conn,3,3 cida="现有类别(点击使用):" for i=1 to rsq.RecordCount cida=cida&""&rsq("cid")&"" rsq.movenext next rsq.close() %>