图书管理系统ASP的代码请教问题

[复制链接]

红苹果

电梯直达

1^#

发表于 2010-1-11 02:38:20 | 只看该作者回帖奖励

|正序浏览 |阅读模式

图书管理系统ASP
其中对于书籍删除、减少的一个ASP代码困惑，始终返回值不正确也不知道错在哪里？知道的请回答下哈谢谢了50分
<html>
<body>
<%
dim bId,bCnt,rs,bA,bC
bId=Request.Form("bId")
bCnt=Request.Form("bCnt")
set rs=Session("Conn").Execute("select bId from books where bId='"&bId&"'")
bA=("select bAmount from books where bId='"&bId&"'")
bC=("select bCnt from books where bId='"&bId&"'")
if bId="" or bCnt="" or len(bId)>30 or isnumeric(bCnt)=false then
Response.Write("3")
elseif bCnt<1 then
Response.Write("3")
elseif rs.EOF then
Response.Write("1")
【elseif bCnt>bC then
Response.Write("2")】
elseif bCnt=bC and bA=bC then
Session("Conn").Execute("delete from books where bId='"&bId&"'")
Response.Write("0")
else
Session("Conn").Execute("update books set bCnt=bCnt-"&bCnt&",bAmount=bAmount-"&bCnt&" where bId='"&bId&"'")
Response.Write("0")
end if
rs.Close()
set rs=nothing
%>
</body>
</html>
bId书号bCnt是输入的要减少的书籍数量bC是图书馆所有的该书数量。如果我要减少某本书，但是数量大于了本身的总数量，要达到返回一个值“2”然后不进行任何操作。（文中括号中的代码有问题，请修改下）

收藏0