- Код: Выделить всё
Set cnn = CreateObject("ADODB.Connection")
ConnectString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & path & ";Extended Properties=dBASE III;User ID=Admin;Password="
cnn.Open ConnectString
...
strSQL = "insert into 111 values ..."
cnn.Execute strSQL
Пробовал следующие строки подключения
- Код: Выделить всё
ConnectString = "Driver={Microsoft dBASE Driver (*.dbf)};DriverID=277;Dbq=" & path & ";"
ConnectString = "Provider=VFPOLEDB.1;Data Source=" & path & ";Password=;Collating Sequence=MACHINE;"
ConnectString = "Driver={Microsoft Visual FoxPro Driver};SourceType=DBF;SourceDB=" & path & ";Exclusive=No;Collate=Machine;NULL=NO;DELETED=NO;BACKGROUNDFETCH=NO"
По первой выгрузка прошла с аналогичным результатом, по двум вторым ругнулась на отсутствие провайдера.
Я проверил региональные настройки, установленные кодовые страницы системы. Список одинаков. Что еще можно глянуть и заставить выгружаться как надо?
Еще вопрос. Есть 2 вьювера dbf. Universal Database Viewer в составе Тotal Commander и DBFDesk. Оба показывают файл шаблон dbf как III версии. Пробовал при помощи этих вьюверов создавать файл шаблон заново. Что бы я не указывал файл потом распознается как третьей версии. Какие есть нормальные вьюверы dbf, что бы могли создавать файлы требуемой версии или преобразовывать уже существующие к требуемой?
Помогите кто чем может.
