<%
ID=Request.QueryString("id")
If Not IsNumeric(ID) Then Response.redirect "/" ' sql koruması. id değeri sayı değilse ana dizine yönlendirildi
If ID="" Then Response.redirect "/" ' id boş ise ana dizine yönlendirildi
Set rs=Server.CreateObject("ADODB.Recordset")
sql="SELECT * FROM tablo WHERE id="&Cint(ID)&""
rs.open sql,Bag,1,3
If Not rs.eof Then ' eğer kayır var ise veri ekrana yazıldı
response.write rs("oyun_adi")
Else ' eğer alınan id kaydı yoksa ekrana kayır yok yazıldı
response.write "Bu ID'e ait kayıt bulunamadı."
End If
%>
hade kolay gelsin