asp如何用CDONTS发送带附件的邮件？

如何用ASP发送带附件的邮件？

请问如何用CDONTS组件发送带附件的邮件？

    见下列代码：

<％ 
Option Explicit 
Dim objMail
 Set objMail = Server.CreateObject("CDONTS.NewMail")
 objMail.From = "liyanbing@163.net " 
 objMail.Subject = "asp之安家"
 objMail.AttachFile("s:\flashdays\images\win.jpg")
 objMail.To = "wuxiaotao@263.net"
 objMail.Body = "欢迎访问asp之家：http://www.aspxhome.com!"
 objMail.Send
 Response.write("Mail was Sent")  
set objMail = nothing
％>