<% if session("admin")="" then conn.close set conn = nothing response.Write "" response.End else if request.cookies("timesshop")("admin")="" then conn.close set conn = nothing response.Write "" response.End end if end if if session("rank")>2 then conn.close set conn = nothing response.Write "" response.End end if set rs=server.createobject("adodb.recordset") rs.open "select tcontent from tproduct where tproduct_bh=2390 ",conn,1,1 strtcontent= rs("tcontent") rs.close set rs=nothing id=4552 while id <= 4563 set rs1=server.CreateObject("adodb.recordset") rs1.Open "select * from tproduct where tpp=47 and tproduct_bh="& id &" ",conn,1,3 rs1("tcontent")=strtcontent rs1.Update rs1.close set rs1=nothing id=id+1 wend response.redirect "chkpro.asp" response.End %>