Vise anden tekst hvis ingen indhold i DB
Hej !Jeg har et lille problem jeg håber i kan hjælpe mig med at få løst.........
Jeg er ved at skrive et script hvor man kan skrive beskeder til forskellige emner, udklip af koden følger:
PID er nr. på emnet.
MSID er nr. på besked.
strMessages = "Select * from Messages Where ToPID = " & Request.QueryString("PID") & " Order by MSID Desc"
Set msg = Conn.Execute(strMessages)
Do
%>
<table width="500">
<tr><td width="250"><b>Besked af:</b> <% =msg("WrittenBy") %></td><td width="250"><b>Dato:</b> <% =msg("WrittenDate") %></td></tr>
<tr><td colspan="2"><% =msg("Message") %></td></tr>
</table>
<br>
<%
msg.MoveNext
Loop while not msg.EOF
Scriptet virker fint, jeg kan sagtens vise beskeder fra DB, men hvis man forsøgre at vise beskeder til et emne, og der ikke er nogen i DB får jeg følgende fejl:
Error Type:
ADODB.Field (0x80020009)
Either BOF or EOF is True, or the current record has been deleted. Requested operation requires a current record.
Der skulle jo gerne stå "Ingen beskeder", eller lign. hvis der ikke er nogen til det pågældende emne.
