% dim uid ,upwd uid=request.Cookies("Gemisum")("username") set rs=server.createobject("adodb.recordset") sqltext="select * from [userb] where username='"&uid&"'" rs.open sqltext,conn,1,1 %>