Jeg tænkte lige på at det her måske kan være til en hjælp.. min redigerede forumthreads.asp fil:
<!--#include file="functions.inc"-->
<%
Set myConn = Server.CreateObject("ADODB.Connection")
myConn.Open strDSN
strSQL = "SELECT * FROM Forums WHERE (ID = " & Request("ForumID") & ")"
Set rs = myConn.Execute(strSQL)
If Not (rs.BOF Or rs.EOF) Then
strForum = rs("Forum")
strDescription = rs("Description")
intForumID = rs("ID")
End If
strSQL = "SELECT *, Format$([date],'dd/mm/yyyy') AS FormDate, Format$([date],'hh:mm') AS FormTime FROM Entries WHERE (ForumID = " & Request("ForumID") & ")"
strSQL = strSQL & " AND (OrgThread = True) ORDER BY ID DESC"
Set rs = myConn.Execute(strSQL)
If Not (rs.BOF Or rs.EOF) Then
Do While Not rs.EOF
strSQL = "SELECT Count(*) AS ItemCount FROM Entries WHERE (ReplyID = " & rs("Id") & ") AND (OrgThread <> TRUE)"
Set recordCount = myConn.Execute(strSQL)
strHTML = strHTML & "<tr><td style=""border-top: 1px dotted;color: #F0FBFE;""><font size=2><a href=""viewmsg.asp?id=" & rs("ID") & "&ForumID=" & intForumID & """>" & Server.HTMLEncode(rs("Subject")) & "</font></a></td>"
strHTML = strHTML & "<td style=""border-top: 1px dotted;color: #F0FBFE;"" valign=top><font size=2>" & recordCount("ItemCount") & "</font></td>"
strHTML = strHTML & "<td style=""border-top: 1px dotted;color: #F0FBFE;"" valign=top><font size=2>" & rs("FormDate") & "</font></td></tr>"
rs.MoveNext
Loop
End If
myConn.Close
Set myConn = Nothing
%>
<html>
<head>
<title>Forum 53 [ Tråde ]</title>
<link rel="stylesheet" type="text/css" href="style.css">
</head>
<body
topmargin="2" leftmargin="0" marginwidth="0" marginheight="2">
<div align="center"><center>
<table border="0" width="600" cellspacing="1" cellpadding="0">
<tr>
<td colspan="2"><center><img src="top.jpg"></img></center></td>
</tr>
<tr>
<td height="45" width="600" colspan="3" style="border: 1px solid;color: #E69B20;" bgcolor="#F2F2F2">
<table topmargin="2" width="600" leftmargin="0" marginwidth="0" marginheight="0">
<tr>
<td>
<center>
<a href="../index.html" class="menu">index</a>
</center>
</td>
<td>
<center>
<a href="../sites/portfolio.html" class="menu">portfolio</a>
</center>
</td>
<td>
<center>
<a href="../sites/billeder.html" class="menu">billeder</a>
</center>
</td>
<td>
<center>
<a href="default.asp" class="menu">forum</a>
</center>
</td>
<td>
<center>
<a href="../gbog/default.html" class="menu">gæstebog</a>
</center>
</td>
</tr>
</table>
</td>
</tr>
<tr>
<td width="596" colspan="2"><font
size="2"><strong>Forum:</strong> <strong><%=strForum%></strong></font></td>
</tr>
<tr>
<td valign="top" align="left" width="70%"><font face="Verdana" size="2"><%=strDescription%></font></td>
<td valign="top" align="left" nowrap width="30%"><ul type="square">
<li><a href="default.asp"><font face="Verdana"><b><small>Til oversigt</small></b></font></a></li>
<li><font face="Verdana"><strong><a href="forumpost.asp?ForumId=<%=intForumID%>"><small>Opret
indlæg</small></a><br>
</strong></font></li>
</ul>
</td>
</tr>
<tr>
<td width="598" colspan="2"><table border="0" width="100%" cellspacing="1" cellpadding="0">
<tr>
<td width="234"><font size="2"><strong>Tråde</strong></font></td>
<td width="37"><font size="2"><strong>Svar</strong></font></td>
<td width="117"><font size="2"><strong>Seneste
indlæg</strong></font></td>
</tr>
<%=strHTML%>
</table>
</td>
</tr>
</table>
</center></div>
</body>
</html>
Det ville måske være en god idé at kigge lidt på hvordan databasen er opbygget og det står netop i linket i mit spørgsmål. :)
Ny bruger
Nybegynder
Opret
Preview
