<%
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="qing-studio@163.com"
mymail.Subject="无主题"
mymail.Body=body
mymail.Send
set mymail=nothing
%>


<%
response.End
end if
%>

姓名（*）
EMAIL（*）
电话（*）
从事工作
人个简介

<%
end if
end if
%>






错误类型：
Microsoft VBScript 编译器错误 (0x800A0400)
缺少语句
/htm/khjszc.asp, line 168
end if


浏览器类型：
Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1)

网页：
GET /htm/khjszc.asp

老大有没有其它的方法实现:

一定要这个"CDONTS.NewMail"
它的服务器可能没有这个东东啊


错误类型：
Server 对象, ASP 0177 (0x800401F3)
无效的类别字符串
/htm/khjszc.asp, 第 15 行

浏览器类型：
Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1)

网页：
POST 97 ??? /htm/khjszc.asp

POST Data:
uname=sdaf&uemail=sdf@asdjpf.com&uphone=2314&upostcode=adif&employee=sdl%3Baf&submit=%C8%B7%C8%CF