السلام عليكم ورحمه الله وبركاته لدي تكست مخصصه لكتابه البريد الالكتروني
السؤال1 هو ازاي اتحقق من صحه البريد الالكتروني المدخل من حيث الصيغه المدخله؟
السؤال2 هو كيفيه التحقق من البريد الالكتروني من حيث هو موجود اصلا ام لا؟
(05-08-22, 04:39 PM)حسن الجلب كتب : [ -> ]السلام عليكم هل يوجد حل
وعليكم السلام
تفضل ، هذا هو الحل
ضع الإيميل الذي تريد اختباره في TextBox
كود :
' ضع هذا السطر في التصريحات العانة
Imports System.Text.RegularExpressions
' Public Class Form1 ضعه فوق السطر
Dim pattern As String
pattern = "^([0-9a-zA-Z]([-\.\w]*[0-9a-zA-Z])*@([0-9a-zA-Z][-\w]*[0-9a-zA-Z]\.)+[a-zA-Z]{2,9})$"
Dim mailToCheck As String = TextBox1.Text
If Regex.IsMatch(mailToCheck, pattern) Then
MsgBox("إيميل صحيح")
Else
MsgBox("إيميل غير صحيح")
End If
طب ازاي تتحقق من أن الايميل موجود اصلا؟
ازاي تتحقق من أن الايميل موجود علي الانترنت اصلا؟ يعني ازاي التحقق من انه ليس وهمي؟
في هذه الحالة الكود الذي أعطيتك إياه لن يجيب عن سؤالك ولن يفيدك .
أنت تحتاج إلى كود آخر يمكنه الاتصال بالنت والتحقق من مدى صحة الإيميل المكتوب.
حقيقة أنا لا أملك هذا الكود !
هل الرابط
هذا فيه الطريقة؟
احيانا اقرا كلمة واظن انها تحمل كل المعنى
