hmm... Jeg er ikke ligefrem nogen ørn til ASP!!!
Koden ser således ud... Hvis man så kunne lave det sådan, at den kun henter fx de 20 første bogstaver i ("nyhed")... Men hvordan???
<% '--- Forsiden ---
else %>
<%
' Connection til database
Set Conn = Server.CreateObject("ADODB.Connection")
DBPath = "DBQ=" & server.mappath("./db/db.mdb")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; " & DBPath
' Her hiver vi indholdet af databasen ud, sorterer dem efter dato
Sql = "SELECT * FROM nyheder ORDER BY dato DESC"
Set rs = Conn.Execute(Sql)
%>
<table border=1 bordercolor="FFFFFF" background="./bgbg.jpg" align="center" width="97%" class="ContentStyle">
<tr>
<td width="100%"><center><strong><font size=3 color=FFFFFF>--Nyheder--</font></strong></center>
</td>
</tr>
</table>
<% Do While Not rs.EOF
SQL2 = "select count(*) as antal from kommentarer WHERE nyhedsId = " & rs("id")
Set TheCount = Conn.Execute(Sql2)
antal = TheCount("antal")
%>
<br>
<table border=1 bordercolor="FFFFFF" background="./bgbg.jpg" align="center" width="97%" class="ContentStyle">
<tr>
<td width=100% bordercolor="#000000">
<table border="0" cellspacing="0" cellpadding="0" class="ContentStyle" width="100%">
<tr>
<td style="padding-left: 4px;">
<a href="default.asp?mode=kommentarer&id=<%=rs("id")%>"><font color=FFFFFF><b><%=rs("title")%> - (<%=antal%>)</b></a>
</td>
<td align="right">
<font color=FFFFFF><%= FormatDateTime(rs("dato"),1)%>
</td>
</tr>
</table>
</td>
</tr>
<tr>
<td width=100% bgcolor="#EBEBEB" ALIGN=left style="padding-left: 4px;" cellpadding=0 cellspacing=0>
<img align=left src="./news/<%=RS("img")%>.jpg" border="0">
<%=rs("nyhed")%><br><br><br>
Skrevet af <i><%=rs("forfatter")%></i>
</td>
</tr>
</table>
<br>
<%
rs.MoveNext
Loop
%>
