<% url=Request.Querystring("url") set my_conn= Server.CreateObject("ADODB.Connection") my_Conn.Open (wConn_String) strSql = "UPDATE banner SET hit=hit+1 WHERE id="&MakeSqlZahl(Request.Querystring("ID")) my_conn.Execute (StrSql) my_conn.Close set my_conn = nothing if Request.Querystring("tlurl")<>"" then Response.Redirect("/goto_toplink.asp?url="&Request.Querystring("tlurl")&"&id="&Request.Querystring("tlid")) end if '** if left(url,4)<>"http" then '** url="http://www."&FDBADRESS&"/"&url '** end if Response.Redirect (url) %> automatische Weiterleitung...

Sie werden gleich weitergeleitet...

 

Sollte die Weiterleitung nicht funktionieren, klicken Sie bitte <% if Request.Querystring("tlurl")<>"" then%> &id=<%=Request.Querystring("tlid")%>">hier.<% else%> ">hier.<% end if%>