|
20 Кб. |
|
| Помогите написать правильный код команды в Access-97, чтобы сжать (упаковать) базу данных *.DBF.
Управляющая программа разработана в Access-97. А база данных имеет формат *.DBF (это DBase-3 или FoxPro-2). Управляющая программа воздействует на файлы *.DBF , как на внешнюю базу данных. Но непонятно, как программно из Access-97 сжать (упаковать) базу данных *.DBF (например, при закрытии базы данных). В перечне команд Access-97 я не нашел команду Park. | |
|
| |
|
|
|
| Если установлен драйвер OLEDB для Foxpro, то попробуте так:
Dim con As ADODB.Connection
Dim strConString As String
Set con = New ADODB.Connection
strConString = "Provider=Microsoft OLE DB Provider for Visual FoxPro;Data Source=C:\Путь к базе"
With con
.Open connString
.Execute "PACK DBF C:\Путь к базе\файл.dbf"
.Close
end with
con = Nothing | |
|
| |