ohh im sorry i forgot you cant see it, should i post it or email it, its pretty long, but here it is
<%@ LANGUAGE="JSCRIPT"%>
<%/*--------------------------------------------------------------
|
| Tradesmen International, Inc.
| Copyright 2002 Tradesmen International
| Written by William McGreevy
|
| Filename: formsu~1.asp
| Created: 1-24-02
|
| Modifications: 1-24-02 Model Email page after PLTC Jscript
| 2-04-02 Remove the Array selection, straight email
| 2-12-02 Add radio buttons for contact selection
------------------------------------------------------------------*/%>
<%
/***********************************************
* Submit Definition (Constant)
*/
//** Email Form Control Definitions ****
var PLT_EMAIL_SUBMIT = "Submit"; // SUBMIT Button
/***********************************************
* Post Email Message
*
*/
function PLT_PostEmail()
{
var bToFilled = false;
var strNormFont = "<font face = \"Verdana, Arial, Helvetica, sans-serif\" color=\"#006600\">";
// if no submit button do nothing
/**/ if( Request.Form( PLT_EMAIL_SUBMIT ).Count == 0 )
return false;
// Gather everything from POSTing form
var strFromName = Request.Form.Item( "name" );
var strFromEmail = Request.Form.Item( "emailadd" );
/**/ var strFromPhone = Request.Form.Item( "phone" ) + " Ext." + Request.Form.Item( "ext" );
/**/ var strContactPref = Request.Form.Item( "prefer" );
/**/ var strContactMsg = "I would prefer to be contacted by " + strContactPref + "."
var strToName = "Tradesmen International";
/**/ var strMsg = Request.Form.Item( "comments" ) + "\n\n Sincerely,\n " + strFromName + "\n " + strFromPhone + "\n";
// Allow user to NOT fill in their name
if( strFromName == ""
strFromName = "(anonymous)";
/*****/
// mail object set up
var nmStaff = Server.CreateObject ( "CDONTS.Newmail" );
nmStaff.From = strFromEmail != "" ? strFromEmail : "wmcgreevy@tradesmen-intl.com";
nmStaff.To = "wmcgreevy@tradesmen-intl.com";
nmStaff.Subject = "Web Site Contact Form";
nmStaff.Body = strContactMsg + "\n\n" + strMsg;
nmStaff.Send();
//mail object set up for Autoreply
// if From Email address equals nothing don't do anything, else do this
if( strFromEmail != "" ) {
var nmAutoreply = Server.CreateObject( "CDONTS.Newmail" );
nmAutoreply.From = "autoreply@tradesmeninternational.com";
nmAutoreply.To = strFromEmail;
nmAutoreply.Subject = "Web Site Contact Conformation Form";
/**/ nmAutoreply.Body = "Thank you for your comments or requests.\n" + "We are interested in your " +
/**/ "inquiry and you will be hearing from us soon.\n" +
"Here is a copy of your comments for your records.\n\n\n" + strContactMsg + "\n\n" + strMsg;
nmAutoreply.Send();
}
// if yes submit button do print return message
if( Request.Form( PLT_EMAIL_SUBMIT ).Count == 1 )
Response.Write( "<BR><BR>" + strNormFont + "Thank you. Your message has been sent. " + "<br>"
;
} //ending the function statement
/***************************************************************
* The above asp is executed before any HTML
*/
%>
