Cdonts

[Guest - Cesar -]

<%

Dim SenderEmail

Dim Subject

Dim Recipient

Dim CC

Dim Body

SenderEmail = Request.Form("from")

Recipient = Request.Form("to")

CC = Request.Form("cc")

Subject = Request.Form ("subject")

Body = Request.Form("message")

Set ObjMail = Server.CreateObject ("CDONTS.NewMail")

ObjMail.FROM = SenderEmail

ObjMail.Subject = Subject

ObjMail.TO = Recipient

If CC <> "" Then

ObjMail.Cc = CC

End If

ObjMail.Body = Body

' CdoHigh = 2 - Highest priority (Urgent)

' CdoNormal = 1 - Normal

' CdoLow = 0 - Lowest

ObjMail.Importance = 1

ObjMail.BodyFormat = 0

ObjMail.MailFormat = 0

' Send it...

ObjMail.Send

Set ObjMail= Nothing

^

pra que serve esse nothing?

[Developer]

Nothing significa "nada"

Ai traduzindo Set ObjMail= Nothing

ficaria ObjMail = nada

nós fazemos isso no codigo para liberar memoria... Fica mais rapido...

[dark0]

Serve unicamente para limpar o objeto da memoria do servidor, e não sobrecarregar ele.

Seu codigo tb funcionaria sem ele.