Форум программистов, компьютерный форум, киберфорум
C++: COM, OLE, ActiveX
Войти
Регистрация
Восстановить пароль
 
 
Рейтинг 4.74/58: Рейтинг темы: голосов - 58, средняя оценка - 4.74
21 / 20 / 1
Регистрация: 10.01.2017
Сообщений: 970
1

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

24.01.2019, 21:21. Просмотров 11847. Ответов 70
Метки нет (Все метки)

Здравствуйте,

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

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

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

Может кто нибудь делал нечто подобное.
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
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, при задании диапазона...

70
21 / 20 / 1
Регистрация: 10.01.2017
Сообщений: 970
23.01.2020, 21:48  [ТС] 41
Цитата Сообщение от 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
6088 / 4066 / 1659
Регистрация: 07.05.2019
Сообщений: 12,609
Записей в блоге: 1
23.01.2020, 21:56 42
Цитата Сообщение от Optimus11 Посмотреть сообщение
В принципе все тоже самое:
Вообще-то не то же самое, даже близко. Я разве так показывал?
Вот это - buffff[1], что? массив здесь должен быть, как минимум, из двух символов, там ещё ноль в конец записывается.

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

Добавлено через 3 минуты
Неужели твой результос не возвращает 0, а GetLastError ERROR_INSUFFICIENT_BUFFER?
C++
1
2
Resultos:1
GetLastError:0
Ошибки не возникает. Но и снулевым символом на конце я тоже пробывал, то же самое.
0
6088 / 4066 / 1659
Регистрация: 07.05.2019
Сообщений: 12,609
Записей в блоге: 1
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
21 / 20 / 1
Регистрация: 10.01.2017
Сообщений: 970
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
6088 / 4066 / 1659
Регистрация: 07.05.2019
Сообщений: 12,609
Записей в блоге: 1
24.01.2020, 09:31 46
Цитата Сообщение от Optimus11 Посмотреть сообщение
AutoWrap_write(DISPATCH_PROPERTYPUT, NULL, pXlRange, (LPOLESTR)L"Value", 1, arr_write); //функция с сайта microsoft
Ты бы попробовал сначала одну ячейку корректно записать, а потом уже range
0
21 / 20 / 1
Регистрация: 10.01.2017
Сообщений: 970
24.01.2020, 10:07  [ТС] 47
Цитата Сообщение от oleg-m1973 Посмотреть сообщение
Ты бы попробовал сначала одну ячейку корректно записать, а потом уже range
Так ascii символы через range пишутся нормально, мусора нет, мусор появляется именно при попытке записать utf16 символы.
0
6088 / 4066 / 1659
Регистрация: 07.05.2019
Сообщений: 12,609
Записей в блоге: 1
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
21 / 20 / 1
Регистрация: 10.01.2017
Сообщений: 970
24.01.2020, 15:55  [ТС] 49
Я с самого начало был невнимателен, когда добавлял в конец массива завершающий ноль, на самом деле добовлял '\n' и не замечал этого, добавил \0 , как надо мусор ушел.
Спасибр!
0
21 / 20 / 1
Регистрация: 10.01.2017
Сообщений: 970
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
6088 / 4066 / 1659
Регистрация: 07.05.2019
Сообщений: 12,609
Записей в блоге: 1
27.01.2020, 09:44 51
Цитата Сообщение от Optimus11 Посмотреть сообщение
Далее все это отправляется в ексель. И вот вопрос, как ексель понимает, что переданные ему биты - это именно русские биты, а не предположим немецкие ?? Если я правильно понимаю, то расширенную кодировку ascii можно использовать и под руссике символы и под немецкие, итальянские итд.
Это не excel, это ConvertStringToBSTR конвертирует ascii строку в соответствии с кодировкой, которая установлена для твоей программы. Причём utf8 ты так не сконвертируешь.
1
21 / 20 / 1
Регистрация: 10.01.2017
Сообщений: 970
27.01.2020, 10:34  [ТС] 52
Цитата Сообщение от oleg-m1973 Посмотреть сообщение
Это не excel, это ConvertStringToBSTR конвертирует ascii строку в соответствии с кодировкой, которая установлена для твоей программы. Причём utf8 ты так не сконвертируешь.
Но по сути русские символы это же не ascii.
0
6088 / 4066 / 1659
Регистрация: 07.05.2019
Сообщений: 12,609
Записей в блоге: 1
27.01.2020, 10:39 53
Цитата Сообщение от Optimus11 Посмотреть сообщение
Но по сути русские символы это же не ascii.
В кодировке ascii - это ascii, один 8-байтовый символ на букву. Когда ты конвертруешь из ascii в unicode, надо указывать соответствующую кодовую страницу - CP1251, CP866 и т.д.
1
21 / 20 / 1
Регистрация: 10.01.2017
Сообщений: 970
27.01.2020, 10:46  [ТС] 54
Цитата Сообщение от oleg-m1973 Посмотреть сообщение
В кодировке ascii - это ascii, один 8-байтовый символ на букву. Когда ты конвертруешь из ascii в unicode, надо указывать соответствующую кодировку - CP1251, CP866 и т.д.
Но ConvertStringToBSTR не выполняет именно перекодировеу, я как понял он просто выпооняет преобразование char в wchar_t, при этом как бы кодировка сохраняется.

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

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

Добавлено через 1 минуту
А как ConvertStringToBSTR понимает, что вот это значение char, которое подали на вход этой функции нужно перекодировать в utf16 именно из русской расширенной acii, а не немецкой ?
Просто в multibytetoWideChar там кодировка указывается вручную, тут получается определяется автоматически.
0
6088 / 4066 / 1659
Регистрация: 07.05.2019
Сообщений: 12,609
Записей в блоге: 1
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
21 / 20 / 1
Регистрация: 10.01.2017
Сообщений: 970
29.01.2020, 22:06  [ТС] 58
А я правильно понимаю, что функция MultiByteToWideChar ограничена преобразованием кол-ва символов utf16 на выходе типом int, то есть числом соответсвующим 4 байтам ?
0
6088 / 4066 / 1659
Регистрация: 07.05.2019
Сообщений: 12,609
Записей в блоге: 1
29.01.2020, 22:09 59
Цитата Сообщение от Optimus11 Посмотреть сообщение
А я правильно понимаю, что функция MultiByteToWideChar ограничена преобразованием кол-ва символов utf16 на выходе типом int, то есть числом соответсвующим 4 байтам ?
Ну да, наверное.
0
21 / 20 / 1
Регистрация: 10.01.2017
Сообщений: 970
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
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
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
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.