Microsoft VBScript 编译器错误 '800a03ea'

Microsoft VBScript 编译器错误 '800a03ea'

语法错误

\\save.asp, line 24

代码如下：

<html>

</head>

<%
name=request("name")
address=request("易做图")
email=request("know")
title=request("major")
comment=request.form("address")
comment=replace(resource,"<","<")
name=replace(name,"<","<")
address=replace(address,"<","<")
email=replace(email,"<","<")
title=replace(title,"<","<")

fortime=formatdatetime(time,4)
datenow=year(now())&"-"&month(now())&"-"&day(now())&" "&fortime
conn.execute(sql)
response.write " <center>报名成功！ <a href=JavaScript:history.back();>请返回</a></center>"
conn.close
else
response.write " <center>没有填写完整!<a href=JavaScript:history.back();>请返回</a></center>"
end if
%>
</body>

</html>

成功帮忙解决问题后，保证加分。

答案：&lt;%
 name=request("name")
 address=request("易做图")
 email=request("know")
 title=request("major")
 comment=request.form("address")
 comment=replace(resource,"&lt;","&lt;")
 name=replace(name,"&lt;","&lt;")
 address=replace(address,"&lt;","&lt;")
 email=replace(email,"&lt;","&lt;")
 title=replace(title,"&lt;","&lt;")
  
  fortime=formatdatetime(time,4)
 datenow=year(now())&"-"&month(now())&"-"&day(now())&" "&fortime
 conn.execute(sql)
 If Err.Number = 0 Then
 response.write "&lt;font  size=+2  color=red&gt;&lt;br&gt;&lt;br&gt;&lt;center&gt;&lt;b&gt;报名成功！&lt;/b&gt;&lt;/font&gt;&lt;br&gt;&lt;br&gt;&lt;a  href=> conn.close
 else
 response.write "&lt;font  size=+2 color=red&gt;&lt;br&gt;&lt;br&gt;&lt;br&gt;&lt;center&gt;没有填写完整!&lt;a  href=> end if
 %&gt;

更多图片编程知识:

Microsoft VBScript 编译器错误 &#39;800a03ea&#39;

Microsoft VBScript 编译器错误 '800a03ea'