<%conn.execute("update benming_ch_news set hits=hits+1 where newsid="&request.querystring("id")&"") Set rs = Server.CreateObject("ADODB.Recordset") sql="select hits from benming_ch_news where newsid="&request.querystring("id") rs.open sql,conn,1,1 response.write "document.write("&rs("hits")&")" rs.close Set rs=nothing %>