Forth и другие саморасширяющиеся системы программирования Locations of visitors to this page
Текущее время: Чт мар 28, 2024 18:01

...
Google Search
Forth-FAQ Spy Grafic

Часовой пояс: UTC + 3 часа [ Летнее время ]




Ответить
Имя пользователя:
Заголовок:
Текст сообщения:
Введите текст вашего сообщения. Длина сообщения в символах не более: 60000

Размер шрифта:
Цвет шрифта
Настройки:
BBCode ВКЛЮЧЕН
[img] ВЫКЛЮЧЕН
[flash] ВЫКЛЮЧЕН
[url] ВКЛЮЧЕН
Смайлики ВЫКЛЮЧЕНЫ
Отключить в этом сообщении BBCode
Не преобразовывать адреса URL в ссылки
Вопрос
Теперь гостю придется вводить здесь пароль. Не от своей учетной записи, а ПАРОЛЬ ДЛЯ ГОСТЯ, получить который можно после регистрации на форуме через ЛС.:
Этот вопрос предназначен для выявления и предотвращения автоматических регистраций.
   

Обзор темы - FORTH+EXCEL
Автор Сообщение
  Заголовок сообщения:  Re: FORTH+EXCEL  Ответить с цитатой
Victor__v писал(а):
изменял, безтолку

Ради спортивного интереса проверил
Код:
0 VALUE EXCEL
0 VALUE FILE-ID
0 VALUE WORK-B

REQUIRE [[ D:/SP375/devel/~yz/lib/automate.f
: Test_xls
ComInit DROP
   " Excel.Application" CreateObject DROP TO EXCEL
   EXCEL [[ Visible = TRUE ]]
   EXCEL [[ WorkBooks ]] TO WORK-B

   WORK-B [[ Open ( " D:/SP375/~KOR/Autoka/com/240103.xls" ) ]] TO FILE-ID

   FILE-ID [[ SaveAs ( " D:\spf\BI_BASE.CSV" , 23 ) ]] DROP \ 23 - CSV

EXCEL release
ComDestroy
;

Test_xls
Не воспринимает "\" сохраняет в D:spfBI_BASE.CSV

Код:
0 VALUE EXCEL
0 VALUE FILE-ID
0 VALUE WORK-B

REQUIRE [[ D:/SP375/devel/~yz/lib/automate.f
: Test_xls
ComInit DROP
   " Excel.Application" CreateObject DROP TO EXCEL
   EXCEL [[ Visible = TRUE ]]
   EXCEL [[ WorkBooks ]] TO WORK-B

   WORK-B [[ Open ( " D:/SP375/~KOR/Autoka/com/240103.xls" ) ]] TO FILE-ID

   FILE-ID [[ SaveAs ( " D:/spf/BI_BASE.CSV" , 23 ) ]] DROP \ 23 - CSV

EXCEL release
ComDestroy
;

Test_xls
Сохраняет правильно, куда указано...
Сообщение Добавлено: Пт авг 11, 2017 21:43
  Заголовок сообщения:  Re: FORTH+EXCEL  Ответить с цитатой
изменял, безтолку
Сообщение Добавлено: Пт авг 11, 2017 15:41
  Заголовок сообщения:  Re: FORTH+EXCEL  Ответить с цитатой
Victor__v писал(а):
Задача - переконвертировать екслевский файл в файл формата CSV
Сложность:
При сохранении ( SaveAs ) эксель с непонятным упорством сохраняет файл в папке "документы" при полном указании пути в другое место
Вот что с этим делать?


Цитата:
FILE-ID [[ SaveAs ( " G:\SP-Forth\BI_BASE.CSV" , 23 ) ]] \ 23 - CSV


Как то было такое, пока не заменил слеш на обратный, тогда заработало
: CH\ ( a u -- )
OVER + SWAP ?DO I C@ [CHAR] \ = IF [CHAR] / I C! THEN LOOP
;
Сообщение Добавлено: Пт авг 11, 2017 13:52
  Заголовок сообщения:  Re: FORTH+EXCEL  Ответить с цитатой
Application имеет интересное свойство DefaultFilePath - путь по-умолчанию .
Прикол в том, что это свойство нельзя изменить. Почему непонятно.
Даёшь ему путь нуль-строкой, он её принимает, но по факту не заменяет. Влом, наверное

Цитата:
EXCEL [[ DefaultFilePath = " C:/Users/U/Documents/SP-Forth/" ]]
Сообщение Добавлено: Пт авг 11, 2017 00:19
  Заголовок сообщения:  Re: FORTH+EXCEL  Ответить с цитатой
Попробуй изменить рабочий каталог Excel. Вдруг что путное получится.
Сообщение Добавлено: Чт авг 10, 2017 22:59
  Заголовок сообщения:  FORTH+EXCEL  Ответить с цитатой
Задача - переконвертировать екслевский файл в файл формата CSV
Сложность:
При сохранении ( SaveAs ) эксель с непонятным упорством сохраняет файл в папке "документы" при полном указании пути в другое место
Вот что с этим делать?

Код:

ComInit DROP
   " Excel.Application" CreateObject DROP
   TO EXCEL
   EXCEL [[ WorkBooks ]] TO WORK-B

   WORK-B [[ Open ( " PAP/BI_BASE.xls" ) ]] TO FILE-ID

   S" TT" TYPE CR

   FILE-ID [[ SaveAs ( " G:\SP-Forth\BI_BASE.CSV" , 23 ) ]] \ 23 - CSV

   S" TT" TYPE CR

   FILE-ID [[ Close ( FALSE ) ]]




Читаем MDSN
Цитата:
Filename
Type: System.Object

Имя сохраняемого файла. Можно включить полный путь; Если этого не сделать, Microsoft Office Excel сохраняет файл в текущей папке.
Сообщение Добавлено: Ср авг 09, 2017 20:44

Часовой пояс: UTC + 3 часа [ Летнее время ]


Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group
phpBB сборка от FladeX // Русская поддержка phpBB