Здесь нужно вернее всего исправить кодовую таблицу в заголовке файла. Можно с помощью поставляемой с VFP программой mycpzero. Но можно и програмно, открыв таблицу низким уровнем и исправив заголовок файла. В этом примере прописывается 866, но можно прописать любую кодовую станичку, это один из примеров.

nOnFileDbf = FOPEN("D:\SampleTabl.dbf",2)
IF nOnFileDbf > 0
= FSEEK(nOnFileDbf,29) && Перемещение к байту 29
= FWRITE(nOnFileDbf,CHR(101)) && Прописываем кодовую 866
= FCLOSE(nOnFileDbf)
ENDIF

Но есть и готовые програмыы и функции:
Возвращает номер кодовой страницы, которым помечена открытая таблица.
CPDBF([nWorkArea | cTableAlias])

Здесь возможно DOS таблица, но прописано в заголовке кодировка 2151, может и наоборот. Пробуй прописать в заголовок кодировки разные и смотри, как будет читаться текст в этой таблице. Если нормально читается, а не крякозяблы, значит это ее родная кодировка. В этом случае нужно весь текст в полях переписать, но в другой кодировке ( есть команда OEMTOANSI("FieldName") ).
Можешь попробовать в файле config.fpw поставить значение Codepage=AUTO Тогда программа сама будет выбирать как выводить текст в программе, на основании кодовой из заголовка и будет на лету конвертировать.