set rexp = new RegExp
rexp.Pattern="^([a-z]|\d|_|\-)+(\.([a-z]|\d|_|\-)+)*@([a-z]|\d|_|\-)+(\.([a-z]|\d|_|\-)+)*\.(([a-z]){2,})$"
rexp.IgnoreCase = True
set finds = rexp.Execute("email@domain.ru")
if finds.count<>0 then
%><hr><br><br><%=finds(0).value%><br><%
else
%><hr><br><br>invalid<br><%
end if
Я все про VB и ASP. Странность тут обнаружилась. При чтении записей из рекордсета, отдаваемого MS SQL Server поле типа Text читается только один раз. При попытке чтения из него инфы во второй раз - пусто, как будто ничего и не было. Остальные поля при этом по второму разу нормально прочитываются - varchar, int.. Выход, конечно, нашелся, но что-то мне эта странность ужасно не нравится... а как с ней бороться - не знаю. Открываю рекордсет так: Recs.Open SQL_Text, ADOConn. Мож для нормальной работы с полями этого типа нужны какие-то особые параметры открытия рекордсета?
(Ну, т.е. мне два раза надо присвоить это поле разным переменным в одном цикле. Вот.)