Getting SMTP Server for sending mail using CDO

Hi,

I think this is the right place to post this question.Sorry if it is not.

I am new to VBA coding. In outlook, I am creating a custom form to send email which will have some text boxes and send button. The data in the text boxes will be my body of the mail. Problem is getting SMTP server value (where the custom form is Running)

I am using CDO Library to send mail to avoid Security warning popup. Is there any way to find the SMTP server name in VBA.?

if i use Outlook Application object it will ask Popup warning message before sending eMail. Is there any way to avoid this warning message while sending Email ? I don't want to use any third party tool like Redemption.

i am using Outlook 2003.Thanks in advance.