UC知道两个简单的ASP问题，望高手指点下哈 （80分啊）
来源：百度知道 编辑：UC知道 时间：2024/05/26 09:05:35
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>减少删除书籍</title>
</head>
<body>
<%'读取表单输入信息
bID=trim(Request.Form("bID"))
bCnt=trim(request.form("bCnt"))
'书号没填写，数量不是数字输出2
if bID="" or bCnt="" or (not isnumeric(bCnt)) then
response.Write "3"
else
'判断书号是否存在
const adcmdtext=1
const recordsaffected=20
set conn=server.createObject("ADODB.Connection")
conn.open session("connectionstring")
sql="select count(*) from book where bID='"&bID&"'&quo
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>减少删除书籍</title>
</head>
<body>
<%'读取表单输入信息
bID=trim(Request.Form("bID"))
bCnt=trim(request.form("bCnt"))
'书号没填写，数量不是数字输出2
if bID="" or bCnt="" or (not isnumeric(bCnt)) then
response.Write "3"
else
'判断书号是否存在
const adcmdtext=1
const recordsaffected=20
set conn=server.createObject("ADODB.Connection")
conn.open session("connectionstring")
sql="select count(*) from book where bID='"&bID&"'&quo
<%'读取表单输入信息
bID=trim(Request.Form("bID"))
bCnt=trim(request.form("bCnt"))
'书号没填写，数量不是数字输出2
if bID="" or bCnt="" or (not isnumeric(bCnt)) then
response.Write "3"
else
'判断书号是否存在
const adcmdtext=1
const recordsaffected=20
set conn=server.createObject("ADODB.Connection")
conn.open session("connectionstring")
sql="select count(*) from book where bID='"&bID&"'"
set rs=conn.execute(sql, recordsaffected, adcmdtext)
'书籍存在 继续
if rs(0)<>0 then
'if bID<>"" and bCnt<>"" then 次句没有必要 前面已经判断！
sql=" select * from book where bID='"&bID&"' "
set rs1=conn.execute(sql)
'还有书剩余，减去即可，返回0
if rs1("bAmount")>bcnt then
sql="update book set bCnt=bCnt-"&bCnt&", bAmoun