Objektet understøtter ikke denne egenskab eller metode

Hejsa

Hvad er der lige galt med følgende?

<%
Set Conn = Server.CreateObject("ADODB.Connection")
Set Rs = Server.CreateObject("ADODB.Recordset")
Conn.Open "DBQ=" & Server.Mappath("../../db/Booking.mdb") & ";Driver={Microsoft Access Driver (*.mdb)};Password=1234;"

SQL = "SELECT Bordopstilling, Pris, Link from bordopstilling where Lokale = " & Session("Id")
rs.Open SQL, Conn

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

'URL Convert
If LEN(rs("Link")) > 0 Then
  BordopstillingNavn = rs("Bordopstilling")
  Bordopstilling = "<A HREF=""#"" TARGET=""_new"" Onclick=""window.open('/1" & rs("Link")  & "', 'Bordopstilling','width=400,height=500'); return false"">" & rs("Bordopstilling") & "</A>"
Else
  BordopstillingNavn = rs("Bordopstilling")
  Bordopstilling = rs("Bordopstilling")
End If

'End URL Convert
%>
      <tr>
      <td width="32%">
<%
        response.write Bordopstilling
    end if
%>
      </td>
      <td width="68%">
<%
    response.write"<input type=""radio"" name=""Bordopstilling"" Value=""" & BordopstillingNavn & """ onclick=submit();> &nbsp;" & rs("Pris") & ",00kr"
%>
        </td>
        </tr>
<%
        rs.MoveNext
        Next
%>

Den melder følgende fejl i et popup vindu:

Objektet understøtter ikke denne egenskab eller metode