It might help

来源: 2005-02-04 10:04:20 [旧帖] [给我悄悄话] 本文已被阅读:

You might just missed this part:

IF strBody "" Then
Set objCDOMail = Server.CreateObject("CDONTS.NewMail")
objCDOMail.From = "yourname@wenxuecity.com"

objCDOMail.To = strTo
objCDOMail.Subject = strSubject
objCDOMail.Body = strBody

objCDOMail.Importance = 1
objCDOMail.AttachFile strLogFileName

Set objCDOMail = Nothing
End IF