$html_selectbox_msgtransfer = "<select name=\"msg_transfer\">" . "<option value=\"7bit\">7bit</option>" . "<option value=\"8bit\">8bit (*)</option>" . "<option value=\"quoted-printable\">quoted-printable</option>" . "<option value=\"base64\">base64</option>" . "<option value=\"binary\">binary (*)</option>" . "</select>";
    /* 投稿フォームを表示する */
    global $strDefaultSenderName;
    printf("<form method=\"post\" action=\"./{$thispage_filename}\" name=\"form1\">\n" . "\t<table border=\"0\" cellpadding=\"2\" cellspacing=\"0\" align=\"center\" width=\"700px\">\n" . "\t<tr><td colspan=\"2\"><strong>送信内容</strong></td></tr>\n" . "\t<tr><td width=\"50px\">From</td><td><input name=\"fromname\" value=\"%s\" size=\"25\" /> %s</td></tr>\n" . "\t<tr><td width=\"50px\">To</td><td><input name=\"addr_to\" size=\"80\" /></td></tr>\n" . "\t<tr><td width=\"50px\">Subject</td><td><input name=\"subject\" size=\"80\" /></td></tr>\n" . "\t<tr><td>本文</td><td><textarea name=\"message\" cols=\"80\" rows=\"20\" style=\"font-size:10pt;\"></textarea></td></tr>\n" . "\t<tr><td></td><td><input type=\"checkbox\" name=\"linewrap_flag\" value=\"true\" checked=\"checked\" />本文を78桁で改行する <input type=\"checkbox\" name=\"debug_flag\" value=\"true\" />SMTPデバッグ出力を行う</td></tr>\n" . "\t<tr><td></td><td>Subject transfer encoding%s</td></tr>\n" . "\t<tr><td><input type=\"submit\" value=\"  送信  \" /></td><td>Content-Type charset%s  Content-Transfer-Encoding%s</td></tr>\n" . "\t</table>\n" . "</form>\n", $strDefaultSenderName, $html_selectbox_account, $html_selectbox_subjtransfer, $html_selectbox_msgencode, $html_selectbox_msgtransfer);
} else {
    $debug_flag = false;
    if (isset($_POST['debug_flag'])) {
        $debug_flag = true;
        print "<p>SMTP デバッグメッセージ表示 : ON</p>\n";
    }
    $msg = stripslashes($_POST['message']);
    if (isset($_POST['linewrap_flag'])) {
        str_line_wrap($msg, 78);
        print "<p>本文の78桁での自動改行 : ON</p>\n";
    }
    sendmail_sendmsg(intval($_POST['account_no']), stripslashes($_POST['subject']), $_POST['addr_to'], stripslashes($_POST['fromname']), $msg, $debug_flag);
}
// リロード用リンクを表示する
printf("<p><a href=\"./%s\">初期画面に戻る</a><br/>\n" . "<a href=\"./index.php\">メール機能選択メニューを表示する</a></p>\n" . "<p><a href=\"logoff.php\">ログオフ</a></p>\n" . "</body>\n" . "</html>\n", $thispage_filename);
exit;
/*************************
 smtp接続を開始する関数

 戻り値:true(成功), false(失敗)
*************************/
function open_smtp(&$arr_mail_account, &$smtp, $account_no, $debug_flag)
{
    // account list array, from config.php
    global $arrAccountsSmtp;
    // $account_noの範囲チェック
    if ($account_no <= 0 || $account_no > count($arrAccountsSmtp)) {
    $html_radio_newstilte = "<input type=\"radio\" name=\"type\" value=\"news\" checked=\"checked\" />news&nbsp;" . "<input type=\"radio\" name=\"type\" value=\"tech\" />tech&nbsp;" . "<input type=\"radio\" name=\"type\" value=\"linux\" />linux&nbsp;" . "<input type=\"radio\" name=\"type\" value=\"win\" />win&nbsp;" . "<input type=\"radio\" name=\"type\" value=\"pc\" />pc&nbsp;" . "<input type=\"radio\" name=\"type\" value=\"none\" />無選択&nbsp;";
    /* 投稿フォームを表示する */
    global $strDefaultSenderName;
    printf("<form method=\"post\" action=\"./{$thispage_filename}\" name=\"form1\">\n" . "\t<table border=\"0\" cellpadding=\"2\" cellspacing=\"0\" align=\"center\" width=\"700px\">\n" . "\t<tr><td colspan=\"2\"><strong>送信内容</strong></td></tr>\n" . "\t<tr style=\"display:none\"><td width=\"50px\">From</td><td><input name=\"fromname\" value=\"%s\" size=\"25\"  type=\"hidden\"/> %s</td></tr>\n" . "\t<tr style=\"display:none\"><td width=\"50px\">To</td><td><input name=\"addr_to\" size=\"80\" value=\"" . $strNewsSendRcpt . "\"  type=\"hidden\" /></td></tr>\n" . "\t<tr><td width=\"50px\">Subject</td><td><input name=\"subject\" size=\"80\" /></td></tr>\n" . "\t<tr><td width=\"50px\"></td><td>%s</td></tr>\n" . "\t<tr><td>本文</td><td><textarea name=\"message\" cols=\"80\" rows=\"20\" style=\"font-size:10pt;\"></textarea></td></tr>\n" . "\t<tr><td></td><td><input type=\"checkbox\" name=\"linewrap_flag\" value=\"true\" checked=\"checked\" />本文を78桁で改行する <input type=\"checkbox\" name=\"debug_flag\" value=\"true\" />SMTPデバッグ出力を行う</td></tr>\n" . "\t<tr><td></td><td>Subject transfer encoding%s</td></tr>\n" . "\t<tr><td><input type=\"submit\" value=\"  送信  \" /></td><td>Content-Type charset%s  Content-Transfer-Encoding%s</td></tr>\n" . "\t</table>\n" . "</form>\n", $strDefaultSenderName, $html_selectbox_account, $html_radio_newstilte, $html_selectbox_subjtransfer, $html_selectbox_msgencode, $html_selectbox_msgtransfer);
} else {
    $debug_flag = false;
    if (isset($_POST['debug_flag'])) {
        $debug_flag = true;
        print "<p>SMTP デバッグメッセージ表示 : ON</p>\n";
    }
    $msg = stripslashes($_POST['message']);
    if (isset($_POST['linewrap_flag'])) {
        str_line_wrap($msg, 78);
        print "<p>本文の78桁での自動改行 : ON</p>\n";
    }
    sendmail_sendmsg(intval($_POST['account_no']), stripslashes($_POST['subject']), $strNewsSendRcpt, stripslashes($_POST['fromname']), $msg, $debug_flag);
}
// リロード用リンクを表示する
printf("<p><a href=\"./%s\">初期画面に戻る</a></p>\n" . "</body>\n" . "</html>\n", $thispage_filename);
exit;
/*************************
 smtp接続を開始する関数

 戻り値:true(成功), false(失敗)
*************************/
function open_smtp(&$arr_mail_account, &$smtp, $account_no, $debug_flag)
{
    // account list array, from config.php
    global $arrAccountsSmtp;
    // $account_noの範囲チェック
    if ($account_no <= 0 || $account_no > count($arrAccountsSmtp)) {