Entrouage forward script help needed

I have a scrip that I am using that forwards a message…

But I realize that I also need to include any attachments with the forward…but I am not sure how to modify my script to cycle through the attachments and add them to the created message.

Can someone provide some direction for me?


tell application "Microsoft Entourage"
	set theOrigionalMessage to the current messages
end tell
repeat with theMsg in theOrigionalMessage
	my ProcessMsg(theMsg)
end repeat


--
--
on ProcessMsg(theMsg)
	tell application "Microsoft Entourage"
		activate
		set theSender to sender's address of theMsg
		set theSubject to "External Forward: " & subject of theMsg
		set theBody to content of theMsg
		set MyReply to make new outgoing message with properties {recipient:theSender, subject:theSubject, content:theBody}
		open MyReply 
	end tell
end ProcessMsg