Problem med link og target

På gruvsjo.com har jeg hentet dette:

<%Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("meny.mdb")

Set RS = Conn.Execute("Select * From meny Where uid ='' Order By namn")

If RS.EOF Then
  Response.Write "<tr><td>Inget i menyn</td></tr>"
Else

Do Until RS.EOF

    Id = RS("id")
    Uid = RS("uid")
    Link = RS("link")
    Namn = RS("namn")
    AU = RS("AU")
    If AU > 0 Then
      If Request.QueryString("visa") = "all" And Request.QueryString("uid") = Id Then
          Response.Write "<tr><td><a href=meny.asp class=fet>" & Namn & "</td></tr>"
      Else
          Response.Write "<tr><td><a href=meny.asp?visa=all&uid=" & Id & ">" & Namn & "</a></td></tr>"
      End If
    Else
        Response.Write "<tr><td><a href='" & Link & "' target='RAMNAMNET'>" & Namn & "</a></td></tr>"
    End If
    If Request.QueryString("visa") = "all" Then
        If Request.QueryString("uid") = Id Then
          Set RS2 = Conn.Execute("SELECT * From meny WHERE uid='" & Request.QueryString("uid") & "'  Order By namn") 
          Do Until RS2.EOF 
          I =RS2("id")
          L =RS2("link")
          N = RS2("namn")
          RS2.MoveNext 
          If Not RS2.EOF Then
                  Response.Write "<tr><td> <b>»</b> <a href='" & L & "' target='RAMNAMNET'>" & N & "</a></td></tr>"
              Else
                  Response.Write "<tr><td> <b>»</b> <a href='" & L & "' target='RAMNAMNET'>" & N & "</a></td></tr>"
              End If
          Loop 
          RS2.Close
          Set RS2 = Nothing
        End If
    End If
  RS.MoveNext 
  Loop
End If%> 

</table>

En menu men som ikke i overskrifterne ("id") henter link og target. Noget som kan hjælpe?