Hi Ed,

Thanks for the reply, actually I have tried in the Nigel Coates' MAPIMAIL class, but nothing happened.

This is part of code in methode sendmail from the class :

* Create message object
THIS.oMessage=CREATEOBJECT("MSMAPI.MAPIMessages.1")
WITH THIS.oMessage
	.SessionID=lnSessionID
	.Compose()
	.MsgIndex=-1
	.MsgNoteText=THIS.cBodyText
	.MsgSubject=THIS.cSubject
	.MsgReceiptRequested=llReceipt
	.RecipDisplayName=THIS.aRecipients[1]
	* Multiple recipients
	FOR lnLoop=2 TO ALEN(THIS.aRecipients,1)
		.RecipIndex=.RecipCount
		.RecipDisplayName=THIS.aRecipients[lnLoop]
	ENDFOR
	* Copy recipients
	IF THIS.nCCRecipCount>0
		FOR lnLoop=1 TO ALEN(THIS.aCCRecipients,1)
			.RecipIndex=.RecipCount
			.RecipDisplayName=THIS.aCCRecipients[lnLoop]
			.RecipType=2
		ENDFOR
	ENDIF
	* Blind copy recipients
	IF THIS.nBCCRecipCount>0
		FOR lnLoop=1 TO ALEN(THIS.aBCCRecipients,1)
			.RecipIndex=.RecipCount
			.RecipDisplayName=THIS.aBCCRecipients[lnLoop]
			.RecipType=3
		ENDFOR
	ENDIF
	* Add any required attachment files
	lnAttachPos=(LEN(THIS.cBodyText)-ALEN(THIS.aAttachmentFiles,1))-1
	IF NOT EMPTY(THIS.aAttachmentFiles[1])
		.AttachmentPosition=lnAttachPos
		.AttachmentPathName=THIS.aAttachmentFiles[1]
		* Multiple attachment files
		FOR lnLoop=2 TO ALEN(THIS.aAttachmentFiles,1)
			.AttachmentIndex=.AttachmentCount
			lnAttachPos=lnAttachPos+1
			.AttachmentPosition=lnAttachPos
			.AttachmentPathName=THIS.aAttachmentFiles[lnLoop]
		ENDFOR
	ENDIF
	RUN /N7 cscript waitforoutlook.vbs  -> this is your script
	.Send(llShowOutlook)
ENDWITH

regards,


Budianto