Помогите кому не лень !

Написал я VBA Excel приложение
в нем я обращаюсь через ADO к dbf файлу
читаю рекорсет ...

Set cnn = CreateObject("ADODB.Connection")
Set rs = CreateObject("ADODB.Recordset")

cnn.Provider = "Microsoft.Jet.OLEDB.4.0"
cnn.Properties("Extended Properties") = "dBase IV"
cnn.Properties("Data Source") = def_dir & "\"
cnn.Open
rs.ActiveConnection = cnn

rs.MoveFirst
While Not rs.EOF
If rs.Fields("nc") <> "" Then
ts.Cells(i - 1, 1).Value = rs.Fields("nc")
ts.Cells(i - 1, 2).Value = rs.Fields("name")
....................................

Все работает но проблема вся в том, что на машинах с Windows2000
Prof информация из полей считывается корректно, т.е идет перекодировка кодировка 866-1251 нормально
Но на машине с Windows98 из dbf вытягиваются иероглифы ...
Вопрос: Где поправить или дописать в коде ...что все встало ...
либо ODBC поправить либо реестр ?




Проблема

Спасибо
проверю версию ...апгрейдю ...потом посмотрю ...