Expected 'End'
_news.asp, line 26, column 25
och
Syntax error, unexpected "new line"
_news.asp, line 15, column 3
Här kommer den fina koden
<!--#include file="admin/inc/settings.asp"-->
<%
Set objRS=objConn.Execute("SELECT * FROM news ORDER BY ID DESC")
If objRS.EOF then
Response.Write("<b>Det finns inga nyheter!</b>")
Else Do until objRS.EOF
%>
<b><%=objRS("Rubrik")%></b><br />
<p>
<%=Replace(objRS("Nyhet"),vbCrlf,"<br>")%>
</p>
<div align="right"><i>Skriven av <%=objRS("Skribent")%>, <%=objRS("Datum")%></i></div>
<hr />
<%
objRS.Movenext
Loop
End If
objRS.Close
Set objRS = Nothing
objConn.Close
Set objConn = Nothing
%>