3d Retreat :: a retreat for the 3d community


	3d Retreat :: Home :: Pre/Reviews

the network ::

3dR functions ::

the 3dR team ::

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 %>