Можно ли привязывая к Access DBF таблицу указать сp 866 - VB

Формулировка задачи:

Можно ли привязывая к Access DBF таблицу без кодового маркера указать как-ни в строке привязки cp866, если привязка происходит через ODBC : 'ODBCSN=Таблицы Visual FoxPro;SourceDB=c:MyAppDvlpRH_ReportsSklad;SourceType=DBF;Exclusive=No;BackgroundFetch=Yes;Collate=Machine;Null=Yesele ted=Yes;' см. также : http://www.sql.ru/forum/actualthread.aspx?bid=4&tid=28592

Решение задачи: «Можно ли привязывая к Access DBF таблицу указать сp 866»

textual
                            Листинг программы 
                        

                            Dim db As Database
Dim rst As Recordset
Set db = DBEngine.Workspaces(0).OpenDatabase(path & ' ', False, False, 'FoxPro 2.6')
Set rst = db.OpenRecordset('SELECT * From FTJ001 WHERE TJACR='N'') ''где FTJ001.dbf, TJACR-поле
rst.MoveLast
For i = 0 To rst.RecordCount - 1
   rst.MoveFirst
   rst.Move (i)
   твои действия с dbf
next i
rst.close
db.close
set rst=nothing
set db=nothing
                        