<%id=request("id") name=request.cookies("UserID") sql2="select * from member_sort where level="&request.cookies("level") if request.cookies("level")=empty then response.redirect "loginout.asp" end if set rs_level2=conn.execute(sql2) Set rs= Server.CreateObject("ADODB.Recordset") SQL="SELECT * FROM favorite" rs.Open SQL, conn,1,3 sql="select * from favorite where name='"&name&"'" set rsb=conn.execute(sql) i=0 while not rsb.eof i=i+1 rsb.movenext wend if i>=rs_level2("fav_size") then %><% else'18 sql="select * from favorite where titleid="&id&" and name='"&name&"'" set rs2=conn.execute(sql) if rs2.eof then rs.addnew rs("name")=name rs("titleid")=id rs.update rs.close set rs=nothing %> <% else %> <% end if end if'18 %>