<%
Dim rsJournal 'Database recordset holding the Journal items
Dim intRecordLoopCounter 'Loop counter to loop through each record in the recordset
If Request.QueryString("PagePosition") = "" Then
Else
intRecordPositionPageNum = CInt(Request.QueryString("PagePosition"))
End If
%>