Проверка на корректность данных

27.07.2010, 12:33. **Показов** 862. **Ответов** 2

Author24 — интернет-сервис помощи студентам

Народ как мне проверить входящее значение на допустимые символы, что-бы данная переменная состояла только из английских букв без всяки символов типа '='$& и т.д. т.е. удалять автоматически данные символы из переменной?

@pl · 27.07.2010, 12:42

Код

Function ReplaceBad(strng)
	Dim regEx
	Set regEx = New RegExp
	regEx.Pattern = '[^A-Za-z]'
	regEx.IgnoreCase = True
	regEx.Global = True
	ReplaceBad = regEx.Replace(strng, '')
End Function

28.07.2010, 15:49

Спасибо большое

MAX2002
		1
	Проверка на корректность данных 27.07.2010, 12:33. Показов 862. Ответов 2 Метки нет (Все метки) Народ как мне проверить входящее значение на допустимые символы, что-бы данная переменная состояла только из английских букв без всяки символов типа '='$& и т.д. т.е. удалять автоматически данные символы из переменной?

@pl 51 / 17 / 6 Регистрация: 18.05.2007 Сообщений: 1,322
	27.07.2010, 12:42	2
	Код Function ReplaceBad(strng) Dim regEx Set regEx = New RegExp regEx.Pattern = '[^A-Za-z]' regEx.IgnoreCase = True regEx.Global = True ReplaceBad = regEx.Replace(strng, '') End Function 0

	28.07.2010, 15:49