<%select case choosecase adminqx2tempzt=trim(request("R1"))rs("zt")=tempztrs.updaters.close set rs=nothingcase closeconn()response.write ""Response.end()end select%>