geek_grrrl
02-21-2003, 01:35 AM
Hellow I'm an absolute novice in terms of ASP. The only thing I know about it is that it might help me to activate a form I've designed so that the info in the form is sent to me via an email.
The form lives here - http://www.jetsupport.com.au/original/beta/html/bookings.html
A guy who worked on a previous version of the site put together the code below. Does anyone know (a) if it will work and (b) how I can attach the code to the "submit" button, if indeed this is what I need to do to get the whole show on the road.
<%
For Each x In Request.Form
message = message & x & ": " & Request.Form(x) & CHR(10)
Next
set smtp=Server.CreateObject("Bamboo.SMTP")
smtp.Server="smtp.iprimus.com.au"
smtp.Rcpt="info@originalbackpackers.com.au"
smtp.From="Email"
smtp.FromName="FirstName" & "LastName"
smtp.Subject="Response to my form"
smtp.Message = message
on error resume next
smtp.Send
if err then
response.Write err.Description
else
Response.redirect ("http:// redirect.com")
end if
set smtp = Nothing
%>
Kissies
The form lives here - http://www.jetsupport.com.au/original/beta/html/bookings.html
A guy who worked on a previous version of the site put together the code below. Does anyone know (a) if it will work and (b) how I can attach the code to the "submit" button, if indeed this is what I need to do to get the whole show on the road.
<%
For Each x In Request.Form
message = message & x & ": " & Request.Form(x) & CHR(10)
Next
set smtp=Server.CreateObject("Bamboo.SMTP")
smtp.Server="smtp.iprimus.com.au"
smtp.Rcpt="info@originalbackpackers.com.au"
smtp.From="Email"
smtp.FromName="FirstName" & "LastName"
smtp.Subject="Response to my form"
smtp.Message = message
on error resume next
smtp.Send
if err then
response.Write err.Description
else
Response.redirect ("http:// redirect.com")
end if
set smtp = Nothing
%>
Kissies