Bobby Caldwell

<% function WA_Universal_Email_1_SendMail(RecipientEmail) dim MailObject, MailAttachments, MailBCC, MailCC, MailTo, MailBodyFormat, MailBody, MailImportance, MailFrom, MailSubject MailAttachments = "" MailBCC = "" MailCC = "" MailTo = "" MailBodyFormat = "" MailBody = "" MailImportance = "" MailFrom = "" & cStr(cStr(Request.Form("email"))) & "" MailSubject = "Contact Form" 'Global Variables gBodyFormat = "" set WA_MailObject = WAUE_Definition("smtp.ftswebhost.com") if (RecipientEmail <> "") then set WA_MailObject = WAUE_AddRecipient(WA_MailObject,RecipientEmail) else 'To Entries end if 'Attachment Entries 'BCC Entries 'CC Entries 'Body Format set WA_MailObject = WAUE_BodyFormat(WA_MailObject,1) MailBodyFormat = gBodyFormat 'Set Importance set WA_MailObject = WAUE_SetImportance(WA_MailObject,"3") 'Start Mail Body MailBody = MailBody & "" MailBody = MailBody & cStr(Request.Form("firstname")) MailBody = MailBody & "" & vbCrlf & "" MailBody = MailBody & cStr(Request.Form("lastname")) MailBody = MailBody & "" & vbCrlf & "" MailBody = MailBody & cStr(Request.Form("address")) MailBody = MailBody & "" & vbCrlf & "" MailBody = MailBody & cStr(Request.Form("city")) MailBody = MailBody & "" & vbCrlf & "" MailBody = MailBody & cStr(Request.Form("state")) MailBody = MailBody & "" & vbCrlf & "" MailBody = MailBody & cStr(Request.Form("zip")) MailBody = MailBody & "" & vbCrlf & "" MailBody = MailBody & cStr(Request.Form("phone")) MailBody = MailBody & "" & vbCrlf & "" MailBody = MailBody & cStr(Request.Form("extension")) MailBody = MailBody & "" & vbCrlf & "" MailBody = MailBody & cStr(Request.Form("fax")) MailBody = MailBody & "" & vbCrlf & "" MailBody = MailBody & cStr(Request.Form("email")) MailBody = MailBody & "" & vbCrlf & "" MailBody = MailBody & cStr(Request.Form("questions")) MailBody = MailBody & "" 'End Mail Body set WA_MailObject = WAUE_SendMail(WA_MailObject,MailAttachments,MailBCC,MailCC,MailTo,MailImportance,MailFrom,MailSubject,MailBody) set WA_MailObject = nothing end function %> <% if ((cStr(Request.Form("Submit2")) <> "")) then 'WA Universal Email object="AspMail" 'Send Loop Once Per Entry WA_Universal_Email_1_SendMail("bobbycaldwellchat@yahoo.com") 'Send Mail All Entries if ("contactconfirmation.asp"<>"") then Response.Redirect("contactconfirmation.asp") end if end if %> Bobby Caldwell

Booking Information

Mary Caldwell
908-512-6214
E-mail: marybcaldwell@yahoo.com

Everything Else!

Want to comment on the web site?
Ask a question about Bobby?
Pass a message to Bobby?

This address will catch everything else
that doesn't relate to booking or Bobby's Fan Club!

E-mail: Info@BobbyCaldwell.com

Click here to read the terms
of use for Bobby Caldwell.com.

home : bio : tour dates : discography : video gallery : images gallery : song writing

film usage : awards received : news : message board : contact : friends