Id istedet for navn!

SQL = "SELECT VaregruppeId FROM Varegruppe ORDER BY Varegruppe"

        rs.Open SQL, Conn

        x = 0
        For x = 1 to 9999
        If rs.eof then
        Exit For
        Else

        'URL Convert
        Varegruppe = rs("VaregruppeId")
        Varegruppe = "<a href='items.asp?Varegruppe=" & Varegruppe & "'>" & Varegruppe & "</a>"
        'End URL Convert

så skriver du da bare varegruppeid i steden for varegruppe

Det er en måde at løse problemet på ... men det kan jeg ikke bruge for så bliver varegrupperne jo listet som tal og ikke tekst!

SQL = "SELECT Varegruppe, VaregruppeId FROM Varegruppe ORDER BY Varegruppe"
rs.Open SQL, Conn

while not rs.eof
  'URL Convert
  Varegruppe = "<a href='items.asp?Varegruppeid=" & rs("VaregruppeId") & "'>" & rs("Varegruppe") & "</a>"
  'End URL Convert
  rs.movenext
wend

Glemte lige at skrive slutningen af min kode:
SQL = "SELECT VaregruppeId FROM Varegruppe ORDER BY Varegruppe"

        rs.Open SQL, Conn

        x = 0
        For x = 1 to 9999
        If rs.eof then
        Exit For
        Else

        'URL Convert
        Varegruppe = rs("VaregruppeId")
        Varegruppe = "<a href='items.asp?Varegruppe=" & Varegruppe & "'>" & Varegruppe & "</a>"
        'End URL Convert

        %>
        </font></b>
      <font face="Arial" size="2">
      <table border="0" cellpadding="0" cellspacing="0" width="100%">
        <tr>
          <td width="100%"><b><font face="Verdana, Arial, Helvetica, sans-serif" size="2" color="#000000">&nbsp;
        <% =Varegruppe %>
        <%
        rs.MoveNext
        End If
        Next
        %>
            </font></b></td>
        </tr>
      </table>
      </font> </td>

Thx proaccess ...