有关删除的一些问题

来源:百度知道 编辑:UC知道 时间:2024/05/15 16:31:12
Dim rs1,strsql,bookno
bookno1=request.QueryString("id2")
strsql="Select * From books Where bookno='" & bookno1 & "'"
set rs=GetSQLRecordset(strsql,"book.mdb","books")
rs.Delete
rs.update
rs.update
rs.close
set rs=nothing
这个是什么意思呢

Dim rs1,strsql,bookno
'定意变量
bookno1=request.QueryString("id2")
'获取以get 方法传递的参数 id2
strsql="Select * From books Where bookno='" & bookno1 & "'"
'查找数据表 books 中字段名 bookno = 获取的参数 的记录
set rs=GetSQLRecordset(strsql,"book.mdb","books")
'查找结果存放在objRS对象中
rs.Delete
'删除记录
rs.update
rs.update
'更新记录
rs.close
'关闭rs
set rs=nothing
'清空rs