Дело в том что мне следует вывести отчет из таблички в MS Word или MS Exel... пытаясь делать это самостоятельно я подумал что нужно изменить кодировку таблицы с DOS на WIN но я незнаю как это сделать

Вот наработка:

procedure otchet_r
*do izv
* list to otchet.csv
set printer on
set printer to Otce.doc
wait 'Отчет создан' window timeout 1
text
+---|------------------------------|---------------|----|---|---|-----|
---------------имена столбцов------------------
+---|------------------------------|---------------|----|---|---|-----|
endtext
SCAN
?+fam+nam+otc+Dtoc(d_r)+' '+Dtoc(d_v,8)+str(year(d_v)-year(d_r),3)+str(month(d_v)-month(d_r),5)+str(day(d_v)-day(d_r),3)
TEXT
|---|------------------------------|---------------|----|---|---|-----|
endtext
endscan
set printer to
set printer off
*do prosm_o with '2.txt'
deactivate popup sp
return

А вот результат вывода в Word:


+---|------------------------------|---------------|----|---|---|-----|
ьЇЇ ”.€.Ћ. “«Ёж „®¬ Љў ѓ®¤л „­Ё
+---|------------------------------|---------------|----|---|---|-----|
‘ ¤лЄ®ў ђгб« ­ Ђ©а в®ўЁз 28.11.1990 20090509 19 -6-19
|---|------------------------------|---------------|----|---|---|-----|
‚ Ј ­®ў ‚ЁЄв®аЁп ‘ҐаЈҐҐў­ 08.03.1981 20090509 28 2 1
|---|------------------------------|---------------|----|---|---|-----|

Границы сделаны для приличия я уже смирился с тем что в эксель не получается и сделал видимость таблички в Word помогите чем сможете

glamis а учет того что это написано в dos... и мпорт у меня написан в прцедуре...

Спасибо, но вот как мне теперь поставить
1. не програмные именя полей, а те, которые заданы мной в написаной программе???
2. исключить столбец с ключевым полем???
3. САМОЕ ВАЖНОЕ сделать кодировку такую чтобы EXEL не выдавал кракозябры при импорте из fox pro???

3. "команда" as 866??
2. написать это вместо:

set printer on
set printer to Otce.doc
wait 'Отчет создан' window timeout 1
text
+---|------------------------------|---------------|----|---|---|-----|
---------------имена столбцов------------------
+---|------------------------------|---------------|----|---|---|-----|
endtext
SCAN
?+fam+nam+otc+Dtoc(d_r)+' '+Dtoc(d_v,8)+str(year(d_v)-year(d_r),3)+str(month(d_v)-month(d_r),5)+str(day(d_v)-day(d_r),3)
TEXT
|---|------------------------------|---------------|----|---|---|-----|
endtext
endscan
set printer to
set printer off

???

а после выполнения поставить copy?

1. если написаное выше сработает без кракозябр то этот пунк не актуален

glamis
text
?'столбец 1'+chr(9)+'столбец 2'+chr9
endtext
SCAN
?+fam+nam+otc+chr(9)+Dtoc(d_r)+chr(9)+Dtoc(d_v,8)+chr(9)+str(year(d_v)-year(d_r),3)+chr(9)+str(month(d_v)-month(d_r),5)+chr(9)+str(day(d_v)-day(d_r),3)+chr(9)
TEXT
endtext
endscan
set printer to

результат этого (1)

а вот при применении команды copy

P1rat3а вот при применении команды copy

Хотелось бы этого избежать подскажите пожалуйста

alextashkP1rat3,

Про Excel из fpd2.6 знаю, спасибо ВладимирМ.

copy Table1 TO otchet.xls, без всяких указаний 866 и т.п.
Когда Excel откроет отчёт он сам разберётся. Затем обрабатываешь заголовок и сохранить как Excel файл.

Вот именно это я делал без казания кода...

glamis,

Какой мастер я в досовской лисе делаю проект...

нет вот именно что мне нужно открывать Exel в Windows... а не в Dos...

устройство при помощи команды copy меня устроило... но кракозябры мешаются....

Спасибо буду пытаться, если что ещё обращусь) и с вордом таже проблема будет если его также импортировать из Dos&