function SendAction(subject, email, content)
Set mail = Server.CreateObject("CDONTS.NewMail")
mail.To = email 'email为接受人邮箱,多个以逗号隔开
mail.From = "test@test.com"
mail.Subject = subject
mail.Body = content
mail.BodyFormat = 0
mail.MailFormat = 0
mail.Send
Set mail = Nothing
End function