%
If request.form("Submit")="Submit" Then
Set mailer = Server.CreateObject("ASPMAIL.ASPMailCtrl.1")
mailServer = "mail.sowb.org"
fromName = "SOWB Web Site"
fromAddress = "ronpilo1@hotmail.com"
priority = "low"
returnReceipt = ""
' ************ BELOW IS WHERE YOU PUT THE ADDRESS TO MAIL TO ****************
toAddressList = "membership@sowb.org"
' ************ YOU CAN EVEN "CC" OR "BCC" TO A DIFFERENT ADDRESS HERE
ccAddressList = "ronpilo1@hotmail.com"
bccAddressList = ""
messageSubject = "SOWB Web Site Inquiry"
' ************ HERE IS WHAT IS BEING SENT
' Main Body Text --------------------
mBody = "First Name: " & request.form("fname") & vbCrLf &_
"Last Name: " & request.form("lname") & vbCrLf &_
"Address: " & request.form("add1") & vbCrLf &_
"City, State Zip: " & request.form("city") & ", " & request.form("state") & " " & request.form("zip") & vbCrLf &_
"Home Phone: " & request.form("phone") & vbCrLf &_
"Cell Phone: " & request.form("cell") & vbCrLf &_
"E-mail: " & request.form("cemail") & vbCrLf
nBody = "Transfer Info" & vbCrLf &_
"Association: " & request.form("assoc") & vbCrLf &_
"Contact: " & request.form("cont") & vbCrLf &_
"City, State: " & request.form("ccity") & ", " & request.form("cstate") & vbCrLf &_
"Phone: " & request.form("cphone") & vbCrLf &_
"E-mail: " & request.form("cmail") & vbCrLf &_
"Years Officiating: " & request.form("yrs") & vbCrLf &_
vbCrLf
fBody = "___________________________________________________________" & vbCrLf & _
"This message is generated by SOWB,ORG" & vbCrLf & _
"Copyright(c) 2010."
messageText = mBody & vbCrLf & nBody & vbCrLf & fBody
' NOW SEND THE MESSAGE
result = mailer.SendX(mailServer, _
fromName, _
fromAddress, _
priority, _
returnReceipt, _
toAddressList, _
ccAddressList, _
bccAddressList, _
attachmentList, _
messageSubject, _
messageText)
response.redirect "thanks.asp"
End If
%>
Join The SOWB
 |
 |
 |
 |
 |
 |
 |
 |
 |
 |
 |
|
|
If you have worked for another association and you are interested in joining the SOWB, please complete the form below.
|
|
|
|
|
|
|
|