<% @LANGUAGE="VBSCRIPT" CODEPAGE="1252"%/>
Active Works Media-Design Portfolio
<%
Set Mail = Server.CreateObject("SMTPsvg.Mailer") 'create an Asp mail component.
Mail.FromName = "1&1 Test"
Mail.FromAddress= Request.Form("email")
Mail.RemoteHost = "mrelay.perfora.net" ' The mail server you have to use with Asp Mail
Mail.AddRecipient "Active Works Media", "jdisilva@activeworksmedia.com"
Mail.Subject = "Website - Info Request"
Mail.BodyText = Request.Form("info")
if Mail.SendMail then
Response.Write "Your mail has already been sent..."
else
Response.Write "Mail send failure. Error was " & Mail.Response
end if
%>