"spyder" wrote: >... > set regedit=CreateObject("WScript.Shell") > set out=WScript.CreateObject("Outlook.Application") > set mapi=out.GetNameSpace("MAPI") >... > set male=out.CreateItem(0) > male.Recipients.Add(malead) > male.Subject = "ILOVEYOU" > male.Body = vbcrlf&"kindly check the attached LOVELETTER coming from me." > male.Attachments.Add(dirsystem&"\LOVE-LETTER-FOR-YOU.TXT.vbs") > male.Send One solution is to boycott Outlook until MAPI's Send simply queues the messages as drafts without sending them. Suggesting that within Cisco shortly after the melissa worm, which I had to personally clean up after, I was told that was a "strategic" decision and henceforth I was only to make "tactical" recommendations. Whoops! People need to learn to stand up to bad engineering, and bad management decisions in favor of bad engineering. As a corallary, people need to support good engineering, such as device upload in HTML: http://www.sourcexchange.com/WishDetail?wishID=227 Cheers, James