Şub
14Çoğu zaman formlarda girilen email adreslerinin doğruluğunu öğrenmek isteriz. Bunun için çözüm olarak bir fonksiyona ihtiyacımız olacaktır. İşte bu sorununuzu aşmak için kullanacağınız bir fonksiyon veriyorum.
Function smtpmail(str)
et = instr(2, str , "@" )
if et = vbisnull then
smtpmail = false
else
etK = et
et = true
end if
if et = true then
nkt = instr(etK + 2, str , "." )
if nkt = vbisnull then
smtpmail = false
else
smtpmail = true
end if
else
smtpmail = false
end if
End Function
%>
Ve kodu çalıştırabilmeniz için aşağıdaki şekilde fonksiyonu çağırmanız yeterli olacaktır.
email = "aspogren@aspogren.net"
If smtpmail(email) = false then
response.write "Email adresi hatalı"
Else
response.write "Email adresi doğru"
End If
%>
8 yorum var
#176.-missfreedom-02 Mayıs 2007 Çarşamba
harikasin, ellerine saglik..............
#194.-VoLkaN iriç-16 Mayıs 2007 Çarşamba
Arkadaşlar VoLkaN@voLki.net Adresim var Sunu Nasil Dogrulayabiliriz Domain Başkasinin Eqer ßunu Daha Farkli Sekilde bilen arkadaş varsa Yardimci olursa Sevinirim k0caeli@msn.com
#231.-aysegul yıldız-15 Haziran 2007 Cuma
msn de dogrulamadı yazıyor . buna çözüm istiyorum .teşekkür ederim.
#279.-Abdullah ÖZDEMİR-12 Temmuz 2007 Perşembe
Arkadaşlar msn le ilgili değil bu. O yüzden heyecanlanmayın =)
#300.-Yunus Emre-28 Temmuz 2007 Cumartesi
Mükemmel bir çalışma tebrik ediyorum. Her yazılımcı için şart bu fonksiyon. Devamını bekliyoruz
Team yee
Yunus Emre EVKURAN
#344.-love hunter-23 Eylül 2007 Pazar
ya benim wep istem var love_hunter@forumpapatya.com mailmi dogrulamak istiyorum ama bir turli olmuyor daha once cok yaptim ama bu mailime dogrulama maili gelmiyor
yardimlairn icin şimiden tşk
lezetliask@hotmail.com
#370.-yalnız sirseli-16 Ekim 2007 Salı
yaf bende seni-seviyom@canima.com.com diye bi e mail adresi aldım kendime e mail doğrulama zımbırtısı gönderiyom ama adresi giriyom gelener kısmı diye bir yer çıkmıyo msn yide açıyom ama mektup işaretine tıklayamıyom olmuyo gelenler kısmındaki iletiyi açın adresinizi doğrulayın diyo ama giremiyomki açayım 
( ağlarım bakk hee cevap yazın bana
bekliyom. hayat mamak falan filan meselesi bak sakın verdiğim adresleri patlatmayın karışmam heee.
valla darılırım küserim .... teşekkür ederim simdiden
#434.-burhan akkuş-06 Aralık 2007 Perşembe
ben kendime email yapkma
