چک کردن ایمیل [بایگانی]

Laia2005

سه شنبه 11 بهمن 1384, 21:11 عصر

آیا می توان فهمید که فرمت ایمیلی که در کادر متن وارد شده درست است ؟

Hamid_PaK

چهارشنبه 12 بهمن 1384, 06:18 صبح

اولین و ساده ترین روش : چک کن ببین توی رشه حرف " @ " وجود داره یا نه اگه جاش بزرگتر از 1 بود درسته ( البته بستگی داره چطور آدرس میلی هست ولی معمولا آدرس میل باید بیشتر از 3 کاراکتر باشه پس جای اتساین میشه 4 ) ...

یا حق !!!

Laia2005

چهارشنبه 12 بهمن 1384, 14:01 عصر

اولین و ساده ترین روش : چک کن ببین توی رشه حرف " @ " وجود داره یا نه اگه جاش بزرگتر از 1 بود درسته ( البته بستگی داره چطور آدرس میلی هست ولی معمولا آدرس میل باید بیشتر از 3 کاراکتر باشه پس جای اتساین میشه 4 ) ...

یا حق !!!

یکی از دوستانم می گفت یک تابع این کار را میکنه البته استاندارد

SATTAR

چهارشنبه 12 بهمن 1384, 15:09 عصر

بازم بهترین راه توابع API هست که استاندارد بودن URL یا ایمیل رو چک میکنه.
تو راهنمای SDK توی دلفی میتونی پیداش کنی

آیدا رضایی

چهارشنبه 12 بهمن 1384, 23:24 عصر

این تابع رو جناب SalarSoft نوشتند و قدیما من در همین سایت دیده بودم و Save کرده بودم.

Function IsValidMail(mail:string):Boolean;
var
i,Dot,AtSine:longInt;
tmpMail:string;
ch:char;
begin
result:=false;
If mail='' then exit;
tmpMail:=lowercase(mail);
AtSine:=pos('@',tmpMail);
Dot:=PosEx('.',tmpMail,atsine);
If Dot>AtSine then begin
for i:=1 to length(tmpMail) do begin
ch:=(tmpMail[i]);
If not( (ch in ['a'..'z']) or (ch in ['0'..'9']) or (ch in ['-','_','.']) ) then
begin
Result:=false;
Exit;
end;
end;
Result:=True;
end;
end;