и снова DBF

[Kirill1983]

Здравствуйте,прошу прощение за возвращение к прошедшей теме(http://bbs.vbstreets.ru/viewtopic.php?t=15961),но...не могу никак в одиночку преодолеть эту проблему,в прошлый раз Konst_One помог мне,но предложенный код по прежнему не переваривает злосчастный AZS.dbf

Код: Выделить всё


Dim con As ADODB.Connection
Dim rs As ADODB.Recordset

Set con = New ADODB.Connection

con.ConnectionString = "Driver={Microsoft dBASE Driver (*.dbf)};" & _
                        "DriverID=277;Dbq=C:\doroga04\d126\;Exclusive=No"

con.Open
Set rs = New ADODB.Recordset
Set rs.ActiveConnection = con
rs.CursorLocation = adUseClient
rs.Open "SELECT * FROM AZS WHERE KODDOR LIKE '1266259'", , adOpenStatic, adLockReadOnly, adCmdText
 

и на rs.Open-ошибка "Непредвиденная ошибка драйвера внешней базы данных (8961)"

Что делать-не знаю...

[Inferno]

В дб не силен, но вижу издалека, что смысл Like ты так и не понял.

...where KODDOR LIKE '%1266259' или
...where KODDOR LIKE '1266259%' или
...where KODDOR LIKE '%1266259%'

Ну и в заключение
...where `KODDOR` LIKE '%1266259'

[Kirill1983]

Нет,в этом не источник проблемы...даже если я напишу

Код: Выделить всё


rs1.Open "SELECT * FROM PRIM", , adOpenStatic, adLockReadOnly, adCmdText


все равно будет та же ошибка...

[Konst_One]

попробуй вместо звездочки(*) указать список конкретных полей таблицы

[Kirill1983]

Код: Выделить всё


rs1.Open "SELECT 'KODDOR' FROM PRIM", , adOpenStatic, adLockReadOnly, adCmdText


Кидает все ту же ошибку...

[Kirill1983]

Вот этот файл...иногда мне кажется,что он был создан злыми силами,для моего умственного уничтожения...

[shady]

поднимаю тему, та же самая ошибка! 8961 что делать не представляю!!
был на http://support.microsoft.com/default.as ... -US;321003
на всякий случай сделал что там пишут, не помогло.
на любой из запросов вываливается эта ошибка, причем, 2 часа назад все работало замечательно, без всяких там ошибок!

[Efiop]

Kirill1983, нет файлов свзянных с ним, нужны эти файлы. Или этот файл поврежден.

An attempt was made to use a table file whose associated memo file (.dct or .fpt) has been deleted, removed, or cannot be found.

[shady]

уфф... победил...
поступил глобально! Грохнул нафиг этот DBE и все где он упоминался (реестр не трогал)
переставил МДАК и вроде заработало... тьфу три раза...