<%= rs_page("para1")%>
% dim key key = Trim(Request.QueryString("slno")) %> <% dim sql_page,rs_page sql_page = "SELECT * FROM eresource_table where sl_no='"&key&"'" set rs_page = Server.CreateObject("ADODB.Recordset") rs_page.Open sql_page,conn,adOpenDynamic,adLockOptimistic %> <% dim sql_page2,rs_page2 sql_page2 = "SELECT DISTINCT top 10 * FROM eresource_table" set rs_page2 = Server.CreateObject("ADODB.Recordset") rs_page2.Open sql_page2,conn,adOpenDynamic,adLockOptimistic %>