ReSQL.ru
     
powered by simpleCommunicator - 2.0.59     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / VBA EXCEL КОДИРОВКА
10 сообщений из 10, страница 1 из 1
VBA EXCEL КОДИРОВКА
    #37386491
Игорь86
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Игорь86
Участник
Всем привет.

Народ, подскажите, как решить данную проблему.
Может быть кто-нибудь уже сталкивался с таким?

Есть БД в ISO-кодировке (iso-8859-1 если не ошибаюсь или ее номер 28591)

И когда из нее тащишь данные, то они естественно в win-кодировке (1251) приходят коряво.

Я нашел для C# вот такую штуку:

Код: plaintext
1.
2.
string s;
s = Encoding.GetEncoding(1251).GetString(Encoding.GetEncoding(28591).GetBytes("ТЕКТ_В_КОДИРОВКЕ_28591"));

В этом случае переменная s получает нормальный перекодированный текст из 28591 в 1251

Есть ли что-то подобное для Visual Basic for Application (VBA)?
...
Рейтинг: 0 / 0
09.08.2011, 10:42
| Ответить | Цитировать | Написать  
VBA EXCEL КОДИРОВКА
    #37386499
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
Игорь86Есть ли что-то подобное для Visual Basic for Application (VBA)?
если поискать в этом форуме (например по слову "кодировка") можно много чего найти на эту тему
...
Рейтинг: 0 / 0
09.08.2011, 10:44
| Ответить | Цитировать | Написать  
VBA EXCEL КОДИРОВКА
    #37386500
Игорь86
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Игорь86
Участник
Shocker.ProИгорь86Есть ли что-то подобное для Visual Basic for Application (VBA)?
если поискать в этом форуме (например по слову "кодировка") можно много чего найти на эту тему

Если б я бы нашел то что мне нужно, я бы не спрашивал.
...
Рейтинг: 0 / 0
09.08.2011, 10:45
| Ответить | Цитировать | Написать  
VBA EXCEL КОДИРОВКА
    #37386586
Фотография Игорь Горбонос
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Игорь Горбонос
Участник
> Автор: Игорь86
> Есть БД в ISO-кодировке (iso-8859-1 если не ошибаюсь или ее номер 28591)


При подключении к БДям можно указать кодировку подключения, ну или StrConv тебе в руки :D

Posted via ActualForum NNTP Server 1.4
...
Рейтинг: 0 / 0
09.08.2011, 11:24
| Ответить | Цитировать | Написать  
VBA EXCEL КОДИРОВКА
    #37386950
Игорь86
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Игорь86
Участник
Игорь Горбонос> Автор: Игорь86
> Есть БД в ISO-кодировке (iso-8859-1 если не ошибаюсь или ее номер 28591)


При подключении к БДям можно указать кодировку подключения, ну или StrConv тебе в руки :D



string connect к ораклу идет без указания типа кодировки.

StrConv может быть и поможет при выгрузке из базы, но если обращаться к базе с запросом
Код: plaintext
select id from table where famil='ИВАНОВ'
то тут уже StrConv не поможет.
...
Рейтинг: 0 / 0
09.08.2011, 13:11
| Ответить | Цитировать | Написать  
VBA EXCEL КОДИРОВКА
    #37386972
Фотография Konst_One
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Konst_One
Участник
почему не поможет? вы бы использовали ADODB.Command и параметры передавали бы правильно, тогда всё будет работать независимо от кодировок. внутри Excel VBA все строки в формате UTF-16
...
Рейтинг: 0 / 0
09.08.2011, 13:20
| Ответить | Цитировать | Написать  
VBA EXCEL КОДИРОВКА
    #37387004
Игорь86
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Игорь86
Участник
Konst_Oneпочему не поможет? вы бы использовали ADODB.Command и параметры передавали бы правильно, тогда всё будет работать независимо от кодировок. внутри Excel VBA все строки в формате UTF-16

к сожалению у меня коннект идет

Dim OraSession As Object

Set OraSession = CreateObject("OracleInProcServer.XOraSession")
...
Рейтинг: 0 / 0
09.08.2011, 13:28
| Ответить | Цитировать | Написать  
VBA EXCEL КОДИРОВКА
    #37387290
Игорь86
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Игорь86
Участник
http://www.vbforums.com/showthread.php?t=407491

вот неплохой материал. надо испробовать
...
Рейтинг: 0 / 0
09.08.2011, 14:52
| Ответить | Цитировать | Написать  
VBA EXCEL КОДИРОВКА
    #37387325
Фотография Konst_One
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Konst_One
Участник
Игорь86Konst_Oneпочему не поможет? вы бы использовали ADODB.Command и параметры передавали бы правильно, тогда всё будет работать независимо от кодировок. внутри Excel VBA все строки в формате UTF-16

к сожалению у меня коннект идет

Dim OraSession As Object

Set OraSession = CreateObject("OracleInProcServer.XOraSession")

долго же из вас пришлось вытягивать саму суть проблемы. если вы используете оракловый компонент OO4O из VB/VBA , то лучше делать раннюю привязку. посмотрите в примерах в документации по данному продукту оракла. и там тоже есть возможность использования command
...
Рейтинг: 0 / 0
09.08.2011, 15:03
| Ответить | Цитировать | Написать  
VBA EXCEL КОДИРОВКА
    #37387331
Фотография Konst_One
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Konst_One
Участник
кстати вот на форуме уже народ мучался:

/topic/487173&hl=
...
Рейтинг: 0 / 0
09.08.2011, 15:04
| Ответить | Цитировать | Написать  
10 сообщений из 10, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / VBA EXCEL КОДИРОВКА
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
NoSQL.ru       Новости, Чат       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=60&msg=37387331&tid=2158504]:
 0ms
get settings:
 10ms
get forum list:
 14ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 60ms
get topic data:
 10ms
get forum data:
 2ms
get page messages:
 48ms
get tp. blocked users:
 2ms
others: 15ms
total:  169ms
созд. / загр.: 169ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]