ПХП скрипта за тестирање ваљаности адреса е-поште

Питање

Питам се да ли постоји ПХП рјешење (или друго) за тестирање ваљаности адресе е-поште?

Решење

Пробајте ово:

 функција валидате_емаил ($ емаил) {$ маилпартс = експлодира ("@", $ емаил); $ хостнаме = $ маилпартс [1]; // потврдите синтаксу адресе е-поште $ екп = "^ [аз 0-9] + ([._-] [аз 0-9] +) * @ ([а-з0-9] + ([. _-] [а-з0-9] +)) + $ "; $ б_валид_синтак = ереги ($ екп, $ емаил); // добија мк адресе по гетмкрр $ б_мк_аваил = гетмкрр ($ хостнаме, $ мк_рецордс, $ мк_веигхт); $ б_сервер_фоунд = 0; иф ($ б_валид_синтак && $ б_мк_аваил) {// копира мк записи и тегло в низ $ мкс $ мкс = арраи (); за ($ и = 0; $ и 

"; ендиф; иф (! ис_стринг ($ номорганизатион)) $ мсг. =" Ле шампиони Ном де л'организатион доит етре уне цхаине де царацтере

"; иф (празна ($ сервице)) $ мсг. =" Ау моинс уне цасе сервице доит етре цоцхее

"; иф (празна ($ фонцтион)) $ мсг. =" Уна фонцтион доит етре селецтионнее

"; иф (емпти ($ емаил)) $ мсг

"; елсеиф (! ерег (" ^ (. +) @ (. +) "(. +) $", $ емаил)) $ мсг.

елсеиф (валидате_емаил ($ емаил) == 0) {ецхо 'Неисправна адреса е-поште!'; $ мсг. = 'Неисправна адреса е-поште!';} елсе {ецхо 'Е-маил адреса је важећа'; ;}

Захваљујући за овај савет.

Претходни Чланак Sledeći Чланак

Топ Савети