ru.cgi.perl

 
 - RU.CGI.PERL ------------------------------------------------------------------
 From : Comoderator of RU.CGI.PERL           2:5020/371.32  20 Aug 2001  10:53:15
 To : Nail Shayahmetov
 Subject : Moderatorial [+] (Re: :()
 -------------------------------------------------------------------------------- 
 

 NS> ЙН[ю]ННННННННННННННННННННН[Рад Вас видеть All!]ННННННННННННННННННННН[ю]Н^P
 NS> Иѕ
 
 NS> Целый день вожусь с этим скриптом (точнее, с частью последнего). По идее
 NS> должен проверять правильность заполнения е-мейла, но зарегистрироваться
 NS> окончательно не дает, пишет: Email address seems incorrect (check @ and
 NS> .'s). Что неверно? Если не в лом, то исправте. Продолжение письма внизу.
 
 NS> <-----------Clipboard----------->
 
 NS> if (document.signup.email.value<=null)
 NS>   {
 NS>     alert('Пожалуйста, введите значение поля "E-mail"');
 NS>     document.signup.email.focus();
 NS>     document.signup.email.select();
 NS>     return false;
 NS>   }
 
 NS> if (document.signup.elements[13].value != null)
 NS>         {
 NS>         var retval = emailCheck(document.signup.elements[13].value)
 NS>         document.signup.elements[13].focus();
 NS>         document.signup.elements[13].select();
 
 NS>                 if (retval == true)
 NS>                 document.signup.submit();
 NS>          else
 NS>         return false;
 NS>         }
 NS>  }
 
 NS>  function emailCheck (emailStr) {
 NS> var emailPat=/^(.+)@(.+)$/
 NS> var specialChars="\\(\\)<>@,;:\\\\\\\"\\.\\[\\]"
 NS> var validChars="\[^\\s" + specialChars + "\]"
 NS> var quotedUser="(\"[^\"]*\")"
 NS> var ipDomainPat=/^\[(\d{1,3})\.(\d{1,3})\.(\d{1,3})\.(\d{1,3})\]$/
 NS> var atom=validChars + '+'
 NS> var word="(" + atom + "|" + quotedUser + ")"
 NS> var userPat=new RegExp("^" + word + "(\\." + word + ")*$")
 NS> var domainPat=new RegExp("^" + atom + "(\\." + atom +")*$")
 NS> var matchArray=emailStr.match(emailPat)
 
 NS> if (matchArray==null) {
 NS>         alert("Email address seems incorrect (check @ and .'s)")
 NS>         return false
 NS> }
 NS> var user=matchArray[1]
 NS> var domain=matchArray[2]
 NS> if (user.match(userPat)==null) {
 NS>     // user is not valid
 NS>     alert('Hекорректное имя пользователя');
 
 NS>     return false
 NS> }
 
 NS> /* if the e-mail address is at an IP address (as opposed to a symbolic
 NS>    host name) make sure the IP address is valid. */
 NS> var IPArray=domain.match(ipDomainPat)
 NS> if (IPArray!=null) {
 NS>     // this is an IP address
 NS>           for (var i=1;i<=4;i++) {
 NS>             if (IPArray[i]>255) {
 NS>                 alert('Hеверный IP адрес!')
 
 NS>                 return false
 NS>             }
 NS>     }
 NS>     return true
 NS> }
 
 NS> // Domain is symbolic name
 NS> var domainArray=domain.match(domainPat)
 NS> if (domainArray==null) {
 NS>         alert('Hеверное имяядомена')
 NS>     return false
 NS> }
 
 NS> /* domain name seems valid, but now make sure that it ends in a
 NS>    three-letter word (like com, edu, gov) or a two-letter word,
 NS>    representing country (uk, nl), and that there's a hostname preceding
 NS>    the domain or country. */
 
 NS> var atomPat=new RegExp(atom,"g")
 NS> var domArr=domain.match(atomPat)
 NS> var len=domArr.length
 NS> if (domArr[domArr.length-1].length<2 ||
 NS>     domArr[domArr.length-1].length>3) {
 NS>    // the address must end in a two letter or three letter word.
 NS>     alert('Адрес должен заканчиватьсяяименем домена из двух или трех букв')
 
 NS>    return false
 NS> }
 
 NS> // Make sure there's a host name preceding the domain.
 NS> if (len<2) {
 NS> //   var errStr="This address is missing a hostname!"
 NS>   alert('В адресе отсутствует имя хоста')
 
 NS>    return false
 NS> }
 NS> return true;
 NS> }
 NS> //  End -->
 
 NS> <-----------Clipboard----------->
 
 NS> И еще подскажите, где готовых скриптов взять, чтобы организовать на сайте
 NS> форумы, парольный вход (про это хотелось бы подробнее и услышать. Как идет
 NS> весь процесс, куда формы клиентов кидает, откуда при повторном входе
 NS> зарег. пользователей пароли и логины берет и т.п.). Еще бы скрипт чтобы
 NS> автомат. дату менять, сам писал подобного рода (31 декабря, воскресенье,
 NS> 2001г), нужно - 31.12.01. Можно ли провернуть вещь: на каждой странице
 NS> есть курс доллара, страниц много, а курс менять на каждой неудобно. Какой
 NS> нужен скрипт, чтобы его прописать на каждой странице, а уже внутри самого
 NS> скрипта курс менять, соотв. он бы отображал на всех страницах, то что мне
 NS> нужно. Может еще какие-нить полезные скрипты подкините. Может адресок
 NS> кините, где это все есть или подробно описывается. Hе ругайте сильно, что
 NS> так много прошу. Просто я в этих делах не очень, а сроки поджимают.
 NS> Войдите в положение :(. Заранее благодарен. Ответы можно нетмейлом.
 
 NS> P.S. Co(Moderator) Извините, сли оффтопик.
 
 Извиню с удовольствием. Hо из плюсомета все равно выстрелю. Hе просто
 оффтопик, а очевиднейший. Hи перла, ни CGI. Вопросы, которые умещаются в рамки
 топика, можешь задать еще раз.
 
 Да, как программист, должен заметить, что просьбу войти в положение после
 такого списка вопросов следует сопровождать указанием суммы, с которой ты ради
 этого готов расстаться...
 
 -- 
 FIDO: Artem Chuprina, 2:5020/371.32, comoderator of RU.CGI.PERL
 Internet: Artem Chuprina <cmrcp@ran.pp.ru>, comoderator of fido7.ru.cgi.perl
 --- slrn/0.9.7.0 (Linux)
  * Origin: AKA с подствольным плюсомётом (2:5020/371.32)
 
 

Вернуться к списку тем, сортированных по: возрастание даты  уменьшение даты  тема  автор 

Тема:    Автор:    Дата:    :(   Nail Shayahmetov   18 Aug 2001 20:21:00   Moderatorial [+] (Re: :()   Comoderator of RU.CGI.PERL   20 Aug 2001 10:53:15