把表单的内容直接发送到邮箱?请各位大侠指点.

<%

Dim objCDO
Set objCDO = Server.CreateObject("CDONTS.NewMail")
%>

<%

objCDO.To = "mitchell@4guysfromrolla.com"
objCDO.From = "gates@microsoft.com"
objCDO.cc = "barksdale@netscape.com,jobs@apple.com"

Dim txtSubject
txtSubject = "Hello Scott! We were wanting your advice on some programming issues. Please come to Redmond at your earliest convenience for a very fat check!"

objCDO.Subject = "Attn: Scott, we need you!!"
objCDO.Body = txtSubject
objCDO.Send

%>
给你个例子