|
|
|
Название столбцов в Excel
|
|||
|---|---|---|---|
|
#18+
Добрый день! Пишу: select list COPY TO c:\ingoodtime\otchet.xls FIELDS EXCEPT flag TYPE XL5 ox=createobject('excel.application') ox.Visible=.t. ox.Workbooks.Open('c:\ingoodtime\otchet.xls') Необходимо получить в Excel название полей list.dbf по-русски, какие варианты возможны? Спасибо. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 19.03.2007, 16:40 |
|
||
|
Название столбцов в Excel
|
|||
|---|---|---|---|
|
#18+
Вариант 1 Забить на команду COPY TO ... и выводить в Excel посредством его же самого (как ActiveX). Вариант 2 (сомнительный) Скопировать из list в таблицу с русскими названиями колонок, а уж потом COPY TO ... ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 19.03.2007, 16:47 |
|
||
|
Название столбцов в Excel
|
|||
|---|---|---|---|
|
#18+
for i=1 to fcount() ox.sheets(1).cells(1,i).value='Заголовок'+alltrim(str(i)) next ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 19.03.2007, 16:54 |
|
||
|
|
start [/forum/topic.php?fid=41&msg=34400820&tid=1589695]: |
0ms |
get settings: |
4ms |
get forum list: |
17ms |
check forum access: |
3ms |
check topic access: |
3ms |
track hit: |
145ms |
get topic data: |
9ms |
get forum data: |
5ms |
get page messages: |
54ms |
get tp. blocked users: |
1ms |
| others: | 200ms |
| total: | 441ms |
| 0 / 0 |
