% Id=Session("UserName") InfoID=request("InfoID") set Rst = Server.CreateObject("ADODB.recordset") sql="select * from User where UserName='"&Id&"'" rst.open sql,conn,1,1 %>