%@LANGUAGE="JAVASCRIPT" CODEPAGE="936"%>
<%id=request("id") set rs=server.CreateObject("adodb.recordset") set rs1=server.CreateObject("adodb.recordset") set rs2=server.CreateObject("adodb.recordset") if len(id)<>0 then sql="select * from v_paper where id="+cint(id) else sql="select top 1 * from v_paper where typename='中心动态' order by id desc" end if rs.open sql,conn,1,1 if rs.eof then response.Write("") else id=rs("id") typename1=rs("typename") title=rs("title") content=rs("content") point=rs("point") point=point+1 conn.execute("update paper set point="&point&" where id="&id&"") sqltype="select top 15 * from v_paper where typename='中心动态' order by id desc" rs1.open sqltype,conn,1,1 %>