<%id=replace(trim(request("id")),"'","")sql="select * from hotel where id="&id&""set rs=server.CreateObject("ADODB.recordset")rs.open sql,conn,1,3if rs.eof then response.write "":response.endsql_hits="Update hotel Set hits=hits+1 where id="&id&""conn.Execute(sql_hit...