Forum Moderators: open
Basic script:
TheAttachment = Request.Form("Attatchment")
Set cdoMessage = Server.CreateObject("CDO.Message")
Set cdoConfig = Server.CreateObject("CDO.Configuration")
cdoConfig.Fields("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
cdoConfig.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "mail server"
cdoConfig.Fields.Update
Set cdoMessage.Configuration = cdoConfig
cdoMessage.From = "From@web.for"
cdoMessage.ReplyTo = "ReplyTo@frt.got"
cdoMessage.To = "to@fceccj.edcu"
cdoMessage.Subject = "Subject of Email"
cdoMessage.HtmlBody = "Body of Email"
cdoMessage.AddAttachment "Don't know what to put here"
on error resume next
cdoMessage.Send
If Err.Number <> 0 Then
Response.Write "Error sending mail "&Err.Number
Else
Response.Write "Email Sent"
End If
Set cdoMessage = Nothing
Set cdoConfig = Nothing