Sending email

[Wanderson]

Hi everybody,

I send email with success with this:

oCfg := CREATEOBJECT( "CDO.Configuration" )
WITH OBJECT oCfg:Fields
:Item( "http://schemas.microsoft.com/cdo/configuration/smtpserver" ):Value := cServ
:Item( "http://schemas.microsoft.com/cdo/configuration/smtpserverport" ):Value := nPort
:Item( "http://schemas.microsoft.com/cdo/configuration/sendusing" ):Value := 2
:Item( "http://schemas.microsoft.com/cdo/configuration/smtpauthenticate" ):Value := lAut
:Item( "http://schemas.microsoft.com/cdo/configuration/smtpusessl" ):Value := lSSL
:Item( "http://schemas.microsoft.com/cdo/configuration/sendusername" ):Value := cUser
:Item( "http://schemas.microsoft.com/cdo/configuration/sendpassword" ):Value := cPass
:Update()
END WITH

But if i try to send a second email without close the program freeze, how i can release this object?

Thanks in advance.

[Enrico Maria Giordano]

Try

oCfg:End()

or

oCfg = NIL

EMG

[Wanderson]

Try

oCfg:End()

or

oCfg = NIL

EMG

Thanks Enrico i will try.