VbScript - Работа с Excel
Добавлено: 05 июн 2009, 15:14
Здравствуйте.
Есть папка "С:\Excel". В ней несколько документов Excel 2003 с заранее неизвестными именами. Нужно по расширению получить список этих файлов и сохранить их под тем же именами в формате .dbf.
Пока написал скрипт для сохранения одного файла в формате .dbf:
Файл dbf создается, но программа после завершения спрашивает сохранить ли файл Таблица.dbf. Это скорее всего после вызова objExcel.Application.Quit происходит. Да еще если файл dbf существует, то программа запрашивает заменить ли файл. Как можно в скрипте заранее задать, чтобы заменял не спрашивая, и закрывал без сохранения?!
Есть папка "С:\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