Мой Kbyte.Ru
Рассылка Kbyte.Ru
Группы на Kbyte.Ru
Партнеры Kbyte.Ru
Реклама
Сделано руками
Сделано руками
> Исходные коды - Интернет -

Visual Basic .NET - Регулярные выражения

Все примеры / Строки / Регулярные выражения

Проверка e-mail на правильность

Автор: Интернет | добавлено: 30.07.2011, 21:55 | просмотров: 2972 (1+) | комментариев: 0 | рейтинг: *x3
Простая функция, работающая при помощи регулярных выражений, проверяет введенный email адрес на правильность

Код

Imports System.Text.RegularExpressions

Public Class Form1
 Public Function IsValidEmail(ByVal email As String) As Boolean
  Dim pattern As String = "^[-a-zA-Z0-9][-.a-zA-Z0-9]*@[-.a-zA-Z0-9]+(\.[-.a-zA-Z0-9]+)*\." & _
  "(com|edu|info|gov|int|mil|net|org|biz|name|museum|coop|ru|aero|pro|tv|[a-zA-Z]{2})$"
  Dim check As New Regex(pattern, RegexOptions.IgnorePatternWhitespace)
  Dim valid As Boolean = False
  If String.IsNullOrEmpty(email) Then
   valid = False
  Else
   valid = check.IsMatch(email)
  End If
  'return the value to the calling method
  Return valid
 End Function
End Class
Об авторе

Интернет

Анонимный пользователь сети Интернет. Автор великого множества кодов и программных решений. Никого никогда не видел в лицо этого пользователя, ходят слухи, что он многоликий, и может одновременно находиться в разных частях света.
Интернет
Последние комментарии (всего: 0)

Добавлять комментарии могут только зарегистрированные пользователи сайта.
Если у Вас уже есть учетная запись на Kbyte.Ru, пройдите процедуру авторизации OpenID.
Если Вы еще не зарегистрированы на Kbyte.Ru - зарегистрируйтесь.


Нет комментариев...

Авторизация
 
OpenID
Зарегистрируйся и получи 10% скидку на добавление своего сайта в каталоги! Подробнее »
Поиск по сайту
Реклама
Счетчики