注册 登录
编程论坛 ASP技术论坛

[求助]asp中的vbscript编辑.elseif 错误,

xunmi_love 发布于 2007-10-10 09:08, 637 次点击
代码如下.为查索数据的代码....

<%
Dim name,leibie,re
leibie=request.form("name")
name=request.form("part")
set conn=server.createobject("adodb.connection")
conn.open " driver={microsoft access driver (*.mdb)};dbq="&server.mappath("data\tellist.mdb")
if name="bumen" then
re="select * from telcheaklist where bumen="&leibie
elseif
name="danwei" then
re="select * from telcheaklist where danwei="&leibie
elseif
name="name" then
re="select * from telcheaklist where name="&leibie
elseif
name="fenji" then
re="select * from telcheaklist where fenji="&leibie
elseif
name="jianma" then
re="select * from telcheaklist where jianma="&leibie
else
response.write("不可以真接进这个页面,<a href=cha.asp>回去吧</a>写清你的来意再进来,我会照办的")
end if
set rs=conn.execute (re)
do while (not rs.eof)
response.write"<tr>"
response.write"<td>"&rs("bumen")&"</td>"
response.write"<td>"&rs("danwei")&"</td>"
response.write"<td>"&rs("name")&"</td>"
response.write"<td>"&rs("fenji")&"</td>"
response.write"<td>"&rs("jianma")&"</td>"
response.write"</tr>"
rs.movenext
loop
rs.close
set rs=nothing
conn.close
set rs=nothing
%>
5 回复
#2
tianyu1232007-10-10 09:27

elseif
name="danwei" then
>>>> elseif name="danwei" then

同理,其他的一样!

#3
天涯听雨2007-10-10 09:33
你那样写程序也太麻烦了吧

你都把那个字段参数传过来了,不是一句话可以搞定吗?

if name<>"bumen" or name<>"danwei" or name<>"name" or name<>"name" or name<>"fenji" or name<>"jianma" then
response.write("不可以真接进这个页面,<a href=cha.asp>回去吧</a>写清你的来意再进来,我会照办的")
resposne.end
else
set rs=conn.execute("select * from telcheaklist where ["&name&"]="&leibie&"")
end if

'提示,你这里关于的name字段数据类型应该不会是数字类型的,应该为字符型;如果是字符型,那则:

set rs=conn.execute("select * from telcheaklist where ["&name&"]="&leibie&"")

改为:

set rs=conn.execute("select * from telcheaklist where ["&name&"]='"&leibie&"'")


#4
永夜的极光2007-10-10 09:38
楼上的办法好,另外,我想说的是,多分支条件要用select case
#5
天涯听雨2007-10-10 09:44
还有一个提醒,不要用sql一些保留关键字来做字段。。
#6
xunmi_love2007-10-10 18:34

谢谢各位.问题搞定.

1