Бухгалтерия / Говнокод #13008 Ссылка на оригинал

0

  1. 1
  2. 2
  3. 3
  4. 4
  5. 5
  6. 6
  7. 7
  8. 8
  9. 9
  10. 10
Попытка
	ФС.КопироватьФайл(Каталог+Файл+Расширение,НовоеИмя,1);
	Если ФС.СуществуетФайл(НовоеИмя)=0 Тогда
		СоздатьОбъект("АбсолютнаяЧушь");
	КонецЕсли;
	НовоеЗначение=Сред(НовоеИмя,СтрДлина(Лев(КаталогИБ(),СтрДлина(КаталогИБ())-1)+"-MEDIA\")+1);
	НовоеСтрока=НовоеЗначение;
Исключение
	Предупреждение("Не удаётся скопировать файл!",5);
КонецПопытки;

Классный способ вызвать исключение.

Запостил: jerokee jerokee, (Updated )

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

  • ava eth0 # Ссылка на оригинал 0

    Вроде как в 7.7 нельзя вызывать исключение оператором ВызватьИсключение ниоткуда, только как из блока Исключение/КонецПопытки, что само по себе слегка упорото. Кто-то делит на ноль, кто-то делает ещё что похожее.
    Ответить

    • ava jerokee # Ссылка на оригинал 0 ⇈

      Я, вообще, не вижу смысла вызывать исключение в данном случае. ФС,СуществуетФайл вернула ноль - "все в сад". В этой конструкции все равно нет больше мест, что что-то "грохнется в красный фонарь".
      Ответить

      • ava bormand # Ссылка на оригинал 0 ⇈

        Как это нет? А ФС.КопироватьФайл разве не вбросит исключение при ошибке?
        Ответить

        • ava jerokee # Ссылка на оригинал 0 ⇈

          Неа... И ФС.СоздатьКаталог() тоже не валится... И ПереименоватьФайл тоже... Приходится всегда проверять результат.
          Ответить

  • ava tirinox # Ссылка на оригинал 0

    > СоздатьОбъект("АбсолютнаяЧушь");
    Создание объекта прошло успешно!
    Ответить

    • ava bormand # Ссылка на оригинал 0 ⇈ 

      Попытка
    СоздатьОбъект("АбсолютнаяЧушь");
    Предупреждение("Кто-то написал абсолютную чушь!");
    СоздатьОбъект("Абракадабра");
    Предупреждение("И абракадабра тоже есть...");
    СоздатьОбъект("ПрвыволФырворфыв");
Исключение
    ...
КонецПопытки
      Ответить

  • ava mrbus # Ссылка на оригинал 0

    Продолжаем глумиться.
    ПодключитьВнешнююКомпоненту("AbsoluteNon senseComponent.dll");
    СоздатьОбъект("АбсолютнаяЧушь");
    // WIN!!!
    Ответить

    • ava inkanus-gray # Ссылка на оригинал 0 ⇈

      Когда мир стал старым и способность удивляться покинула людей, когда серые города устремились в дымное небо мрачными уродливыми башнями, в чьей тени никому и в голову не приходило мечтать о солнце или цветущем по весне луге, когда просвещение сорвало с Земли ее прекрасное покрывало и поэты стали петь лишь об изломанных фантомах с мутными, глядящими внутрь себя глазами, когда это наступило и детские мечты ушли навсегда, нашелся человек, который отправился в запредельные сферы искать покинувшие землю мечты.
      Ответить

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

Где здесь C++, guest?!

    А не использовать ли нам bbcode?

    ↑
    8
    ↓