1. 1C / Говнокод #10295

    −119

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    11. 11
    12. 12
    13. 13
    14. 14
    15. 15
    16. 16
    17. 17
    18. 18
    19. 19
    20. 20
    21. 21
    22. 22
    23. 23
    24. 24
    25. 25
    Функция ЧекМайл(Майл) 
        
    	Перем Чек;
    	
    	Если Найти(Майл,"@mail.ru")<>0 Тогда
    		
    		Чек = 0; 
    		
    	Иначе	
    		
    		Чек = 1;
    		
    	КонецЕсли;
    	
    	Возврат Чек;
    	
    КонецФункции
    
    ...
    	  Если ЧекМайл("[email protected]") = 0 Тогда
    	  	 Предупреждение("Ой! Что-то пошло не так!");
    	  	 Предупреждение("Не беспокойтесь, это наша ошибка. Мы уже знаем о ней и примем меры к ее исправлению!");
    	  	 СтатусВозврата(0);
    	  	 Возврат;
    	  КонецЕсли;

    могли и предупредить ...

    Запостил: informatikmarazmatik, 16 Мая 2012

    Комментарии (10) RSS

    • как теперь без gАватарки :.(..
      Ответить
    • Процедура ЧенджМайл(олдМайл,ньюМайл)

      Если Вопрос("Вы действительно хотите заменить е-майл "+олдМайл+" на "+ньюМайл,0) = 1 Тогда

      Если Вопрос("Будет заменен старый е-майл "+олдМайл+" на новый "+ньюМайл+". Продолжить?",0) = 1 Тогда

      олдМайл = ньюМайл;

      КонецЕсли;

      КонецЕсли;

      КонецПроцедуры

      олдМайл = "[email protected]";
      ньюМайл = "[email protected]";

      ЧенджМайл(олдМайл,ньюМайл);
      Ответить
    • Чек по почте высылают?
      Ответить
    • не.. теперь расчетный счет пополняют, моментуммаэстро снимаю ...
      Ответить
    • 1) Транслит наоборот
      2) Самый строгий валидатор электронного адреса: e-mail должен оканчиваться на @mail.ru
      3) Даже тест-юнит написан, все не просто так.
      Ответить
      • 2 - не заканчиваться, а содержать.
        Стоп, если подстрока находится, то она возвращает ноль? Меня вот это <>0 в 5й строке пугает.
        Ответить
    • Перем Чек;

      Если Найти(Майл,"@mail.ru")<>0 Тогда

      Чек = 0;

      Иначе

      Чек = 1;

      КонецЕсли;

      Возврат Чек;

      Учитесь, люди, учитесь, вот как надо из одной строчки делать 15!
      Ответить
    • .
      Ответить
    • >перем чек
      Странный у меня ассоциативный ряд конечно, но эта строчка мне говорит что кто-то СПЕР ЧЕК.
      Ответить
    • Т.е. любая почта на @mail.ru будет вызывать панику!
      Ответить

    Добавить комментарий