<%dim rs
Set rs2=Server.CreateObject("Adodb.RecordSet")
rs.open sqlstr,conn,1,1
rs.close
set rs=nothing
Set rs2=Server.CreateObject("Adodb.RecordSet")
rs.open sqlstr2,conn,1,1执行到这一句出错
错误如下:
An exception of typeadodb.recordset:变量或者类型不正确或者不在可以接受的范围之内,要不就是与其他数据冲突.was not handled
把
set rs=nothing
Set rs2=Server.CreateObject("Adodb.RecordSet")
都不要。
set rs=nothing
Set rs2=Server.CreateObject("Adodb.RecordSet")
去掉。
sqlstr2有错
sqlstr2是什么?写出来看看啊。说不定这个错了
把sqlstr2的内容写出来
修改一下!
Set rs2=Server.CreateObject("Adodb.RecordSet")
rs2.open sqlstr,conn,1,1
rs2.close
set rs2=nothing
Set rs=Server.CreateObject("Adodb.RecordSet")
rs.open sqlstr2,conn,1,1
Set rs=Server.CreateObject("Adodb.RecordSet")
rs.open sqlstr,conn,1,1
rs.close
set rs=nothing
Set rs=Server.CreateObject("Adodb.RecordSet") 这一句不用,不要重复定义
rs.open sqlstr2,conn,1,1
sqlstr2="delete zwgl from zwgl where useid=" & 变量 & ""------>
sqlstr2="delete from zwgl where useid=" & 变量 & ""
Set rs=Server.CreateObject("Adodb.RecordSet")
rs.open sqlstr,conn,1,1
rs.close
set rs=nothing ‘这个也不要,这个是释放拉~
Set rs=Server.CreateObject("Adodb.RecordSet") 这一句不用,不要重复定义
rs.open sqlstr2,conn,1,1
sqlstr="delete from zwgl where useid=" & usedelete & ""
conn.execute(sqlstr)
usrid如为自动增加或数值型则
sqlstr="delete from zwgl where useid=" & usedelete & " "
conn.execute(sqlstr)