主题:  关于if else end if的问题

想入CG这个行

职务:普通成员
等级:1
金币:10.0
发贴:269
#12004/9/28 5:16:13
代码如下

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>pr</title>
</head>

<body>
<%
set connect=server.CreateObject("adodb.connection")
connect.open "driver={microsoft access driver (*.mdb)};dbq="&server.MapPath("pr.mdb")
old=request.Form("Q1")
sex=request.Form("q2")
merry=request.Form("q3")
graduate=request.Form("q4")
box1=request.Form("box1")
box2=request.Form("box2")
box3=request.Form("box3")
box4=request.Form("box4")
dim job
job=box1+box2+box3+box4
vote="INSERT INTO pr(old,sex,merry,graduate,job)values('"+old+"','"+sex+"','"+merry+"','"+graduate+"','"+job+"')"
If
0=(box1 or box2 or box3 or box4)
Then
response.write"您的标单没有填写完整。"
Else
'vote="INSERT INTO pr(old,sex,merry,graduate,job)values('"+old+"','"+sex+"','"+merry+"','"+graduate+"','"+job+"')"
connect.execute vote
connect.close
set connect=Nothing
response.Write("记录添加成功,谢谢您参与小可的问卷调查!")
End If
%>
</body>
</html>

错误提示如下
错误类型:
Microsoft VBScript 编译器错误 (0x800A03EA)
语法错误
/temp/pr.asp, line 23, column 2
If
-^

有时候把代码换个行错误提示也会变化,到底是怎么回事阿?



沉默是金

职务:普通成员
等级:6
金币:11.2
发贴:4357
#22004/9/28 9:01:21
If
0=(box1 or box2 or box3 or box4)
then
不允许这样写D,条件必须写在IF的后面,不可以分开的啦。

if 0=(box1 or box2 or box3 or box4) then
......
else
.....
end if


难人一个……

+ 小魔王 +

职务:普通成员
等级:1
金币:5.0
发贴:192
#32004/9/28 9:48:56

connect.close
set connect=Nothing
拿到 if 的外面來



想入CG这个行

职务:普通成员
等级:1
金币:10.0
发贴:269
#42004/9/29 1:56:48
的确是格式问题,谢谢!



Dreaming

职务:普通成员
等级:1
金币:10.0
发贴:1518
#52004/9/29 8:55:03
分行写的话要加"_"



李小龙

职务:普通成员
等级:1
金币:0.0
发贴:9
#62004/9/30 14:01:15
supreme在上个帖子中说
引用:

connect.close
set connect=Nothing
拿到 if 的外面來



不懂就会乱讲,笑死人了.



缺缺

职务:管理员
等级:8
金币:41.0
发贴:9620
#72004/9/30 18:12:44
李小龙在上个帖子中说
引用:
supreme在上个帖子中说
引用:

connect.close
set connect=Nothing
拿到 if 的外面來



不懂就会乱讲,笑死人了.


虽然这个并不会导致错误,但是确实一个好的建议,可以不管什么样的情况下就可以及时的关闭数据库连接.



我想飞

职务:普通成员
等级:1
金币:0.0
发贴:17
#82004/10/2 8:57:44
不要打消人家的积极性么,虽然说的不对,可是大家应该支持啊,不然以后谁敢发言了

所以我对敢发言的仁兄表示鼓励~



+ 小魔王 +

职务:普通成员
等级:1
金币:5.0
发贴:192
#92004/10/2 20:01:26
李小龙在上个帖子中说
引用:
supreme在上个帖子中说
引用:

connect.close
set connect=Nothing
拿到 if 的外面來



不懂就会乱讲,笑死人了.

如果你真的做过大系统就知道这个小小的地方是多么重要了
如果你的系统同时有成千上万个用户在用,那么服务器将创建成千上万个数据库链接
而这些链接都不会关闭,最终的结果就是内存用完,IIS死掉
至于那个if的错误,有点ASP基础的人都能看出来,有什么好多解释的