* GetMessage() if ( this.oleMAPISession.SessionID = 0 ) return endif with this.oleMAPIMessages this.MsgSubject = "" this.MsgNoteText = "" this.mnAttachmentCount = 0 this.mnAttachmentIndex = 0 if ( this.mnMsgIndex < this.mnMsgCount ) .MsgIndex = this.mnMsgIndex this.MsgSubject = .MsgSubject this.MsgNoteText = .MsgNoteText this.mnAttachmentCount = .AttachmentCount endif endwith return this.MsgSubject * GetAttachment() if ( this.oleMAPISession.SessionID = 0 ) return endif with this.oleMAPIMessages this.mcAttachmentName = "" this.mcAttachmentPathName = "" this.mnAttachmentType = 0 if ( this.mnAttachmentIndex < this.mnAttachmentCount - 1 ) .AttachmentIndex = this.mnAttachmentIndex this.mcAttachmentName = .AttachmentName this.mcAttachmentPathName = .AttachmentPathName this.mnAttachmentType = .AttachmentType endif endwith return this.mcAttachmentName *GetNextMessage() if ( this.oleMAPISession.SessionID = 0 ) return endif local lcRetVal if ( this.mnMsgIndex < this.mnMsgCount ) this.mnMsgIndex = this.mnMsgIndex + 1 lcRetVal = this.GetMessage() else lcRetVal = "" endif return lcRetVal *GetNextAttachment() if ( this.oleMAPISession.SessionID = 0 ) return endif local lcRetVal if ( this.mnAttachmentIndex < this.mnAttachmentCount - 2 ) this.mnAttachmentIndex = this.mnAttachmentIndex + 1 lcRetVal = this.GetAttachment() else lcRetVal = "" endif return lcRetVal>So far I can get the attached files and copy them to my down load dir.