SMTPコントロールで件名に全角文字を設定すると文字化けすることがある
対象製品
iNetMail 1.0J
発生環境
動作保証環境と同様
状況
修正済み
詳細
SMTPコントロールのSendメソッドおよびQuickSendメソッドで
件名に全角文字を設定して送信すると、件名が文字化けする。
文字化けする件名の例
・緊急連絡
・至急連絡
・業務連絡
など
上記では最初の文字が化けます。
件名に全角文字を設定して送信すると、件名が文字化けする。
文字化けする件名の例
・緊急連絡
・至急連絡
・業務連絡
など
上記では最初の文字が化けます。
回避方法
不具合を修正した最新の修正版をご使用ください。
最新修正版は、このサイトのアップデートページでダウンロードできます。
JCodeオブジェクトを使用し、あらかじめエンコードした文字列を件名に設定することでも回避できます。
・サンプル
Dim jc As New JCode.JCode
Smtp1.Message.Subject = jc.MimeHeaderEncode("緊急連絡")
Debug.Print Smtp1.Message.Subject
・QuickSendプロジェクト
cmdSend_Click プロシージャ
' メッセージを送信します。
staStatusBar.Panels(1).Text = "メッセージを送信しています ... "
Dim jc As New JCode.JCode
Smtp1.QuickSend jc.MimeHeaderEncode(txtTo.Text), _
jc.MimeHeaderEncode(txtFrom.Text), _
jc.MimeHeaderEncode(txtSubject.Text), _
txtBody.Text, txtAttach.Text, txtServer.Text
最新修正版は、このサイトのアップデートページでダウンロードできます。
JCodeオブジェクトを使用し、あらかじめエンコードした文字列を件名に設定することでも回避できます。
・サンプル
Dim jc As New JCode.JCode
Smtp1.Message.Subject = jc.MimeHeaderEncode("緊急連絡")
Debug.Print Smtp1.Message.Subject
・QuickSendプロジェクト
cmdSend_Click プロシージャ
' メッセージを送信します。
staStatusBar.Panels(1).Text = "メッセージを送信しています ... "
Dim jc As New JCode.JCode
Smtp1.QuickSend jc.MimeHeaderEncode(txtTo.Text), _
jc.MimeHeaderEncode(txtFrom.Text), _
jc.MimeHeaderEncode(txtSubject.Text), _
txtBody.Text, txtAttach.Text, txtServer.Text
キーワード
INML02095