Web Forum
このフォームからは投稿できません。
name
e-mail
url
subject
comment

[記事リスト] [新着記事] [ワード検索] [過去ログ] [管理用]

記事No : 951
タイトル Re^5: au-iphoneへ絵文字メールを送る際のロジック
投稿日: 2012/05/13(Sun) 00:42:27
投稿者まさ

返信ありがとうございます。正確にお伝えするため、実際のコーディングを送付します。
"ezweb.ne.jp"のメールドメインだったら無理やり「iphone」にしています。
"ezweb.ne.jp"のメールドメインであるau:iphoneとau:CA-007ともにメール絵文字は正しく表示されました。
au側で変換しているのですかね。revulo様が仰る「au」に統一する方法でも実験したいと思います。

●メイン
$wkMailbody = $row2['CUST_MEI_ATENA'] ."\n" ."\n";
$wkMailbody .= $row['MAIL_BODY'] ."\n" ."\n";
$wkMailbody .= $row2['TENNIN_MEI_TEN'] ."(" .$row2['TENNIN_MAIL_ADDR'] .")";
$wkRet = sendMailEmoji($row2["CUST_MAIL_ADDR"],$row['MAIL_SUBJECT'],$wkMailbody,$row['MAIL_FROM']);

●メインから呼ばれる関数(sendMailEmoji)とキャリア判別関数(getMailcarrier)

function sendMailEmoji($to,$subject,$body,$from) {
$wkCarrier = getMailcarrier($to);
$emoji = HTML_Emoji::getInstance($wkCarrier);
$emoji->disableEscaping();
$wkSubject = $emoji->filter($subject, 'output');
$wkSubject = base64_encode($wkSubject);
if($wkCarrier == "iphone"):
$wkSubject = "=?UTF-8?B?" . $wkSubject . "?=";
else:
$wkSubject = "=?Shift_JIS?B?" . $wkSubject . "?=";
endif;
 -- 省略 --
if($wkCarrier == "iphone"):
$wkHeader .= "Content-Type: text/plain;charset=UTF-8\r\n";
else:
$wkHeader .= "Content-Type: text/plain;charset=Shift_JIS\r\n";
endif;
$wkHeader .= "Content-Transfer-Encoding: base64";
mail($to,$wkSubject,$wkMailbody,$wkHeader, "-f " .$from);
return true;
}
function getMailcarrier($address) {
 -- 省略 --
if($wkMaildomain == "i.softbank.jp") {$wkCarrier = "iphone";}
if($wkMaildomain == "ezweb.ne.jp") {$wkCarrier = "iphone";}
 -- 省略 --
return $wkCarrier;
}


- 関連一覧ツリー (★ をクリックするとツリー全体を一括表示します)

- 返信フォーム (この記事に返信する場合は下記フォームから投稿して下さい)
おなまえ
Eメール
subject 入力禁止
Title 入力禁止
Theme 入力禁止
タイトル
URL 入力禁止
URL
メッセージ   手動改行 強制改行 図表モード
メッセージには上記と同じURLを書き込まないで下さい
削除キー (英数字で8文字以内)
  プレビュー

- 以下のフォームから自分の投稿記事を修正・削除することができます -
処理 記事No 削除キー