Фича или баг :)

[exp.]

нашел такой баг или фичу, скорее баг, потому, что не пофиксеный..
пример(взят из моей проги):(нерабочий,пока)

Код: Выделить всё

If Not FileExist(File) Then MsgBox "файл отсутствует", vbInformation: If Command$ <> vbNullString Then End Else Exit Sub


..выделяется красным и ошибка Compile error..
пример(рабочий): надо добавить двоеточие..

Код: Выделить всё

If Not FileExist(File) Then MsgBox "jar файл отсутствует", vbInformation: If Command$ <> vbNullString Then End[color=red][b]:[/b][/color] Else Exit Sub

то оно(двоеточие) исчезнет, и данная конструкция будет уже рабочая..
что интересно, при новом открытии проекта опять выделяется красным и снова приходится расстовлять :

[burik]

А что обязательно писатьв одну строку?

Ну а вобще-то ошибка появляется если написать "End":

Код: Выделить всё

If Not FileExist(File) Then MsgBox "файл отсутствует", vbInformation: If Command$ <> vbNullString Then End Else Exit Sub

А если написать например MsgBox():

Код: Выделить всё

If Not fso.FileExists(File) Then MsgBox "файл отсутствует", vbInformation: If Command$ <> vbNullString Then MsgBox ("!") Else Exit Sub

то ошибки нет!

[Хакер]

End используйте для отладки. Использовать End для того чтобы завершиться - некрасиво. (retr) (c) BV

[exp.]

End используйте для отладки.

тогда как правильно?

[J.MamaY]

Выгружай все через Unload, а именно - все окна:
Unload Form1 например (или Unload Me)

[exp.]

На счет Unload..
если, как в моем примере на 1м посте..
заменить End на Unload Me,
и Command$ имеет значение, отличное от ""
то получается бесконечный цикл, внутри процедуры..

ЗЫ прямо баг на баге..
ЗЗЫ да и не только как в примере..
если идет сравнение с Command$ (другие переменные не пробовал),
то, повторюсь начинается бесконечный цикл..
ЗЗЗЫ почему форум часто в дауне??

[Хакер]

exp.
Форум в дауне, потому что когда его создавали, не подумали что здесь будет так много народу, и будет так много пользователей.

В итоге тупой сервер aic.ru не справляется с нагрузкой. Все ждут переезда, который администрация обещает уже около года.

А что насчёт темы: выложи весь код.

[exp.]

unzip.dll в system
модули и классы вручню добавишь..
нужен Java Runtime Enviroment
двоеточие после end поставишь

Полезная штука для владельцев телефонов..
Для нокии S40 2-3rd Edition и S60 до Symbian9 мануал я написал..

и если можешь.. подскажи, что мне с zip делать
нынешняя реализация меня не устраивает..

[Хакер]

не сегодня

и jre у меня нет

[exp.]

Хакер
ошибку можно вызвыть и до обращения к jre

[exp.]

есть у кого нибудь зарегистрированный pkunzip 2.5 ??

пожалуйста выложите..

[GSerg]

exp., ты неожиданно захотел в бан? Чего так?

[exp.]

уважаемый GSerg, ни в коем случае не хотел нарушать
правила форума, просто давно уже мучаюсь с zip..
-сначала ActiveZip, имел большой размер и был ShareWare..
-нынешняя реализация.. слегка кривая dll'ка,(неустраивает)..
-спрашивал и искал инфу по zlib, но так ничем и не помогли
а что нашел, не понял..слишком сложно.. или просто где-то не догнал..
-вот и подумал, что легче будет использовать внешнюю, кмпактную
утилу, коей и является pkunzip, но, к сожалению она тоже ShareWare..

а рабочая версия pkunzip 2.04 ,как я понял, не понимает длинных имен..

[exp.]

ну может существует class для zlib.dll , чтобы разпаковать zip архив..
пока нашел только для архивации..