1.9w+
社区成员
35.7w+
社区内容
- 主页
我的程序突然出现发生意外的错误，在线等待！！！！！！！！
程序刚开始好好的，运行运行就出现
错误类型：
(0x80020009)
发生意外。
的错误！
这个问题怎么解决？？？
这一行
sql = "select * from xuq_tree where id1="&id&" order by id"
错误类型：
(0x80020009)
发生意外。
的错误！
这个问题怎么解决？？？
这一行
sql = "select * from xuq_tree where id1="&id&" order by id"
...全文
guxzh 2004年12月21日
这个错误我遇到过，我也不知道是什么原因！
但是后来我把sql和Rscordeset重命名后就没有了（别和已经有的重名）！也许可以试一下！
反正不是sql的问题！sql问题是有提示的！
但是后来我把sql和Rscordeset重命名后就没有了（别和已经有的重名）！也许可以试一下！
反正不是sql的问题！sql问题是有提示的！
balanceryzh 2004年12月21日
id类型不对吧现转一下变成id=cint(id)
qfacy 2004年12月21日
你哪个函数有返回值是什么吗？
caidan （0）
caidan （0）
sisiz 2004年12月21日
原来的程序：
<%
Function caidan(id)
sql = "select * from xuq_tree where id1="&id&" order by id"
rs.Open sql, conn, 1, 1
..........
End Function
%>
<%
caidan 0
conn.Close
Set conn = Nothing
%>
<%
Function caidan(id)
sql = "select * from xuq_tree where id1="&id&" order by id"
rs.Open sql, conn, 1, 1
..........
End Function
%>
<%
caidan 0
conn.Close
Set conn = Nothing
%>
DARKLY 2004年12月21日
'id1="&id&" 这有问题
'----------------------
dim thisid
thisid=""
sql = "select * from xuq_tree where id1="&thisid&" order by id"
'试试
'----------------------
dim thisid
thisid=""
sql = "select * from xuq_tree where id1="&thisid&" order by id"
'试试
sisiz 2004年12月21日
id 是自动编号，是递增的
sisiz 2004年12月21日
id1 ,id 都是数字类型的，数据库是ACCESS，数据库里有记录！
TSD 2004年12月21日
数据类型不对或字段不存在！
lnboy1003 2004年12月21日
是不是你把数据库中的记录删除了啊，开始的时候有数据所以没有错。现在没有了所以就出错。在后面加上if not rs.eof then....else....end if看看
comszsoft 2004年12月21日
sql = "select * from xuq_tree where id1="&id&" order by id"
为什么前面是 id1,而到了后面变成了 order by [id] ,id1 和 [id] 是不同的字段吗？如果是加上 []，id 在sqlserver里是保留字
为什么前面是 id1,而到了后面变成了 order by [id] ,id1 和 [id] 是不同的字段吗？如果是加上 []，id 在sqlserver里是保留字
qfacy 2004年12月21日
这句没有错
你id字段是递增的吗？
你id字段是递增的吗？
chaney 2004年12月21日
把程序都贴出来吧。另外也不晓得你的字段是什么类型的。
sisiz 2004年12月21日
楼上两个修改都不管用啊！！！！！！1
好着急啊！！！！！！！！！！11
好着急啊！！！！！！！！！！11
yb2008 2004年12月21日
sql = "select * from xuq_tree where id1="&id&" order by id desc"
浪潮之巅 2004年12月21日
sql = "select * from xuq_tree where id1='"&id&"' order by id"
showliz 2004年12月21日
调用当然出错了，试试这个：
<%
Function caidan(id)
sql = "select * from xuq_tree where id1="&cint(id)&" order by id"
rs.Open sql, conn, 1, 1
..........
conn.Close
Set conn = Nothing
End Function
%>
<%
caidan 0
%>
<%
Function caidan(id)
sql = "select * from xuq_tree where id1="&cint(id)&" order by id"
rs.Open sql, conn, 1, 1
..........
conn.Close
Set conn = Nothing
End Function
%>
<%
caidan 0
%>
sisiz 2004年12月21日
connstr="DBQ="+server.mappath("xuq_data.mdb")+";Password=123;DRIVER={Microsoft Access Driver (*.mdb)};"
set conn=server.createobject("ADODB.CONNECTION")
conn.open connstr
Set rs = server.CreateObject("adodb.recordset")
数据库的连接
set conn=server.createobject("ADODB.CONNECTION")
conn.open connstr
Set rs = server.CreateObject("adodb.recordset")
数据库的连接
sisiz 2004年12月21日
id=cint(id)的话错误类型变了，这是什么意思，
错误类型：
ADODB.Recordset (0x800A0E79)
对象打开时，不允许操作。
错误类型：
ADODB.Recordset (0x800A0E79)
对象打开时，不允许操作。