<!--#include file="inc_ayarlar.asp"-->
<!--#include file="inc_fonksiyonlar.asp"-->
<%
intReklamID = Temizle(Request.Querystring("rID"))

If intReklamID <> "" AND IsNumeric(intReklamID) Then
	kdGenel.Open "SELECT URL, Tiklama FROm tblBanner WHERE Durum = True AND Banner_ID = "& intReklamID &"", adoCon, 1, 3
	If Not kdGenel.Eof Then
		iReklamTiklama = kdGenel("Tiklama")
		kdGenel("Tiklama") = iReklamTiklama + 1
		kdGenel.Update
		Response.Redirect kdGenel("Url")
	End If
	kdGenel.Close
End If

adoCon.Close
Set adoCon = Nothing
%>