帮我看这段代码＜关于邮件发送的＞
是别人帮我写的
但是没用
谁能帮我看一个

<%
if Request.Form("uname")<>"" then
uname=Request.Form("uname")
uemail=Request.Form("uemail")
uphone=Request.Form("uphone")
upostcode=Request.Form("upostcode")
companyname=Request.Form("companyname")
body=":" & uname & chr(13) & chr(10)
body=body & "电子邮件:" & uemail & chr(13) & chr(10)
body=body & "电话:" & uphone & chr(13) & chr(10)
body=body & "工作单位:" & upostcode & chr(13) & chr(10)
body=body & "个人简介:" & companyname & chr(13) & chr(10)

set mymail =server.CreateObject("CDONTS.NewMail")
mymail.BodyFormat=0
mymail.cc=uemail
mymail.From=uname
mymail.To=request.form("to_mail")
mymail.Subject="无主题"
mymail.Body=body
mymail.Send
set mymail=nothing
%>


<%
response.End
end if
%>





href="img/tc.css" rel=stylesheet>

你的姓名（*）: 你的邮件（*）: 发至（*）: 益丰稿件支持中心 电话（*）: 你所从事的工作: 你的稿件: