• Добро пожаловать на Форум пользователей ПО АСКОН. Пожалуйста, авторизуйтесь.
 

Уважаемые пользователи,

Хотим проинформировать вас о режиме работы регистрации на нашем сайте.

Зарегистрироваться возможно в рабочие дни, с 8:00 до 20:00 (мск).

Если у вас возникнут вопросы или потребуется дополнительная информация, не стесняйтесь обращаться к нашей службе поддержки. Вы можете связаться с нами по указанным контактным данным на нашем сайте.

Благодарим вас за понимание и сотрудничество. Мы ценим ваше терпение и стремимся предоставить вам лучший опыт использования нашего сервиса.

С уважением,
Команда Ascon

Помогите вспомнить код на VB 6.

Автор Маратович, 12.09.06, 14:41:30

« назад - далее »

0 Пользователи и 1 гость просматривают эту тему.

Маратович

Помогите вспомнить !!!  Забыл как написать код , что-бы при сохранении документа выскакивал

вопрос при наличии такого файла - "Такой файл существует" .

Раньше как-то делал, но вылетело из головы.

Пример для справки.

If Not kompasOb Is Nothing Then
        With CommonDialog1
            .DialogTitle = "Сохрани документ !!!"
            .Filter = "(*.cdw)|*.cdw"
            .InitDir = CurDir
            .FileName = "Название документа"
            .Flags = cdlOFNExplorer Or cdlOFNFileMustExist Or cdlOFNPathMustExist
            .ShowSave
            If .FileName <> "" Then
            docActive.ksSaveDocument (.FileName)
       End With
End If

Жду ответа.