UC知道ASP 问题大集合
来源：百度知道 编辑：UC知道 时间：2024/05/25 02:03:11
第一个问题
下面是代码出现的错误是
假如我数据库里面没有东西
我加这个 不会出现错误
if rs.bof and rs.eof then
response.write "目前还没有发表任何资料"
Response.end
但是缺点是，下面的添加程序就不能在运行了
如果我不加 Response.end，程序就会发生错误
以下是我的代码
<%
set rs=server.CreateObject("adodb.recordset")
rs.Open "select * from sbzs",conn,1,1
if rs.bof and rs.eof then
response.write "目前还没有发表任何资料"
Response.end
else
dim j
if request("page")="" then
curpage=1
else
curpage=request("page")
end if
if not IsNumeric(curpage) then
response.Write("参数不对!")
response.end
end if
rs.pagesize=6 '******************设置每页显示文章数目***********************
dim totalput
totalPut=rs.recordcount
if curpage<1 then
curpage=1
end if
if (curpage-1)*MaxPerPage>totalput then
if (totalPut mod MaxPerPage)=0 then
curpage= totalPut
下面是代码出现的错误是
假如我数据库里面没有东西
我加这个 不会出现错误
if rs.bof and rs.eof then
response.write "目前还没有发表任何资料"
Response.end
但是缺点是，下面的添加程序就不能在运行了
如果我不加 Response.end，程序就会发生错误
以下是我的代码
<%
set rs=server.CreateObject("adodb.recordset")
rs.Open "select * from sbzs",conn,1,1
if rs.bof and rs.eof then
response.write "目前还没有发表任何资料"
Response.end
else
dim j
if request("page")="" then
curpage=1
else
curpage=request("page")
end if
if not IsNumeric(curpage) then
response.Write("参数不对!")
response.end
end if
rs.pagesize=6 '******************设置每页显示文章数目***********************
dim totalput
totalPut=rs.recordcount
if curpage<1 then
curpage=1
end if
if (curpage-1)*MaxPerPage>totalput then
if (totalPut mod MaxPerPage)=0 then
curpage= totalPut
第一个问题：无论数据库是否有数据，你都用了Response.Write，所以，你完全可以把Response.End放到最后面执行。
第二个问题：
set rs=server.CreateObject("adodb.recordset")
rs.Open "select * from sbzs where sbmc="&trim(request("sbmc")),conn,1,3
If Rs.Bof Then
rs.addnew
rs("sbmc")=trim(request("sbmc"))
Rs.Update
Else
Response.Write "该记录已经存在"
End If
这样的话我觉得应该可以了
第三个问题：conn.execute "delete * from sbzs where id="&id这个语句可以把所有关于id的记录全部删除掉。
if rs.bof and rs.eof then
这句代码是错误的！and 是 “和”的意思
应该是
if rs.bof or rs.eof then
数据库指针哪能同时 在两种状态呢！or 是"或者"的意思
第三个问题 可以通过fso来删除文件！
tupian = rs("图片")
获得图片名称之后 然后用fso的删除文件代码！