IF llCDO && Win2k or XP * use CDO ELSE && use CDONTS,IIS SMTP(must be started) #DEFINE CdoBodyFormatHTML 0 && Body property is HTML #DEFINE CdoBodyFormatText 1 && Body property is plain text (default) #DEFINE CdoMailFormatMime 0 && NewMail object is in MIME format #DEFINE CdoMailFormatText 1 && NewMail object is plain text (default) #DEFINE CdoLow 0 && Low importance #DEFINE CdoNormal 1 && Normal importance (default) #DEFINE CdoHigh 2 && High importance #DEFINE CdoEncodingUUencode 0 && The attachment is to be in UUEncode format (default) #DEFINE CdoEncodingBase64 1 && The attachment is to be in base 64 format lcFileName=oRequest.FORM("txtMailAttachment") lcFileDesc=oRequest.FORM("txtMailFileDesc") oMail = CreateObject("CDONTS.Newmail") oMail.MailFormat = cdoMailFormatMIME IF !EMPTY(oRequest.FORM("txtMailFrom")) oMail.From = oRequest.FORM("txtMailFrom") ENDIF IF !EMPTY(oRequest.FORM("txtMailTo")) oMail.To = oRequest.FORM("txtMailTo") ENDIF IF !EMPTY(oRequest.FORM("txtMailBcc")) oMail.bcc = oRequest.FORM("txtMailBcc") ENDIF IF !EMPTY(oRequest.FORM("txtMailReplyTo")) oMail.Value("Reply-To") = oRequest.FORM("txtMailReplyTo") ENDIF IF !EMPTY(oRequest.FORM("D1")) oMail.Importance = VAL(oRequest.FORM("D1")) ENDIF IF !EMPTY(oRequest.FORM("txtMailSubject")) oMail.Subject = oRequest.FORM("txtMailSubject") ENDIF IF !EMPTY(oRequest.FORM("S1")) oMail.Body = oRequest.FORM("S1") ENDIF IF !EMPTY(lcFileName) .AND. FILE(lcFileName) oMail.AttachFile(lcFileName,lcFileDesc) ENDIF oMail.Send ENDIF>Hello, does anyone works with VFP and cdonts and show me an example?