asp mail kontrolü , instr?

Kodla Büyü

DotCom

Hiperaktif Üye
Hiperaktif
Mesajlar
2,909
selam ,

kullanıcını girdiği mail adresinde 2 tane @ işaret olup olmadığını kontrol etmek için

<%
sonuc = 0
sonuc2 = 0
mail=request.Form("mail")
sonuc = instr (mail,"@")
if sonuc <>0 then
sonuc2=instr(9 , mail , "@")
if sonuc2<>0 then
response.write("2 tane @ işareti var lütfen kontrol edin")
end if
end if
%>

komutlarını kullanıyorum insrtnin syntaxi instr (başlanacak karakter , metin , aranacak metin) olduğuna göre sonuc ve sonuc2 değerleri aynı çıkıyor neden? Ne önerirsiniz?
 
<%
sonuc = 0
sonuc2 = 0
mail=request.Form("mail")
sonuc = instr (mail,"@")

if sonuc <>0 then
stryeni=Mid(mail,sonuc+1,len(mail)-sonuc)
sonuc2=instr(stryeni , "@")
if sonuc2<>0 then
response.write("2 tane @ işareti var lütfen kontrol edin")
else
response.write("tek @ işareti var geçerli")
end if
end if
%>
 
Geri
Üst