Email registry

Also if you don't feel comfortable editing the SalesCart software, you can point the form to a page containing these codes. Just replace the variable with your info.

**This is for Windows 2003 Server**


<%@ LANGUAGE="VBScript.Encode" %>
<%
     mymail = "YOUREMAILADDRESS@domain.COM"
     sitename = "YOUR SITE NAME"
     mysubject = sitename & "(" & Request.Form("Subject") & ")"
     Dim objMail, themessage

     Set objMail = Server.CreateObject("CDO.Message")

     themessage = themessage & chr(13)
     themessage = themessage & "Name: " & Request.Form("name") & chr(13)
     themessage = themessage & "Phone: " & Request.Form("phone") & chr(13)
     themessage = themessage & "Email Address: " & Request.Form("FromEmail") & chr(13)
     themessage = themessage & " " & chr(13)
     themessage = themessage & Request.Form("Message") & chr(13)
     themessage = themessage & " " & chr(13)
     themessage = themessage & " " & chr(13)
     themessage = themessage & "Sent On: " & date & chr(13)
     themessage = themessage & " " & chr(13)

     objMail.From = Request.Form("FromEmail")
     objMail.To = Request.Form("Email")
     objMail.Subject = mysubject
     objMail.TextBody = themessage
     objMail.Send
     Response.Redirect "your_thank_you_page.html"
     set objMail = nothing
%>

In your EmailRegistry.asp page.


First you will add these two text box:
<input type="text" name="name" size="20" value="">
<input type="text" name="phone" size="20" value="">

Then replace this code:
objMail.SetBody=NewMessage

With this:
objMail.SetBody="Name: " & Request.Form("name") & chr(13) & "Phone: " & Request.Form("phone") & chr(13) & NewMessage

What type of Web tool are you using? Frontpage or DreamWeaver?

Are you asking help on just adding two fields or a way to send out a secondary email with the information people are emailing?