<% pagetype="insights" %> <% count = 0 numPerPage = 10 nextRecoNum = 1 if request.querystring("page") = "" then page = 1 session("passedValue")= request.QueryString else page = request.querystring("page") end if set conn = Server.CreateObject("ADODB.Connection") set results = server.createObject("ADODB.Recordset") results.CursorLocation = adUseClient %> <% %> Ozzie Jurock's articles on real estate


The following are Ozzie's recent columns:

<% query = "SELECT tblArticles.id, tblAuthor.firstname, fwname, tblAuthor.lastname, email, tblArticles.id, headline1, summary, startdate FROM tblArticles inner join tblAuthor on tblArticles.authorid =tblAuthor.id WHERE (categoryid=73 or categoryid=74 or categoryid=75 or categoryid=76 or categoryid=77 or categoryid=78 or categoryid=79 or categoryid=1 or categoryid=1 ) and tblArticles.authorid = 1 ORDER BY startdate DESC" results.open query, Conn, adOpenstatic, adLockReadonly, adCmdtext totalRecords = results.recordCount %> <% if not(results.EOF) then results.moveFirst results.pageSize = numPerPage totalpages = results.pageCount results.AbsolutePage = page 'absoluteposition pointing at the current record nextRecoNum = results.Absoluteposition lastRecoOnPage = nextRecoNum + results.pageSize - 1 if totalRecords <> -1 and totalRecords < lastRecoOnPage then lastRecoOnPage= totalRecords end if %> <% end if %>

<% do while not results.eof and nextRecoNum <= lastRecoOnPage %>

<%=TRIM(results("headline1")) %>

<%=FORMATDATETIME(results("startdate"),1) %>
<%=TRIM(results("summary")) %>

<% count = count + 1 results.movenext nextRecoNum = nextRecoNum + 1 loop %>

<% conn.close set conn=nothing %>