各位朋友呀!asp问题急救呀
Microsoft JET Database Engine 错误 '80040e21' 所有记录中均未找到搜索关键字。 /view1_mail.asp，行 17
# z! K1 L: r3 W R我在写程序的时候出现这个错误!怎么解决呀!在线等!: U$ L W/ A9 [9 o3 {
<%# Q L3 f0 p% }7 x- Q6 x6 M: F* m
myUrule=Session("Urule")
( V# V# Y* B, a' d/ ]/ O2 AstrC & Server.MapPath("db/system.mdb") '## MS Access 2000 using virtual path: X" J1 S5 p1 e3 u9 i) [7 T
set my_Conn = Server.CreateObject("ADODB.Connection")
4 v r" v0 h8 [3 z" V# ~+ ?, w$ lmy_Conn.open strConnString$ J; L! q# P8 Q( A8 `3 G- d9 S
Set my_rs= Server.CreateObject("ADODB.Recordset")
+ m- Y2 C- h' O9 h qstrSql="select * from jhtdata where id="&request("view_id")
; d+ d2 S+ x% d6 ymy_rs.open strSql,my_Conn,1,1
2 N1 B; k0 D( ~: A% nset rs=server.CreateObject("adodb.recordset")& Y l$ m: {# E% {
sql="select * from [jhtuser] where id="&Session("Uid")
% {/ v) r3 K0 D" u% q1 `8 ^, U. Yrs.open sql,my_Conn,1,3! L8 M) Z6 }( V" `# p6 {4 p _
if not rs.eof then, t Z) j9 m: b9 p) D
rs("userid")=rs("userid")&","&request("view_id")&","
" o5 h/ ?) l7 a" ]/ } rs.update 这是17行
; j: C8 f* ^% b* ?& \& y9 H4 Hend if; U$ }! j( D" t( b; M- X8 K
rs.close
4 C2 M6 ^9 ~( ?3 `$ o. W: @, ~set rs=nothing
* I! C' U+ b: F' r! k8 c$ b%>
