<% @LANGUAGE = VBScript %> ebankcapital.com <% mode = Request.QueryString("mode") name = Request.QueryString("name") emailaddress = Request.QueryString("emailaddress") company = Request.QueryString("company") businessaddress = Request.QueryString("businessaddress") city = Request.QueryString("city") state = Request.QueryString("state") zip = Request.QueryString("zip") phone = Request.QueryString("phone") comments = Request.QueryString("comments") emailbody = emailbody & "Name: " & name & vbcrlf emailbody = emailbody & "Email: " & emailaddress & vbcrlf emailbody = emailbody & "Company: " & company & vbcrlf emailbody = emailbody & "Address: " & businessaddress & vbcrlf emailbody = emailbody & "City: " & city & vbcrlf emailbody = emailbody & "State: " & state & vbcrlf emailbody = emailbody & "Zip: " & zip & vbcrlf emailbody = emailbody & "Phone: " & phone & vbcrlf emailbody = emailbody & "Comments: " & comments & vbcrlf Function Email() if len(emailaddress) > 0 then set newEmail = server.CreateObject("CDONTS.NewMail") newEmail.From = emailaddress newEmail.To = "info@ebankcapital.com" newEmail.Subject = "Inquiry from ebankcapital.com" newEmail.Body = emailbody newEmail.Send set newEmail = nothing 'Release Memory Email = true else Email = false end if End Function %>



<% if mode="EMAIL" then if (Email()) then %>

Thank you for your comments!

Your message was sent successfully.


<% else %>

Your e-mail was not sent.

The problem may be with our server. Please use your browser's back button to try submitting your message again. If you still receive this error, please send your comments to info@ebankcapital.com. Please also let us know about this error so that we may correct it!

<% end if else %>
Questions? Comments? Tell us more.

NAME:

EMAIL:

COMPANY:

BUSINESS ADDRESS:

CITY:

STATE:

ZIP:

PHONE:

COMMENTS:

* fields in bold are required.

<% end if %>