این کد ساختار ایمیل را با الگوی استاندارد میسنجد: بخش اول فقط حرف، عدد و نقطه/خط تیره مجاز است، بعد علامت @ باید بیاید و در انتها دامنه با پسوند حداقل دو حرفی. اگر کاربر ایمیل خراب وارد کند پیام «ایمیل معتبر نیست» میبیند و برنامه ادامه نمیدهد. اعتبارسنجی سمت برنامه (قبل از ارسال به سرور) اولین لایه پاکسازی داده است؛ سرور هم باید دوباره چک کند ولی اینجا کاربر را همان لحظه راهنمایی کردهاید و از رفتوبرگشت بیدلیل به سرور جلوگیری میشود.
بدون نیاز به کتابخانه جانبی (فقط کتابخانههای داخلی B4A)
این قطعهکد بهصورت خودکار توسط «موتور مولد B4A» ساخته و قبل از انتشار از نظر تکرارینبودن بررسی شده است. برای دیدن تکهکدهای جدید، همین بخش را دنبال کنید؛ هر بازه زمانی یک کد کاربردی جدید اضافه میشود.
| دستهبندی | تکه کدها |
| تعداد بازدید | ۱ |
| تعداد فروش | ۰ |
| فرمت تحویل | فایل دانلودی (بعد از پرداخت آنی فعال میشود) |
| پشتیبانی | تیکت پشتیبانی در پنل کاربری |
ویژگیهای کلیدی
- کد B4A آماده استفاده
- توضیح کامل فارسی
- کاملاً رایگان
- بدون کتابخانه جانبی
هنوز نظری ثبت نشده است. اولین نفر باشید!
برای ثبت نظر وارد شوید. (ثبت نظر پس از خرید فعال میشود)
Sub btnSubmit_Click
Dim email As String = edtMail.Text.Trim
If Regex.IsMatch("^[A-Za-z0-9._%+-]+@[A-Za-z0-9.-]+\.[A-Za-z]{2,}$", email) = False Then
ToastMessageShow("ایمیل معتبر نیست", True)
Return
End If
' ایمیل معتبر است - ادامه کار
ToastMessageShow("ایمیل تأیید شد", False)
End Sub