:: Visual Foxpro, Foxpro for DOS
как подключиться к Р7-Офис и вывести данные в него
Sergeynizamov

Сообщений: 76
Дата регистрации: 21.09.2018
Доброе время суток! ребята подскажите пожалуйста как сделать вывод или скиньте ссылку на тему, в интернете гуглил с первого раза не нашёл ответа!
До этого пользовался офисом от майкрософт
LoExcel=createobject("Excel.application")
LoExcel.WorkBooks.add
LoExcel2=LoExcel.Application
LoExcel = GetObject("","Excel.Sheet")
LoExcel2.Sheets(1).Name = "НаименованиеКниги"
и т.д.
тут тем много ответов много и выводов разных!
если кто сталкивался поделитесь опытом! буду рад
Ratings: 0 negative/0 positive
Re: как подключиться к Р7-Офис и вывести данные в него
Sergeynizamov

Сообщений: 76
Дата регистрации: 21.09.2018
Нашёл на официальном сайте код для программистов, но теперь не до конца понять не могу как им воспользоваться, точнее создать и выводить данные
*builder.CreateFile("xlsx");
LoExcel = CreateFile("xlsx")
*var oWorksheet = Api.GetActiveSheet();
oWorksheet = Api.GetActiveSheet();
oRange = oWorksheet.GetRange("B11");
oRange.SetValue("1");
oRange.Select();
oAreas = oRange.GetAreas();
oItem = oAreas.GetItem(1);
oRange = oWorksheet.GetRange('A5');
oRange.SetValue("The first item from the areas: ");
oRange.AutoFit(false, true);
oWorksheet.GetRange('B5').Paste(oItem);
LoExcel.SaveFile("xlsx", "GetItem.xlsx");
LoExcel.CloseFile();
Ratings: 0 negative/0 positive
Re: как подключиться к Р7-Офис и вывести данные в него
Sergeynizamov

Сообщений: 76
Дата регистрации: 21.09.2018
Нашёл на официальном сайте код для программистов, но теперь не до конца понять не могу как им воспользоваться, точнее создать и выводить данные
*builder.CreateFile("xlsx");
LoExcel = CreateFile("xlsx")
*var oWorksheet = Api.GetActiveSheet();
oWorksheet = Api.GetActiveSheet();
oRange = oWorksheet.GetRange("B11");
oRange.SetValue("1");
oRange.Select();
oAreas = oRange.GetAreas();
oItem = oAreas.GetItem(1);
oRange = oWorksheet.GetRange('A5');
oRange.SetValue("The first item from the areas: ");
oRange.AutoFit(false, true);
oWorksheet.GetRange('B5').Paste(oItem);
LoExcel.SaveFile("xlsx", "GetItem.xlsx");
LoExcel.CloseFile();



Исправлено 1 раз(а). Последнее : Sergeynizamov, 06.07.23 08:01
Ratings: 0 negative/0 positive
Re: как подключиться к Р7-Офис и вывести данные в него
ssa

Сообщений: 13031
Откуда: Москва
Дата регистрации: 23.03.2005
Воспользоваться готовым решением, создающим нужный и файл и избавляющем от необходимости привязываться к конкретному программному продукту.
Файлики типа XLSX давно делаются без участия Excel, Р7-Офис и т.д.


------------------
Лень - это неосознанная мудрость.
Ratings: 0 negative/0 positive
Re: как подключиться к Р7-Офис и вывести данные в него
Sergeynizamov

Сообщений: 76
Дата регистрации: 21.09.2018
где можно посмотреть пример! пожалуйста скиньте ссылку
Ratings: 0 negative/0 positive
Re: как подключиться к Р7-Офис и вывести данные в него
PaulWist

Сообщений: 14682
Дата регистрации: 01.04.2004
Sergeynizamov
где можно посмотреть пример! пожалуйста скиньте ссылку

forum.foxclub.ru


------------------
Есть многое на свете, друг Горацио...
Что и не снилось нашим мудрецам.
(В.Шекспир Гамлет)
Ratings: 0 negative/0 positive
Re: как подключиться к Р7-Офис и вывести данные в него
Sergeynizamov

Сообщений: 76
Дата регистрации: 21.09.2018
PaulWist
Sergeynizamov
где можно посмотреть пример! пожалуйста скиньте ссылку

forum.foxclub.ru
Спасибо огромное буду разбираться и кстати много чего интересного открыл для себя
Ratings: 0 negative/0 positive
Re: как подключиться к Р7-Офис и вывести данные в него
sadovod
Автор

Сообщений: 1
Дата регистрации: 14.08.2023
Здравствуйте. Удалось решить задачу? Сам с ней сейчас столкнулся, информации очень мало.
Ratings: 0 negative/0 positive
Re: как подключиться к Р7-Офис и вывести данные в него
Sergeynizamov

Сообщений: 76
Дата регистрации: 21.09.2018
к сожалению, пока не получилось сделать, т.к. стоят другие задачи, поэтому, пока в процессе разбора,
я даже подключится не могу! видел в одном месте подключение, там вроде можно через javascript подключится, но это не точно
Ratings: 0 negative/0 positive
Re: как подключиться к Р7-Офис и вывести данные в него
Sergeynizamov

Сообщений: 76
Дата регистрации: 21.09.2018
Если ещё актуально! вообщем решение маломальское нашел! можно сначала создать текстовый формат, далее полученный TXT - файл копировать через Copy To в формате CSV

Единственное в чём пока проблема! можно ли как то, настроить форматирование в CSV?
Ratings: 0 negative/0 positive
Re: как подключиться к Р7-Офис и вывести данные в него
of63

Сообщений: 25461
Откуда: Н.Новгород
Дата регистрации: 13.02.2008
> настроить форматирование в CSV?
Конечно. Какое форматирование ты предпочитаешь?

Ну, разделители полей - табуляции, запятая точка с запятой... В дробных числах разделитель какой, как экранировать символы кавычек, энтеров (не дай бох)



Исправлено 1 раз(а). Последнее : of63, 01.03.24 20:22
Ratings: 0 negative/0 positive
Re: как подключиться к Р7-Офис и вывести данные в него
of63

Сообщений: 25461
Откуда: Н.Новгород
Дата регистрации: 13.02.2008
что ты имеешь ввиду под форматом "CSV" ?
Ratings: 0 negative/0 positive
Re: как подключиться к Р7-Офис и вывести данные в него
Sergeynizamov

Сообщений: 76
Дата регистрации: 21.09.2018
Можно на Fox Pro сделать тип при копировании файла

1) вариант: Copy File Exsel_xls.TXT To Exsel.CSV DELIMITED with character " "
Сначала в TXT, потом в CSV.

2) вариант: это делать отчёты не непосредственно в самом Fox Pro

Может кто то нашёл каке то ещ варианты, я пока нашёл всего 2
Ratings: 0 negative/0 positive
Re: как подключиться к Р7-Офис и вывести данные в него
Sergeynizamov

Сообщений: 76
Дата регистрации: 21.09.2018
----- Конечно. Какое форматирование ты предпочитаешь?
Форматирование текста, т.е. влево, в право, жирно, курсивом, вставка формул и т.д.
Если к примеру в excel- e можно было это все сделать, то сейчас я даже подключится к Р7 - офис не получается, кстати Р7 считывает формат CSV
Ratings: 0 negative/0 positive
Re: как подключиться к Р7-Офис и вывести данные в него
Будрин

Сообщений: 181
Откуда: Москва
Дата регистрации: 21.09.2001
github.com
Это класс от реального разработчика, поддерживает почти все функции Excel



Исправлено 1 раз(а). Последнее : Будрин, 02.04.24 05:13
Ratings: 0 negative/0 positive
Re: как подключиться к Р7-Офис и вывести данные в него
Sergeynizamov

Сообщений: 76
Дата регистрации: 21.09.2018
github.com
я смотрел! но это не подходит, как в Р7 используется класс API, и к нему не подключится
тк у Excel класс Com-объект, а в API класс я так не понял какой, но точно не Com-объект.
даже к OpenOffic можно подключится

Это выдержка из официального сайта, по созданию нового документа
builder.CreateFile("xlsx"); // create a spreadsheet file in the .xlsx format
var oWorksheet = Api.GetActiveSheet(); // create a new 'oWorksheet' variable and get the created spreadsheet contents
oWorksheet.SetName("sheet 1"); // set the 'sheet 1' name for the current active sheet
oWorksheet.SetColumnWidth(0, 20); // set the width of the first column to 140 pixels
oWorksheet.GetRange("A1").SetValue("New cell"); // set the 'New cell' value to the A1 spreadsheet cell
builder.SaveFile("xlsx", "example.xlsx"); // save the resulting spreadsheet as a file in the .xlsx format with a new 'example.xlsx' name
builder.CloseFile(); // close the spreadsheet file and finish work
так вот я даже подключится не смог, точнее объект создать



Исправлено 1 раз(а). Последнее : Sergeynizamov, 03.04.24 06:22
Ratings: 0 negative/0 positive
Re: как подключиться к Р7-Офис и вывести данные в него
ssa

Сообщений: 13031
Откуда: Москва
Дата регистрации: 23.03.2005
Sergeynizamov
github.com
я смотрел! но это не подходит, как в Р7 используется класс API, и к нему не подключится
Сударь, не пробовали читать доку от предложенного решения?
Какое к чертям API и прочие вумные аббревиатуры, если предложено решение, создающее непосредственно ФАЙЛ, не использующее никаких API и не требующие наличие всяких Excel, P7 и любой другой подобной хрени? Как определили неподходящесть? P7 не открывает файлы типа XLSX?


------------------
Лень - это неосознанная мудрость.
Ratings: 0 negative/1 positive
Re: как подключиться к Р7-Офис и вывести данные в него
of63

Сообщений: 25461
Откуда: Н.Новгород
Дата регистрации: 13.02.2008
Мне нравится Серегино предложение (делать ZIP-файл, ну, xlsx, с набором файлов в каталогах, которую он посчитал штатной (?) для Excel и Опен-Офиса (П-7?, тоже. что это за ), ...наши тоже Астру выдывигают... правильно делают)
Ratings: 0 negative/0 positive


Извините, только зарегистрированные пользователи могут оставлять сообщения в этом форуме.

On-line: 20 akvvohinc  (Гостей: 19)

© 2000-2024 Fox Club 
Яндекс.Метрика