--WEBBOT-SELF--

[aphridyte]

Hi! HELP a blonde with MSPUB 2003! i'm a newbie to web design. having trouble
with my form. Have read many tutorials and info about - still don't get it!
can somebody please spoonfeed me?!

my webhost is terrible at explaining, sends me coding which looks like greek
to me (for now, will learn it!) I want info sent to my e-mail. right now, it
gives me the webbot message with error 404. i have a log in to HELM control
panel and my host keeps on telling me to upload his code to an asp page? my
URL with the form:
www.chrysaliscorporate.co.za/Index_files/CCTCContactUs.html and the code
given to me:

'Create the mail object

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

Set objCDOSYSCon = Server.CreateObject ("CDO.Configuration")

objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "localhost"

objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25

objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2

objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 60

objCDOSYSCon.Fields.Update

Set objMail.Configuration = objCDOSYSCon

'Set key properties

objMail.From = sFrom

objMail.To = ("(e-mail address removed)")

objMail.Subject= sSubject

objMail.HTMLBody = sHTMLBody

'Send the email

objMail.Send

'Set sMsg which will be used later

'Clean-up

Set objMail = Nothing

Response.Write ("Message Sent")

%>

 

[DavidF]

Reference: Publisher web publication forms 101:
http://msmvps.com/blogs/dbartosik/archive/2006/01/07/80564.aspx

DavidF