|
<%
While ((Repeat1__numRows <> 0) AND (NOT Articles.EOF))
%>
" align="bottom" vspace="1" hspace="1">(<%= DoDateTime((Articles.Fields.Item("ArticleDate").Value), 1, 2057) %>)
<%=(Articles.Fields.Item("Heading").Value)%>
<%=(Articles.Fields.Item("TeaserText").Value)%>
<% If Not len(Articles.Fields.Item("Body").Value)=0 Then %>
">more...
<% End If%>
<%
Repeat1__index=Repeat1__index+1
Repeat1__numRows=Repeat1__numRows-1
Articles.MoveNext()
Wend
%>
|
|

|
<% If Not Articles.EOF Or Not Articles.BOF Then %>
<%
While ((Repeat2__numRows <> 0) AND (NOT Articles.EOF))
%>
-
<%
Repeat2__index=Repeat2__index+1
Repeat2__numRows=Repeat2__numRows-1
Articles.MoveNext()
Wend
Else
%>
<% End If ' end Not Articles.EOF Or NOT Articles.BOF %>
<% If Articles.EOF Then %>
More articles coming soon!
<% End If ' end Articles.EOF %>
|
|
|
<% If Not Articles.EOF Or Not Articles.BOF Then %>
<%
While ((Repeat3__numRows <> 0) AND (NOT Articles.EOF))
%>
-
<%
Repeat3__index=Repeat3__index+1
Repeat3__numRows=Repeat3__numRows-1
Articles.MoveNext()
Wend
%>
<% End If ' end Not Articles.EOF Or NOT Articles.BOF %>
<% If Not Articles.EOF Then %>
more archives
<% End If ' end Not Articles.EOF %>
|
|