Нарушитель
-41 / 49 / 5
Регистрация: 10.01.2017
Сообщений: 1,897
1

Чтение/запись в Excel с COM OLE C++

24.01.2019, 21:21. Показов 57422. Ответов 71
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Здравствуйте,

Подскажите пожалуйста, есть ли у кого пример кода чтения и записи данных из/в откртый ексель файл с помощью COM/OLE на чистом С++.

Есть микрософтовский пример:
https://support.microsoft.com/... -or-import

Он создает ексель файл и записывает в него данные, но как записать данные в уже открытый ексель, как этот ексель файл отловить, такого примера нет, а доработать/изменить микрософтовский примера под свою задачу, для меня на данный момент, к сожалению совершенно не возможно, настолько там все сложно.

Может кто нибудь делал нечто подобное.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
24.01.2019, 21:21
Ответы с готовыми решениями:

Cpp builder-Ole-Excel. WideString пишет в ячейку Excel минус перед нулем
Здравствуйте! Посмотрите пожалуйста: Когда аргумент val == 0, в ячейку Excel пишется "-0". Без...

Общение с Excel через OLE
Недавно начал изучать с++. Использую ms vc++ 2010 express. Код такой // 2.cpp: определяет точку...

OLE. Как переименовать созданный файл в Excel.Application?
Доброго дня всем! Подскажите, как переименовать созданный файл в Excel? По умолчанию создается...

Задание диапазона ячеек при объединении (OLE-сервер Excel)
Добрый день. Столкнулась с такой проблемой: при работе с OLE-сервером Excel, при задании диапазона...

71
Нарушитель
-41 / 49 / 5
Регистрация: 10.01.2017
Сообщений: 1,897
23.01.2020, 21:48  [ТС] 41
Author24 — интернет-сервис помощи студентам
Цитата Сообщение от oleg-m1973 Посмотреть сообщение
Скорее всего, BSTR неправильно создаёшь. Покажи код.
В принципе все тоже самое:

C++
1
2
3
4
5
6
7
8
9
10
11
string my_str = u8"D";
 
wchar_t buffff[1];
    
 
int resultos = MultiByteToWideChar(CP_UTF8, 0, my_str.c_str(), std::size(my_str), buffff, 1);
 
cout << resultos << endl;
cout <<"GetLastError():"<< GetLastError() << endl;
 
tmp_bstr = SysAllocString(buffff);
А в екселе в итоге вот это:
C++
1
D쳌쳌쳌쳌쳌쳌쳌쳌쳌쳌쳌
0
6770 / 4564 / 1843
Регистрация: 07.05.2019
Сообщений: 13,726
23.01.2020, 21:56 42
Цитата Сообщение от Optimus11 Посмотреть сообщение
В принципе все тоже самое:
Вообще-то не то же самое, даже близко. Я разве так показывал?
Вот это - buffff[1], что? массив здесь должен быть, как минимум, из двух символов, там ещё ноль в конец записывается.

Добавлено через 3 минуты
Неужели твой результос не возвращает 0, а GetLastError ERROR_INSUFFICIENT_BUFFER?
1
Нарушитель
-41 / 49 / 5
Регистрация: 10.01.2017
Сообщений: 1,897
23.01.2020, 22:01  [ТС] 43
Цитата Сообщение от oleg-m1973 Посмотреть сообщение
Вообще-то не то же самое, даже близко. Я разве так показывал?
Вот это - buffff[1], что? массив здесь должен быть, как минимум, из двух символов, там ещё ноль в конец записывается.

Добавлено через 3 минуты
Неужели твой результос не возвращает 0, а GetLastError ERROR_INSUFFICIENT_BUFFER?
C++
1
2
Resultos:1
GetLastError:0
Ошибки не возникает. Но и снулевым символом на конце я тоже пробывал, то же самое.
0
6770 / 4564 / 1843
Регистрация: 07.05.2019
Сообщений: 13,726
23.01.2020, 22:09 44
Цитата Сообщение от Optimus11 Посмотреть сообщение
Ошибки не возникает. Но и снулевым символом на конце я тоже пробывал, то же самое.
Сделай wchar_t buffff[2];
и int resultos = MultiByteToWideChar(CP_UTF8, 0, my_str.c_str(), my_str.c_str(), buffff, 2);

И покажи, ка ты отправляешь tmp_bstr в Excel

Добавлено через 3 минуты
И что ты пытаешься здесь сэкономить, делая буфер из одного элемента? Сделай его размер 1024. Хотя бы своё время и силы сэкономишь.

Добавлено через 1 минуту
А вообще, здесь лучше выделять буфер wchar_t размером - длина utf8-строки + 1
1
Нарушитель
-41 / 49 / 5
Регистрация: 10.01.2017
Сообщений: 1,897
23.01.2020, 22:48  [ТС] 45
Цитата Сообщение от oleg-m1973 Посмотреть сообщение
И покажи, ка ты отправляешь tmp_bstr в Excel
C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
vector<vector<string>>Ranges_write_stolbec;
vector <string> vector1D;
 
vector1D.push_back("D");
Ranges_write_stolbec.push_back(vector1D);
 
wchar_t buffff[1024];
 
for (int i = 1; i <= Ranges_write_stolbec.size(); i++) {
     for (int j = 1; j <= Ranges_write_stolbec[0].size(); j++) {
{
   {
int pre_resultos = MultiByteToWideChar(CP_UTF8, 0, my_str.c_str(), std::size(my_str), NULL, 0);
 
 
int resultos = MultiByteToWideChar(CP_UTF8, 0, my_str.c_str(), std::size(my_str), buffff, pre_resultos); //pre_resultos=1
 
buffff[1] = '\n';
tmp_bstr = SysAllocString(buffff);
 
 
// Add to safearray...
long indices[] = { i,j };
SafeArrayPutElement(arr_write.parray, indices, tmp_bstr);
}
   }
 
AutoWrap_write(DISPATCH_PROPERTYPUT, NULL, pXlRange, (LPOLESTR)L"Value", 1, arr_write); //функция с сайта microsoft
0
6770 / 4564 / 1843
Регистрация: 07.05.2019
Сообщений: 13,726
24.01.2020, 09:31 46
Цитата Сообщение от Optimus11 Посмотреть сообщение
AutoWrap_write(DISPATCH_PROPERTYPUT, NULL, pXlRange, (LPOLESTR)L"Value", 1, arr_write); //функция с сайта microsoft
Ты бы попробовал сначала одну ячейку корректно записать, а потом уже range
0
Нарушитель
-41 / 49 / 5
Регистрация: 10.01.2017
Сообщений: 1,897
24.01.2020, 10:07  [ТС] 47
Цитата Сообщение от oleg-m1973 Посмотреть сообщение
Ты бы попробовал сначала одну ячейку корректно записать, а потом уже range
Так ascii символы через range пишутся нормально, мусора нет, мусор появляется именно при попытке записать utf16 символы.
0
6770 / 4564 / 1843
Регистрация: 07.05.2019
Сообщений: 13,726
24.01.2020, 10:11 48
Цитата Сообщение от Optimus11 Посмотреть сообщение
Так ascii символы через range пишутся нормально, мусора нет, мусор появляется именно при попытке записать utf16 символы.
А, ну да
MultiByteToWideChar does not null-terminate an output string if the input string length is explicitly specified without a terminating null character. To null-terminate an output string for this function, the application should pass in -1 or explicitly count the terminating null character for the input string.
Сделай
C++
1
2
3
4
int resultos = MultiByteToWideChar(CP_UTF8, 0, my_str.c_str(), std::size(my_str), buffff, pre_resultos); //pre_resultos=1
 
buffff[resultos] = 0;
tmp_bstr = SysAllocString(buffff);
Либо сделай везде std::size(my_str) + 1
1
Нарушитель
-41 / 49 / 5
Регистрация: 10.01.2017
Сообщений: 1,897
24.01.2020, 15:55  [ТС] 49
Я с самого начало был невнимателен, когда добавлял в конец массива завершающий ноль, на самом деле добовлял '\n' и не замечал этого, добавил \0 , как надо мусор ушел.
Спасибр!
0
Нарушитель
-41 / 49 / 5
Регистрация: 10.01.2017
Сообщений: 1,897
26.01.2020, 18:41  [ТС] 50
А чем принципиальная разница между:
-SysAllocString
и
-ConvertStringToBSTR

C++
1
2
3
4
SysAllocString:
Выделяет новую строку и копирует переданную строку в нее.
На вход принимает Си-строку.
В случае успеха возвращает строку. Если psz является строкой нулевой длины, возвращает BSTR нулевой длины
C++
1
2
3
4
ConvertStringToBSTR
Преобразует char * значение BSTR.
На вход вроде бы тоже принимает Си-строку.
В случае успеха видимо тоже возвращает bstr строку ?
В чем тогда принципиальная разница ?

Добавлено через 4 часа 27 минут
Хотя нет, функция SysAllocString принимает на вход указатель на из const OLECHAR *psz, то есть на wcar_t, а ConvertStringToBSTR именно указатель на char.

Добавлено через 3 часа 18 минут
А позвольте тогда вот такой вопрос, для лучшего понимания так сказать:

Вот хочу я в ексель передать русский символ, ну к примеру "К":

C++
1
2
3
4
5
6
string my_rus_saymv = "K"; // строка с русской буквой
 
// Далее преобразовываем string в BSTR с помощью ConvertStringToBSTR
// Как я понял ConvertStringToBSTR - просто расширяет значение записное в char до wchar_t
 
BSTR my_bstr = ConvertStringToBSTR (my_rus_saymv.s_ctr());
Далее все это отправляется в ексель. И вот вопрос, как ексель понимает, что переданные ему биты - это именно русские биты, а не предположим немецкие ?? Если я правильно понимаю, то расширенную кодировку ascii можно использовать и под руссике символы и под немецкие, итальянские итд.
0
6770 / 4564 / 1843
Регистрация: 07.05.2019
Сообщений: 13,726
27.01.2020, 09:44 51
Цитата Сообщение от Optimus11 Посмотреть сообщение
Далее все это отправляется в ексель. И вот вопрос, как ексель понимает, что переданные ему биты - это именно русские биты, а не предположим немецкие ?? Если я правильно понимаю, то расширенную кодировку ascii можно использовать и под руссике символы и под немецкие, итальянские итд.
Это не excel, это ConvertStringToBSTR конвертирует ascii строку в соответствии с кодировкой, которая установлена для твоей программы. Причём utf8 ты так не сконвертируешь.
1
Нарушитель
-41 / 49 / 5
Регистрация: 10.01.2017
Сообщений: 1,897
27.01.2020, 10:34  [ТС] 52
Цитата Сообщение от oleg-m1973 Посмотреть сообщение
Это не excel, это ConvertStringToBSTR конвертирует ascii строку в соответствии с кодировкой, которая установлена для твоей программы. Причём utf8 ты так не сконвертируешь.
Но по сути русские символы это же не ascii.
0
6770 / 4564 / 1843
Регистрация: 07.05.2019
Сообщений: 13,726
27.01.2020, 10:39 53
Цитата Сообщение от Optimus11 Посмотреть сообщение
Но по сути русские символы это же не ascii.
В кодировке ascii - это ascii, один 8-байтовый символ на букву. Когда ты конвертруешь из ascii в unicode, надо указывать соответствующую кодовую страницу - CP1251, CP866 и т.д.
1
Нарушитель
-41 / 49 / 5
Регистрация: 10.01.2017
Сообщений: 1,897
27.01.2020, 10:46  [ТС] 54
Цитата Сообщение от oleg-m1973 Посмотреть сообщение
В кодировке ascii - это ascii, один 8-байтовый символ на букву. Когда ты конвертруешь из ascii в unicode, надо указывать соответствующую кодировку - CP1251, CP866 и т.д.
Но ConvertStringToBSTR не выполняет именно перекодировеу, я как понял он просто выпооняет преобразование char в wchar_t, при этом как бы кодировка сохраняется.

Я к тому, что и русские и к примеру немецкие буквы можно же щаписать в расширенной колировке ascii, то есть одно и тоже значение может соответсвовать, как русскому символу, так и немецкому. Я просто не могу понять где ексель берет информацию о том, что вот этот переданный bstr содержит именно русский символ, а неинемецкий.
0
6770 / 4564 / 1843
Регистрация: 07.05.2019
Сообщений: 13,726
27.01.2020, 11:01 55
Цитата Сообщение от Optimus11 Посмотреть сообщение
Но ConvertStringToBSTR не выполняет именно перекодировеу, я как понял он просто выпооняет преобразование char в wchar_t, при этом как бы кодировка сохраняется.
Это и есть перекодировка. Чтобы преобразовать 8-битный символ в 16-битный используется соответствующая таблица кодировки - кодовая страница. Для русского и немецкого языков они разные.

Добавлено через 1 минуту
Цитата Сообщение от Optimus11 Посмотреть сообщение
Я просто не могу понять где ексель берет информацию о том, что вот этот переданный bstr содержит именно русский символ, а неинемецкий.
BSTR - это юникод, UTF-16. Там это просто разные символы.
1
Нарушитель
-41 / 49 / 5
Регистрация: 10.01.2017
Сообщений: 1,897
27.01.2020, 13:17  [ТС] 56
[QUOTE=oleg-m1973;14206329]Это и есть перекодировка. Чтобы преобразовать 8-битный символ в 16-битный используется соответствующая таблица кодировки - кодовая страница. Для русского и немецкого языков они разные.

Добавлено через 1 минуту
А как ConvertStringToBSTR понимает, что вот это значение char, которое подали на вход этой функции нужно перекодировать в utf16 именно из русской расширенной acii, а не немецкой ?
Просто в multibytetoWideChar там кодировка указывается вручную, тут получается определяется автоматически.
0
6770 / 4564 / 1843
Регистрация: 07.05.2019
Сообщений: 13,726
27.01.2020, 13:41 57
Цитата Сообщение от Optimus11 Посмотреть сообщение
А как ConvertStringToBSTR понимает, что вот это значение char, которое подали на вход этой функции нужно перекодировать в utf16 именно из русской расширенной acii, а не немецкой ?
Просто в multibytetoWideChar там кодировка указывается вручную, тут получается определяется автоматически.
Берёт ту, что по-умолчанию.Даже не знаю как её менять. Используй лучше multibytetoWideChar -
Сначала запроси размер буфера
C++
1
int pre_resultos = MultiByteToWideChar(CP_UTF8, 0, my_str.c_str(), std::size(my_str), NULL, 0);
Потом создай пустую bstr-строку - SysAllocStringLen(L"", pre_resultos)
Используй эту строку как буфер для следующего вызова MultiByteToWideChar
1
Нарушитель
-41 / 49 / 5
Регистрация: 10.01.2017
Сообщений: 1,897
29.01.2020, 22:06  [ТС] 58
А я правильно понимаю, что функция MultiByteToWideChar ограничена преобразованием кол-ва символов utf16 на выходе типом int, то есть числом соответсвующим 4 байтам ?
0
6770 / 4564 / 1843
Регистрация: 07.05.2019
Сообщений: 13,726
29.01.2020, 22:09 59
Цитата Сообщение от Optimus11 Посмотреть сообщение
А я правильно понимаю, что функция MultiByteToWideChar ограничена преобразованием кол-ва символов utf16 на выходе типом int, то есть числом соответсвующим 4 байтам ?
Ну да, наверное.
0
Нарушитель
-41 / 49 / 5
Регистрация: 10.01.2017
Сообщений: 1,897
30.01.2020, 20:51  [ТС] 60
Подскажите пожалуйста, так сказать для общего понимания:

https://docs.microsoft.com/ru-... freestring

SysAllocString function:
C++
1
2
Return value
If successful, returns the string. If psz is a zero-length string, returns a zero-length BSTR. If psz is NULL or insufficient memory exists, returns NULL.
Что Msdn имеет ввиду под zero-length string ? Стока нулевой длинны. Это как ? То есть функция принимает на вход указатель на строку нулевой длинны ? То есть если есть указатель, то он уже куда то указывает и это значит, что это уже не нулевая длинна.
На завершающий ноль это вроде бы не похоже.
0
30.01.2020, 20:51
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
30.01.2020, 20:51
Помогаю со студенческими работами здесь

Чтение из Excel в StringGrid
Здравствуйте! Как считать информацию из открытого файла Excel в StringGrid? Пробовала вот так: ...

Работа с БД SQLite 3: чтение, запись
есть бд SQLite 3, раньше с SQLite не работал, подскажите как от туда считать данные и записать их...

Чтение данных из Excel с Visual C++
Здраствуйте. Нужно запрограммировать считывание данных из Excel-файла на Visual C++ (MVS 2005)....

Запись и чтение Excel
Здраствуйте. Подскажите как реализировать возможность записывать информацию с полей в лист Excel....


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
60
Ответ Создать тему
Опции темы

Новые блоги и статьи
Как подключить JavaScript файл в другом JavaScript файле
InfoMaster 20.01.2025
В современной веб-разработке организация кодовой базы играет ключевую роль в создании масштабируемых и поддерживаемых приложений. Модульность и правильное структурирование кода стали неотъемлемыми. . .
Как откатить изменения в исходниках, не внесенные в Git
InfoMaster 20.01.2025
При работе с системой контроля версий Git разработчики часто сталкиваются с необходимостью отменить внесенные изменения в исходном коде. Особенно актуальной становится ситуация, когда изменения еще. . .
В чем разница между px, in, mm, pt, dip, dp, sp
InfoMaster 20.01.2025
В мире цифрового дизайна и разработки интерфейсов правильный выбор единиц измерения играет ключевую роль в создании качественного пользовательского опыта. История развития систем измерений для. . .
Как изменить адрес удалённого репозитория (origin) в Git
InfoMaster 20.01.2025
В терминологии Git термин origin является стандартным именем для основного удаленного репозитория, с которым взаимодействует локальная копия проекта. Когда разработчик клонирует репозиторий с. . .
Как переместить последние коммиты в новую ветку (branch) в Git
InfoMaster 20.01.2025
При работе над проектом часто возникают ситуации, когда необходимо изолировать определенные изменения от основной линии разработки. Это может быть связано с экспериментальными функциями, исправлением. . .
Как вернуть результат из асинхронной функции в JavaScript
InfoMaster 20.01.2025
Асинхронное программирование представляет собой фундаментальную концепцию в JavaScript, которая позволяет выполнять длительные операции без блокировки основного потока выполнения программы. В. . .
Какой локальный веб-сервер выбрать
InfoMaster 19.01.2025
В современной веб-разработке локальные веб-серверы играют ключевую роль, предоставляя разработчикам надежную среду для создания, тестирования и отладки веб-приложений без необходимости использования. . .
Почему планшеты и iPad уже не так популярны, как раньше
InfoMaster 19.01.2025
Эра революционных инноваций История планшетов началась задолго до того, как эти устройства стали привычными спутниками нашей повседневной жизни. В начале 1990-х годов появились первые прототипы,. . .
Как самому прошить BIOS ноутбука
InfoMaster 19.01.2025
BIOS (Basic Input/ Output System) представляет собой важнейший компонент любого компьютера или ноутбука, который обеспечивает базовое взаимодействие между аппаратным и программным обеспечением. . .
Какой Linux выбрать для домашнего компьютера
InfoMaster 19.01.2025
Современные реалии выбора операционной системы В современном мире выбор операционной системы для домашнего компьютера становится все более важным решением, которое может существенно повлиять на. . .
Как объединить два словаря одним выражением в Python
InfoMaster 19.01.2025
В мире программирования на Python работа со словарями является неотъемлемой частью разработки. Словари представляют собой мощный инструмент для хранения и обработки данных в формате "ключ-значение". . . .
Как без исключения проверить существование файла в Python
InfoMaster 19.01.2025
При разработке программного обеспечения на Python часто возникает необходимость проверить существование файла перед выполнением операций с ним. Это критически важная задача, которая помогает избежать. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru