sql = "select rate from mort" set recset = adocon.execute(sql) Do While Not recset.eof Response.Write recset.Fields(0) recset.moveNext Loop