dbf и VB

Работа VB и СУБД (Access, MSSQL, MySQL, Oracle и пр.)
Правила форума
При создании новой темы не забывайте указывать используемую СУБД.
DIKI
Начинающий
Начинающий
 
Сообщения: 16
Зарегистрирован: 30.09.2003 (Вт) 17:41

dbf и VB

Сообщение DIKI » 05.11.2003 (Ср) 12:58

Пытаюсь считать данные из dbf таблицы вот таким образом:

Dim o As ADODB.Connection
Dim rs As ADODB.Recordset
Dim s As String
s = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\;Extended Properties=dBase IV"
Set o = New ADODB.Connection
o.Open s
Set rs = New ADODB.Recordset
rs.CursorLocation = adUseClient
rs.CursorType = adOpenStatic
rs.Open "SELECT * FROM BUFER2", o

Если данных в dbf файле немного (порядка 40) все путем, если же таблица большая (26000) пишет "Индекс не найден"
В чем может быть проблема? На моей машине все нормально, на клиентах такая вот штука.

И еще до кучи как сделать так, чтоб всегда открывалось в нормальной кодировке. Кодировка файлов - виндовая. А [HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Jet\3.5\Engines\Xbase] "DataCodePage"="ANSI" иногда не помогает

SSSerj
Новичок
Новичок
 
Сообщения: 27
Зарегистрирован: 07.11.2003 (Пт) 11:32

Сообщение SSSerj » 26.11.2003 (Ср) 11:29

Незнаю как с dbf, но с mdb был похожий случай.
Выручало меня следующее:

if rs.RecordCount>0 then
rs.MoveLast
rs.MoveFirst
end if

Это конечно не эстетично, но помогало.
;)

Если не трудно, то сообщи о результате.


Вернуться в Базы данных

Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 155

    TopList