Her er sidste halvdel af mit script so jeg behøver hjælp til:
<snip>
<%
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" &
Server.MapPath("/Rygtesmeden/Login/database.mdb")
Conn.Open DSN
strSQL = "Select * From tblRygte WHERE PersonNavnID = "
&Request.Querystring("ID")& " ORDER BY OprettetDato"
Set rs = Conn.Execute(strSQL)
If Not rs.EOF Then
Else
response.write ""
response.end
End If
Do
strNavn = rs("KOverskrift")
strDato = rs("OprettetDato")
strLink = "<a href='RygteView.asp?id=" & rs("RID") & "'>" &
strNavn & "</a>"%>
</tr>
<tr>
<td width="49%"><font face="Tahoma"
size="2"><b><%Response.Write "" & strLink & ""%></b></font></td>
<td width="14%"><font face="Tahoma"
size="2" color="#000000"><%Response.Write "" & strDato &
""%></font></td>
<td width="13%"><font face="Tahoma"
size="2"><b></b></font></td>
<td width="25%"><font face="Tahoma"
size="2"><%Response.Write "50/50"%></font></td>
<% rs.MoveNext
Loop While Not rs.EOF
Conn.Close
Set Conn = Nothing
%>
</tr>
</table>
</td>
</tr>
</table>
</td>
</table>
</td>
<td width="15%" valign="top">
<table border="0" width="100%" cellspacing="0"
cellpadding="0">
<tr>
<td width="100%" valign="top"><!--#include
file="../Includes/New.asp"--></td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
</table>
</div>
</body>
</html>
<snip>
Problemet er at hvis recordsettet er ikke indeholder noget (If
Not rs.EOF Then
Else
response.write ""
response.end), så stopper den jo takket være response.end her, og
min include-file længere nede går tabt.
Jeg har forsøgt mig uden response end, men så fortsætter scriptet
videre og giver mig en den traditionelle "Either EOF or BOF is
True or ..."-fejl.
Hvad skal jeg gøre i stedet for response.end så den skipper
resten af scriptet og hopper til der hvor HTML-koden starter
efetr scriptet.
Sort snak?
--
Vil du lære at kode HTML, XHTML, CSS, SSI eller ASP?
- Pædagogiske tutorials på dansk
- Kom godt i gang med koderne
KLIK HER! =>
http://www.html.dk/tutorials