Form Mail Güvenlik

[AybatA]

Form Mail da güvenlik nasıl sağlanır?
yani db yok biliyorsunuz direk bana siteden mail geliyor. ama ben hiç düşünmediğim bir sorun oldu. Bir kendini bilmez insan form mail yoluyla bana yaklaşık 10.000 tane mail yolladı. onları silmekten cnm sıkıldı falan ama neyse sonunda hallettim. Şimdi nasıl bir önlem alabilirim?
ne yapabilirim. ne şekilde bunu engellerim. teşekkürler şimdiden..

[Turk_Corps]

Sayfana "Flood" kontol edici kod yerleştirmelisin..
Aşağıdaki kodu www.aspindir.com dan bulmuştum..
İşine yarar umarım..

************************************************** ******************

Kodu kullanmak istediğiniz sayfaya dahil ettiktewn sonra formunuzda guvenlik adında bir text alanı açın kullanıcı bizim oluşturduğumuz sayıyı bu alana girecek.
Veri tabanına kayıt yapmadan önce bu güvenlik kodu doğrumu diye kontrol edelim eğer doğruysa kayıt işlemi yapalım değilse uyarı verelim.Güvenlik.rar dosyası burada kullanılacak

<%
'//////////////////////////////////////////////////////////////////////////////////////////////////
'// ÖRNEK UYGULAMA
'//////////////////////////////////////////////////////////////////////////////////////////////////
if session("GVsifre")=Request.Form("guvenlik") Then
Session("GVsifre")="" ' önce bu güvenlik kodumuzu boşaltalımda geriye dönüp tekrar kayıt yapılamasın
'kayıt işlemi için gerekli kodlarınızı buraya yazın
Else
Response.Write "Lütfen güvenlik kodunu kontrol edin!..
Response.End
End if
%> Kolay gelsin..



<%
'//////////////////////////////////////////////////////////////////////////////////////////////////
'// RASGELE BİR SAYI OLUŞTURALIM
'//////////////////////////////////////////////////////////////////////////////////////////////////
For i = 1 To 8 ' 1 VE 8 ARASI
Randomize
'// asci 0'ın karakter değeri
bas=48
'// asci 9'un karakter değeri
son=57
'// 0 ile 9 arasındaki rakamlardan oluşan bir sayı elde edelim
rasgele=rasgele + chr(int((son - bas + 1) * rnd + bas))
'// bu sayıyı sessiona atıyalım
session("GVsifre")=rasgele
Next

'//////////////////////////////////////////////////////////////////////////////////////////////////
'// OLUŞTURDUĞUMZ SAYIYI RESİM YAPALIM
'//////////////////////////////////////////////////////////////////////////////////////////////////
Function SayiResim(sifrem)
sifrem = Replace (sifrem ,"0","[img]guvenlik/0.gif[/img]",1,-1,1)
sifrem = Replace (sifrem ,"1","[img]guvenlik/1.gif[/img]",1,-1,1)
sifrem = Replace (sifrem ,"2","[img]guvenlik/2.gif[/img]",1,-1,1)
sifrem = Replace (sifrem ,"3","[img]guvenlik/3.gif[/img]",1,-1,1)
sifrem = Replace (sifrem ,"4","[img]guvenlik/4.gif[/img]",1,-1,1)
sifrem = Replace (sifrem ,"5","[img]guvenlik/5.gif[/img]",1,-1,1)
sifrem = Replace (sifrem ,"6","[img]guvenlik/6.gif[/img]",1,-1,1)
sifrem = Replace (sifrem ,"7","[img]guvenlik/7.gif[/img]",1,-1,1)
sifrem = Replace (sifrem ,"8","[img]guvenlik/8.gif[/img]",1,-1,1)
sifrem = Replace (sifrem ,"9","[img]guvenlik/9.gif[/img]",1,-1,1)
SayiResim=sifrem
End Function

'//////////////////////////////////////////////////////////////////////////////////////////////////
'// EKRANA YAZALIMDA KULLANICI GÖREBİLSİN
'//////////////////////////////////////////////////////////////////////////////////////////////////
Response.Write "<p align='center'>"& SayiResim(rasgele)
%>

************************************************** *****
Bu kadar..Saygılar sunarım..

[serbil]

Formmail sayfasına giren kişinin ip adresini,tarihi ve 0 olan bir number ı database e yazdır.
Girişte tarih ve ip yi check et eğer o tarihte bu ip belirlediğin sayıya gelmişse izin verme yoksa mail attıktan sonra rakamı bir arttır.