<?php
// 
// mailto.inc.php 1.0 : 2007/11/14 sts
//
// 件名と本文をつけて専用メーラーを起動する(Windows用)
//
// 引数:
//    tag = ブラウザ内に表示されるハイパーリンク文字(省略するとtoの内容)
//    to  = メール送付先
//    cc  = メールCC先(省略可能)
//    subject = 送信メール作成時の件名文字列
//    body    = 本文(1行形式のみ)
//
// 補足:
//    subject と body に日本語を使用する場合、html側をShift-JIS体系以外
//    の環境で使用するとメーラに表示された際に文字化けを起こします。
//    そのようなときは、引数文字に、UTF-8体系(%付き文字)に変換したもの
//    を指定するようにしてください。
//
/***********************************************************************/

function plugin_mailto_inline()
{
	if (func_num_args() < 6) {
		return "&mailto(): Bad option (tag,to,[cc],subject,body)\n";
	}

	$args = func_get_args();

	return mailto_common($args[0],$args[1],$args[2],$args[3],$args[4]);
}

/***********************************************************************/

function plugin_mailto_convert()
{
	if (func_num_args() < 5) {
		return "#mailto(): Bad option (tag,to,[cc],subject,body)\n";
	}

	$args = func_get_args();

	return "<p>" . mailto_common($args[0],$args[1],$args[2],$args[3],$args[4]) . "</p>";
}

/***********************************************************************/

function mailto_common($tag, $adto, $adcc, $sbj, $body)
{
	$flag = '?';

	$ans = '<a href="mailto:' . $adto;
	if(strlen($adcc) > 0){
		$ans .= $flag . 'cc=' . $adcc;
		$flag = '&amp;';
	}
	$ans .= $flag . 'subject=' . $sbj;
	$flag = '&amp;';
	$ans .= $flag . 'body=' . $body;
	$ans .= '">';
	if(strlen($tag) > 0){
		$ans .= htmlspecialchars($tag);
	}else{
		$ans .= htmlspecialchars($adto);
	}
	$ans .= '</a>';

	return $ans;
}

?>

トップ   編集 凍結 差分 履歴 添付 複製 名前変更 リロード   新規 一覧 検索 最終更新   ヘルプ   最終更新のRSS
Last-modified: 2010-07-27 (火) 15:20:54
Site admin: PukiWiki Development Team

PukiWiki 1.5.4+ © 2001-2022 PukiWiki Development Team. Powered by PHP 8.2.12. HTML convert time: 0.361 sec.

SourceForge