中国語のOracleデータを化けずに取得するには (ID:87788)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 > データ取得後に変数に格納し、MAPIでメール送信を行なおうとしても MAPIMessagesコントロールも、Unicode非対応では…? Const C As Integer = &H33A5 '立方メートル Dim S As String S = ChrW(C) If AscW(S) <> C Then MsgBox "VB内で文字化けしている。" Exit Sub End If MAPIMessages1.MsgIndex = -1 MAPIMessages1.MsgNoteText = S If AscW(MAPIMessages1.MsgNoteText) <> C Then MsgBox "MAPIMessage内で文字化けしている。" Exit Sub End If > Strconv関数でunicodeにしてみたりしましたがダメでした。 VB6の文字列は、特に指定しない限り、最初からUnicodeですよ。 それをStrConvでvbUnicodeしたら、2重に変換されて壊れてしまうだけかと。