<% sql = "select * from url order by url_index desc" set rs = server.CreateObject("adodb.recordset") rs.open sql,conn,1,1 if not rs.eof then for i = 1 to rs.recordcount response.Write("document.write(' | "&rs("url_title")&"');") rs.movenext next end if rs.close set rs = nothing conn.close set conn = nothing %>