Привет всем !

Есть большая проблема, которая никак не хочет сдаваться.

Пишу следующий код на VB :

Sub test_1()
Dim l_adors As New ADODB.Recordset

l_adors.Open "CREATE TABLE test_dbf (a long, b long)", _
"Provider=MSDASQL.1;" & _
"Extended Properties=;" & _
"DRIVER=Microsoft dBase " & _
"Driver (*.dbf);" & _
"DefaultDir=c:\" & _
";DriverId=21;" & _
"FIL=dBase IV;" & _
"MaxBufferSize=2048;" & _
"PageTimeout=600;UID=admin;", adOpenUnspecified, adLockUnspecified, -1

set l_adors = nothing
set l_adors = new ADODB.RecordSet
l_adors.Open "Select * from test_dbf", _
"Provider=MSDASQL.1;" & _
"Extended Properties=;" & _
"DRIVER=Microsoft dBase " & _
"Driver (*.dbf);" & _
"DefaultDir=c:\" & _
";DriverId=21;" & _
"FIL=dBase IV;" & _
"MaxBufferSize=2048;" & _
"PageTimeout=600;UID=admin;", adOpenUnspecified, adLockUnspecified, -1


l_adors.AddNew
l_adors(0).Value = 1
l_adors(1).Value = 1
l_adors.Update ' <----- тут ругается
End Sub

Ругается следующим образом : [Microsoft][ODBC dBase Driver] Cannot update. Database or object is read-only.

Эта ошибка проявляется только на win-98. На 2000-ах и XP все в порядке.
Файл dbf создается, но записи в него через ADO добавить не удается. У файла не стоит атрибута, что он ReadOnly. Этот файл удается редактировать и добавлять записи через другие редакторы dbf. Если этот файл перенести на комп с win2000 или XP то там он работает нормально. Плиз... подскажите кто что может.