VbScript - Работа с Excel

Обсуждение вопросов клиентского программирования.

Модератор: Duncon

Ответить
takt3a
Сообщения: 2
Зарегистрирован: 05 июн 2009, 14:55

Здравствуйте.

Есть папка "С:\Excel". В ней несколько документов Excel 2003 с заранее неизвестными именами. Нужно по расширению получить список этих файлов и сохранить их под тем же именами в формате .dbf.

Пока написал скрипт для сохранения одного файла в формате .dbf:

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

set objExcel = CreateObject ("Excel.Application")
objExcel.Visible = false
objExcel.Workbooks.Open("С:\Excel\Таблица.xls")
objExcel.Workbooks(1).SaveAs "С:\Excel\Таблица.dbf", 11,,,,false
objExcel.Application.Quit
Файл dbf создается, но программа после завершения спрашивает сохранить ли файл Таблица.dbf. Это скорее всего после вызова objExcel.Application.Quit происходит. Да еще если файл dbf существует, то программа запрашивает заменить ли файл. Как можно в скрипте заранее задать, чтобы заменял не спрашивая, и закрывал без сохранения?!
Аватара пользователя
Naeel Maqsudov
Сообщения: 2570
Зарегистрирован: 20 фев 2004, 19:17
Откуда: Moscow, Russia
Контактная информация:

попробуйте в начале сделать

objExcel.DisplayAlerts = false

а еще есть (ну это так, мимоходом)

objExcel.EnableSound = false
takt3a
Сообщения: 2
Зарегистрирован: 05 июн 2009, 14:55

Спасибо большое!
Все правильно работает.
Ответить