WITH This *** create configuration and message objects .oConfig = CREATEOBJECT( 'CDO.Configuration' ) IF TYPE( 'This.oConfig' ) = 'O' *** Check to see if we have configuration infomation IF NOT EMPTY( NVL( .oConfig.Fields( "http://schemas.microsoft.com/cdo/configuration/smtpserver").value, "" ) ) llRetVal = .T. ELSE *** Manually set Configuration properties *** using the CdoConfig table llRetVal = This.GetSmtpInfo() ENDIF ENDIF ENDWITHThe GetSmtpInfo() method reads the required settings from a table.