<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<%
option explicit
dim sql,rs,conn,db,uid
uid=Request("id_no")
db="/mdb/login.mdb"
Set conn = Server.CreateObject("ADODB.Connection")
conn.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(db)
sql="select * from shengao1 where id_no="&uid
Set rs = Server.CreateObject("ADODB.RecordSet")
rs.Open sql,conn,1,1
select case rs("xulei")
case "确认" response.Redirect("querenok.asp")
case "处理确认" response.Redirect("erciok.asp")
case "回复确认" response.Redirect("sghufuok.asp")
end select
rs.close
conn.close
set conn=nothing
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>无标题文档</title>
</head>
<body>
</body>
</html>
这样写怎么提示我
ADODB.Recordset 错误 '800a0cc1'
在对应所需名称或序数的集合中，未找到项目。
/shengao/yiqueren/fenlei.asp，行 12
是不是那里我有写错了阿？帮忙看看好么...谢谢
是不是我的select case那句有问题啊？
