<% ID = replace(trim(request.querystring("ID")),"'","") 'LinkUrl = replace(trim(request.querystring("Link1")),"'","") tempStr=Request.ServerVariables("query_string") n=InStr(tempStr,"Link1=") if n>0 then LinkUrl=Mid(tempStr,n+6) end if if ID<>"" and IsNumeric(ID) then conn.execute("update [07ad] set Hits=Hits+1 where ID="&ID) conn.execute("insert [07adCount](adID,VisitIP) values("&ID&",'"&Request.ServerVariables("REMOTE_ADDR")&"')") if LinkUrl="" then response.redirect"http://www.ithlj.com/" else response.redirect(LinkUrl) end if else response.redirect"http://www.ithlj.com/" end if %>