Hej!
Nybörjarfråga här:

Vill göra ett vanligt formulär med lite textboxar.
Har på mitt hotell möjlighet att använda CDOSYS, men har svårt att hitta någon enkel dokumentation kring detta.

Behöver hjälp med kod för att få iväg mailet helt enkelt.

Någon?

Tack! :)

God morgon! Här kommer det du behöver.

<code>
'Plocka värdena från textboxarna
mailtext = Request("textbox1")
mailtext = mailtext & Request("textbox2")

set objMessage = server.createobject("cdo.message")
set objConfig = server.createobject("cdo.configuration")


' Inställningar för SMTP
Set Flds = objConfig.Fields
Flds.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
Flds.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "din smtpserver"
Flds.update


Set objMessage.Configuration = objConfig
objMessage.To = "någon@någonstans.com"
objMessage.From = "avsändare@någonstans.com"
objMessage.Subject = "Mailämne"
objMessage.HTMLBody = mailtext
objMessage.fields.update
objMessage.Send

set objMessage = nothing
set objConfig = nothing
</code>

Hejsan,

Jag har en artikel om CDOSYS på min hemsida, dock är den på engelska. Den kanske kan vara till lite nytta:

http://www.ilopia.com/Articles/WindowsServer2003/CDO.aspx

Lycka till!