Ikke nogle poster = ikke noget design
Mit problem er at hvis jeg ikke nogle poster har i min forum, så viser den slet ikke noget design. Siden er næsten helt hvid, med undtagelse af noget tekst jeg har stået i footeren og tekst i paging systemet.et eksempel på hvordan det ser ud når der ikke er poster:
http://testmig.dk/hih/mir/uforum/emneTopic1.asp?id=232
Merningen er selfølgelig at det skal se sådan ud, hvis der er en post:
http://testmig.dk/hih/mir/uforum/topic1.asp
Håber i kan hjælpe mig med dette problem
Her er et eksempel på mit kode:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<!--#include file="checkLogin.asp"-->
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<%
'deklarer intpage til paging
intPage = Request("page")
If isNumeric(intPage) = False Or intPage < 1 Then
intPage = 1
End If
'Åbner forbindelse
Set rss = Server.CreateObject("ADODB.RecordSet")
SQL = ("SELECT b.bruger, f.emne, f.id, f.status, f.dato FROM bruger b INNER JOIN forum f ON b.id = f.bruger WHERE status = 1 ORDER BY f.id DESC")
JET = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source="& server.MapPath("../database/uForum.mdb")
rss.Open SQL, JET, 1
'Hvis ikke db er BOF eller EOF, så gælder dette:
If Not (rss.BOF Or rss.EOF) Then
rss.PageSize = 5
rss.AbsolutePage = intPage
intRecCount = rss.PageSize
intPageCount = rss.PageCount
%>
<title>Topic1</title>
<link href="../faellesfiler/layout.css" rel="stylesheet" type="text/css" />
</head>
<body>
<div id="placeholder">
<div id="header">
</div>
<div id="Forum">
<div id="menu2" align="center">
<!--#include file="forumUD.txt"-->
</div>
<table width="100%" align="center" id="UDoverskrift" bgcolor="#0F3662">
<tr>
<td width="25%" class="UDoverskriftHøjre"><strong> <span class="link">Info</span></strong></td>
<td width="65%" class="UDoverskriftHøjre"><div align="left"><strong class="link"> Emne - <strong>Virksomhedsrettet FVU-forløb</strong><span class="table3"><br />
</span></strong></div></td>
<td width="10%" class="UDoverskriftHøjre"><div align="center"><strong class="link"> Visninger</strong></div></td>
</tr>
</table>
<%
do while not rss.eof And intRecCount > 0
%>
<table width="100%" align="center" id="UDloop">
<tr>
<td width="25%" class="UDoverskriftHøjre">
<%=rss("bruger")%><br /><br />
<em><%=rss("dato")%></em>
</td >
<td width="65%" class="UDoverskriftHøjre"> <a href="emneTopic1.asp?id=<%=rss("id")%>"><span class="linkForum"><%=rss("emne")%></span></a></td>
<td width="10%"> </td>
</tr>
</table>
<%
intRecCount = intRecCount - 1
rss.moveNext
loop
end if
%>
<div id="paging">
<%
'viser side x af x page
response.write " "
Response.Write "Side " & intPage & " af " & intPageCount & ""
response.write " |"
response.write " "
'viser gå til næste side
Response.Write "Gå til side "
For intNum = 1 To intPageCount
Response.Write "<a href=topic1.asp?page=" & intNum & ">" & intNum & "</a> "
Next
%>
<div id="paging2">
<%
'viser previous page
If Clng(intPage) > 1 Then
Response.Write "<a href=topic1.asp?page=" & intPage - 1 & "><<</a>"
Else
Response.Write "<<" 'skal gøres pænere, bedre look
End If
response.write " "
'viser next page
If Clng(intPage) < Clng(intPageCount) Then
Response.Write "<a href=topic1.asp?page=" & intPage + 1 & ">>></a> "
Else
Response.Write ">>"'skal gøres pænere, bedre look
End If
%>
</div>
</div>
</div>
<div id="fotter2">
<!--#include file="../faellesfiler/fotter.txt"-->
</div
</div>
</body>
</html>
