hvad er der galt?

Prøv med:

<%
If url <> "" Then
  response.write "<a href='" & url & "' target='_blank'>" & linktext & "&nbsp;</a>"
End If
%>

Du har lidt rod i dine %> placeringer...

Der er en > for meget lige før </a>. Hvis den skal være der, skal den skrives som &gt;

Knækker dine linier som vist her?

spotgun > den giver en "siden kan ikke vises"

har ændret > til &gt; i stedet. Men jeg får stadig en "siden kan ikke vises".... med en "HTTP 500 - Intern serverfejl".

Det burde ikke være i din if-sætning problemet ligger så. Hvad har du ellers af kode på siden?

<% If url <> "" Then
response.write "<a href=""" & url & """ target=""_blank"">" & linktext & "&nbsp;></a>" %>
<% End If %>
sådan..

<% If url <> "" Then
response.write "<a href=""" & url & """ target=""_blank"">" & linktext & "&nbsp;></a>" %>
<% End If %>

sådan der nu virker det...

<% If url <> "" Then
response.write "<a href=""" & url & """ target=""_blank"">" & linktext & "&nbsp;></a>" %>
<% End If %>

sådan

<% If url <> "" Then
response.write "<a href=""" & url & """ target=""_blank"">" & linktext & "&nbsp;></a>" %>
<% End If %>

der skal """ istedet for en! efter url &
så..

undskyld spam kig her:
http://www.eksperten.dk/spm/286118

det virker stadig ikke... sådan ser det ud nu:

<%
Dim rs
Query = "SELECT * FROM Nyheder ORDER BY Oprettet DESC;"
Set rs = Server.CreateObject("ADODB.Recordset")

do until rs.EOF
Dim overskrift, indhold, datofin, link, linktext
overskrift = rs("Overskrift")
indhold = rs("Indhold")
datofin = rs("DatoFin")
url = rs("Link")
linktext = rs("LinkText")
%>


<div class="nyhed"><b>
<%=overskrift%></b> <small><small>|<%=datofin%>|</small></small></div>
<p>
<%=indhold%><br>
<%
If url <> "" Then
    response.write "<a href=""" & url & """ target=""_blank"">" & linktext & "&nbsp;&gt;</a>"
End If
%>
</p><br><br>

... der kan sikkert godt være tale om andre fejl end i IF sætningen...
<% rs.MoveNext %>
<%loop%>

<%
If url <> "" Then
    response.write "<a href=""" & url & """ target=""_blank"">" & linktext & "&nbsp;&gt;</a>"
End If
%>

arg.... det skal 3x """ efter & url & den vil det ikke når jeg trykker udfør!
forstår du?

taager-kongen > nej... :o)

Du har jo ikke noget connection-object der åbner din database? Mon ikke det er det dér er problemet?

jo, jeg har en connection:
<%
Dim Connect, connString
Set Connect = Server.CreateObject("ADODB.Connection")
connString = "Driver={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("../../hemmelig.mdb")
Connect.Open connString
%>

her:
www.rasmus-madsen.dk/sodan.txt

taager-kongen > den virker stadig ikke.... "siden kan ikke vises"

ved ikke så...

Jeg må se på det i morgen så... med friske øjne :-)

YES!!!! fant fejlen, manglede dim Query. utroligt.

ellers mange tak for hjælpen.

Hvis du nu havde postet HELE din kode, så kunne det være det havde været lettere at finde fejlen. Jeg vil gætte på du bruger "Option Explicit", ikke? Så skal du nemlig definere alle dine variabler inden de tages i brug... :-)