[حسن الجلب]

السلام عليكم ورحمه الله وبركاته لدي تكست مخصصه لكتابه البريد الالكتروني 
السؤال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

[حسن الجلب]

طب ازاي تتحقق من أن الايميل موجود اصلا؟

[أبو خالد الشكري]

للأسف لم أفهم سوالك .

[حسن الجلب]

ازاي تتحقق من أن الايميل موجود علي الانترنت اصلا؟ يعني ازاي التحقق من انه ليس وهمي؟

[أبو خالد الشكري]

في هذه الحالة الكود الذي أعطيتك إياه لن يجيب عن سؤالك ولن يفيدك .
أنت تحتاج إلى كود آخر يمكنه الاتصال بالنت والتحقق من مدى صحة الإيميل المكتوب.

حقيقة أنا لا أملك هذا الكود !

[سعود]

هل الرابط هذا فيه الطريقة؟
احيانا اقرا كلمة واظن انها تحمل كل المعنى