雨伞画图片大全儿童:ASP发送邮件

<%@ Language=VBScript %>
<%
Dim name,phone1,phone2,yb,address,number1,number2,money
Dim objCDO
name = Request.Form("name")
phone1 = Request.Form("phone1")
phone2 = Request.Form("phone2")
yb = Request.Form("yb")
address = Request.Form("address")
number1 = Request.Form("number1")
number2 = Request.Form("number2")
money=Request.Form("money")

Set objCDO = Server.CreateObject("CDONTS.NewMail")
objCDO.Form = "网上购药"
objCDO.To = "163luenjun@163.com"
objCDO.Subject = "我要购药"
objCDO.Body = "姓名:"&name&"固定电话:"&phone1&"手机:"&phone2&"邮政编码:"&yb&"详细地址:"&address&"【前宝康】数量:"&number1&"【前宝康免疫丸】数量:"&number2&"付款方式:"&money"
objCDO.Send
set objCDO = nothing
Response.Write("您的信息已提交，我们会尽快回复!")
%>
老提示无法显示网页
您要访问的网页有问题，无法显示。

--------------------------------------------------------------------------------

请尝试以下操作:

打开 www.taxinda.com 主页，然后查找指向您感兴趣信息的链接。
单击刷新按钮，或以后再试。

单击搜索，寻找 Internet 上的信息。
也可查看相关站点列表。

HTTP 500 - 内部服务器错误
Internet Explorer

可以告诉我哪里错了吗