关于ASP的运行出错问题!!!!!!

来源:百度知道 编辑:UC知道 时间:2024/06/28 14:38:07
<!-- #include file="utility/check.asp" -->
<!-- #include file="utility/JMail.asp" -->

<%

'首先检查是否有权限
'也就是用户是否通过审核
CheckFlag(1)

'定义相关变量
dim mailSubject
dim mailTo
dim mailContent

mailSubject = Request.Form("mailSubject")
mailTo = Request.Form("mailTo")
mainContent = Request.Form("mailContent")

'检查内容是否填充完整
if(mailSubject = "") then
Alert("请填写邮件主题!")
GoBack()
Response.end
elseif(mailTo = "") then
Alert("请填写收件人地址")
GoBack()
Response.end
elseif(mailContent ="") then
Alert("请填写邮件内容")
GoBack()
Response.End
end if

'过滤Html字符
mailContent = HtmlEncode2(mailContent)

'调用发送邮件过程
Call SendMail(mailTo,mailSubject,mailConten

你这里的checkFlag的参数类型应该是布尔类型,即是true ,false两种类型,建议用CheckFlag(true),试一下。

如果不行,你就只能贴出那函数来看看了..
那个函数应该在utility/check.asp这个文件里,你找找看一下

'CheckFlag' 的参数类型是啥啊?你把函数贴上来看看

CheckFlag(1) 这是一个函数调用,你看看这个函数怎么写的?

函数呢,没贴出来呀