Links problem

<table>
<tr>
<%
counter = 0
while not RS.EOF
  response.write \"<td width=\"\"50%\"\">\" & RS(\"link\") & \"</td>\"
  counter = counter + 1
  if( counter = 1 ) then
    response.write \"</tr><tr>\"
    counter = 0
  end if
  RS.MoveNext
  if( counter = 0 AND RS.EOF ) then
    response.write \"<td width=\"\"50%\"\">&nbsp;</td>\"
  end if
wend
%>
</tr>
</table>

/nute

Hej nute

hvor i koden sætter jeg dette ind da den er MEGET lang....giv mig evt. din email og jeg kan sende dig koden!

dette er en forkortet utgave av den loop som skriver ut din tabell som inneholder dine links. Hvis du poster den loop som skriver dine links ut, så skal vi nok få satt dette inn...

Hej nute

jeg er ikke så meget inde i asp!

men jeg har lagt links.asp ud i en zip fil
www.lovetalk.dk/links.zip
gider du ikke kigge på den?

nute jeg har afsat lidt flere point hvis du gider kigge på den og lave den så det passer

i linje 258 i din kode, har du en \'case else\' linje. *alt* som ligger mellom denne linje og linje 278 (\'end select\'), skal byttes ut med:

case else
\' Database connection
Set rs = Server.CreateObject(\"ADODB.RecordSet\")
strSQL = \"SELECT * FROM kategorier ORDER BY kategori\"
strDSN = \"DRIVER={Microsoft Access Driver (*.mdb)};DBQ=\"&Server.MapPath(\"links.mdb\")
rs.Open strSQL, strDSN, 1
If Not (rs.BOF Or rs.EOF) Then
  counter = 0
    Response.Write \"<table width=\'500\' cellspacing=\'2\' cellpadding=\'0\'><tr>\"
  while NOT rs.EOF
      Response.Write \"<td width=\'100%\' colspan=2 bgcolor=#efefef><a href=\'links.asp?mode=vis&kat=\" & rs(\"kategori\") & \"\'>\" & rs(\"kategori\") & \"</a></td>\"
    counter = counter + 1
        if( counter = 1 ) then
          Response.Write \"</tr><tr>\"
            counter = 0
        end if
        rs.MoveNext
      if( counter = 0 AND rs.EOF ) then
        response.write \"<td width=\"\"50%\"\">&nbsp;</td>\"
      end if
  wend
    Response.Write \"</tr></table>\"
End If
rs.Close
Set rs = Nothing
end select

/nute

nute:
jeg får fejl
HTTP 500 - Intern serverfejl
Internet Explorer

hmm hva er der galt med koden?

hva skjer hvis du undo\'er forandringene ? får du så en feil ?

nute/

det ved jeg ikke for jeg har slettet det gamle nu!!
men jeg fik ikke fejl før at jeg satte din kode ind!
men kan du ikke sætte den ind og så teste den?

du har jo stadig den gamle koden her:

www.lovetalk.dk/links.zip

jeg kan ikke teste koden, for jeg mangler databasen...

/nute

den er ny på min server www.lovetalk.dk/links2.zip

og der er det hele med

/nute

og ja den gamle virker

den nye virker fint for meg...kan du poste din mail-adresse så kan jeg sende filen til deg...

/nute

ejay@halvfuld.dk

det virker mange tak Nute

selv takk...:)