Новые сообщения [новые:0]
Дайджест
Горячие темы
Избранное [новые:0]
Форумы
Пользователи
Статистика
Статистика нагрузки
Мод. лог
Поиск
|
02.06.2009, 21:52
|
|||
---|---|---|---|
|
|||
макрос в Excel, использующий dbf |
|||
#18+
В Excel, через макрос, выполняется заполнение ячеек данными из файла dbf , формируемого досовской программой, с кодовой страницей 866. Доступ к dbf организован в макросе через OLEDB Dim rs As Object Dim conn As Object Set rs = CreateObject("ADODB.Recordset") Set conn = CreateObject("ADODB.Connection") conn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + ThisWorkbook.Path + ";Extended Properties=DBASE III" conn.Open rs.Open "select nomp, nazn, s, sp, dat from platt.dbf", conn С какого-то момента данные в ячейках перестали отображаться адекватно (т.е. «абракадабра» - так бывает, когда неверная кодовая страница). Сделала нулевую кодовую страницу (вместо 866)– результат тот же. При этом на другом компе все нормально. Т.е. что-то произошло на уровне системы (реестра). Можете что-нибудь посоветовать, кроме переустановки системы? ... |
|||
:
Нравится:
Не нравится:
|
|||
|
17.07.2009, 21:26
|
|||
---|---|---|---|
|
|||
макрос в Excel, использующий dbf |
|||
#18+
Marina_pn, добрый день Помогло следующее - установка MS Visual FoxPro ODBC DRIVER изменил строку .ConnectionString = "Driver={Microsoft Visual FoxPro Driver};SourceType=DBF;SourceDB=" + ThisWorkbook.Path + ";Exclusive=No;Collate=Machine;NULL=NO;DELETED=NO;BACKGROUNDFETCH=NO" ... |
|||
:
Нравится:
Не нравится:
|
|||
|
|
start [/forum/topic.php?fid=41&mobile=1&tid=1586222]: |
0ms |
get settings: |
9ms |
get forum list: |
15ms |
check forum access: |
4ms |
check topic access: |
4ms |
track hit: |
34ms |
get topic data: |
12ms |
get forum data: |
2ms |
get page messages: |
35ms |
get tp. blocked users: |
2ms |
others: | 317ms |
total: | 434ms |
0 / 0 |