Помогите, плиз, кто может.
Пытаюсь в коде макроса в Exel создать MDB файл и привязать к нему внешнюю
фокспровскую базу Kart.dbf , которая в это время открыта в SHARED режиме
в другом окне - так ничего не получается - говорит Run-Time Error 3051 :
' Файл 'c:\1\2\klad.dbf' не может быть открыт ядром базы MS Jet. Файл уже открыт другим
' пользователем для монопольного доступа или требуется разрешение на просмотр данных.
Что интересно - эта ситуевина у меня образовалась в Win98 SE, пробовал
в Win 2000 pro RU - все проходит гладко! Системы обе имеют одинаковый Office2000.
М.б. разные MDAC ? Или Какие свойства каких объектов здесь я не учел ?

Код в Exel:

Const PathDB = "c:\1\1.mdb"
Const cntDBF = "dBase IV;HDR=NO;IMEX=2;DATABASE=c:\1\2"
Const srcDBF = "Klad.dbf"
Dim dbs As Object, tdf As Object, fld As Variant

Set AppA = CreateObject("Access.Application")
AppA.NewCurrentDatabase PathDB

Set dbs = AppA.CurrentDb
Set tdf = dbs.CreateTableDef('Klad') ', , SrcDBF, CntDBF)
tdf.Connect = CntDBF: tdf.SourceTableName = SrcDBF

' Далее dbAttachedTable не хочет ставиться - говорит Ошибочный аргумент
' Хотя по умолчанию после выполнения dbs.TableDefs.Append tdf (Win2000)
' устанавливает именно значение dbAttachedTable :

'tdf.Attributes = dbAttachedTable ' dbAttachSavePWD 'dbAttachExclusive 'dbAttachedODBC 'dbAttachedTable

' На след команде выдает Run-Time Error 3051 :
dbs.TableDefs.Append tdf