<% LinkID=request("id") SiteUrl=request("url") if LinkID="" or SiteUrl = "" then response.write"" response.end end if set rs=server.createobject("adodb.recordset") sql="select Hits from JK_FriendSite where LinkID="&LinkID&"" rs.open sql,conn,1,3 rs("Hits")=rs("Hits")+1 rs.update rs.close set rs = nothing conn.close set conn = nothing Response.Redirect(SiteUrl) %>