电子邮件是非常普通的营销方式。但是传统的群发式电子邮件，已经被很多用户斥之为“垃圾”，并被千方百计的阻拦。2006年2月发布的《互联网电子邮件服务管理办法》更是明令禁止企业发送用户未定阅的商业推广信息。如何合法并有效的运用电子邮件开展营销活动，成为众多企业营销人员越来越关心的问题。

首先，你可能希望对文件改名。为了跟踪所有的文档，你将要重新命名它们以便唯一，这样就可以被系统容易地区别。很不幸，FSO不允许简单的文件改名操作，所以我们不得不修改一下。 %‘ create the fso objectset fso = Server.Createobject("Scripting.FileSystemObject")path = "c: emp est.txt"strDate = Replace(Date(