Staff Diaries
<%
Set Count = Server.CreateObject("ADODB.Connection")
Count.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=e:\www\databases\3d Retreat\snitz_forums_2000.mdb"
SQL_query = "Select top 10 FORUM_TOPICS.TOPIC_ID, FORUM_TOPICS.T_DATE, FORUM_TOPICS.T_AUTHOR, FORUM_MEMBERS.M_NAME FROM FORUM_MEMBERS, FORUM_TOPICS WHERE FORUM_TOPICS.CAT_ID=10 AND FORUM_MEMBERS.MEMBER_ID = FORUM_TOPICS.T_AUTHOR order by FORUM_TOPICS.T_DATE Desc"
Set CC = Count.Execute(SQL_query)
While Not CC.EOF
'format Date
tmpDate = Mid(CC("T_DATE"),5,2) & "." & Mid(CC("T_DATE"),7,2)
%>
" class="whitelink"><%= CC("M_NAME")%> (<%= tmpDate%>)
<%
CC.MoveNext
Wend
CC.Close
CC = null
Count.close
Count = null
%>
|
|
|
[screenshot thumbnail @ 150x113 w/ 1px black border linked to fullsize screenshot. make sure each screenshots link has a target frame of "_blank"]
|
[section title]
[section body]
|
[link to next page]
Home
|
|
E3: Electronic Entertainment Expo 2002 
