Browse Scholastic Professional authors by clicking on a name below.
<%
''''''''''''''''''''''Loop Data and display the way that match design-----------------
SQL="SELECT * FROM tblAuthors order by Last_Name"
set rs = Con.execute(SQL)
DO WHILE NOT rs.EOF
Last_Name=rs("Last_Name")
First_Name=rs("First_Name")
totalRow=rs.recordcount
firstCha=ucase(mid(Last_Name,1,1))
if firstCha <> preFirstCha then%>
|
|
<%
end if
%>
<%if i mod 2 = 0 then%>
<%=Last_Name%>, <%=First_Name%> |
<%else%>
<%=Last_Name%>, <%=First_Name%> |
<%end if
preFirstCha = firstCha
rs.MoveNext
Loop
rs.close
set rs = nothing
''''''''''''''''''''''Loop Data and display the way that match design-----------------
%>