% mode = Request.QueryString("mode") name = Request.QueryString("name") emailaddress = Request.QueryString("emailaddress") company = Request.QueryString("phone") address = Request.QueryString("address") emailbody = emailbody & "Name: " & name & vbcrlf emailbody = emailbody & "Email: " & emailaddress & vbcrlf emailbody = emailbody & "Phone: " & company & vbcrlf emailbody = emailbody & "Address: " & address & vbcrlf Function Email() if len(emailaddress) > 0 then set newEmail = server.CreateObject("CDONTS.NewMail") newEmail.From = emailaddress newEmail.To = "dan@nubank.com, carey@nubank.com, stacey@nubank.com" newEmail.Subject = "BankIPO Email Submission" 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
%>
|
|
| bank stock | bank capital | market perspectives | disclaimer |