";
&draw_col("./nav.txt");
print " |
Email Us ";
# ----------- Main -----------
$sendername = param('SENDERNAME');
$sender = param('SENDER');
$phone = param('PHONE');
# $subject = param('SUBJECT');
$make = param('MAKE');
$model = param('MODEL');
$textbody = param('MESSAGE');
$retry = 0;
if ( ($sendername eq '') || ($sender eq '') || ($phone eq '') || ($make eq '') || ($model eq '') || ($textbody eq '') )
{
print "\n";
}
}
else
{
print "Sending Message ... ";
$receiver = "andrew.cramer\@cramer-ts.com";
# $receiver1 = "ibm600x\@cramer-ts.com";
$subject = "Make: $make\nModel: $model";
&mailto($sendername,$sender,$phone,$receiver,$subject,$textbody);
# &mailto($sendername,$sender,$phone,$receiver1,$subject,$textbody);
print "Message Sent. \n";
print " Thank you. Click [HOME] to return.
\n";
}
# ------------
# print " | ";
print " |