<% Set objRsproducts = Server.CreateObject("ADODB.Recordset") objRsproducts.Pagesize = 9 objRsproducts.cursorType = adOpenStatic objRsproducts.Open "SELECT * FROM master_Categories ORDER BY productscatid", myconn dim CurrentPage,RowNumber,ctr CurrentPage=trim(request("CurrentPage")) if CurrentPage="" then CurrentPage=1 %>