See Also
0 then
a = rs("index") -5
b = rs("index") +5
if a <1 then a = 1
sql = "SELECT * FROM ee WHERE index between " & a & " and " & b
rs.Close
set rs=nothing
set rs=Server.CreateObject("ADODB.recordset")
rs.Open sql, conn ,3,1
if Not(rs.bof and rs.eof) then
for x = 1 to rs.recordcount
%>
">