Problemer med rs.Find

Den første gang siden vises bli'r den rigtige dato brugt men det sker sandsynligvis fordi den tages ud af databasen med turnr = rs("Turnering") og ikke gennem rs.Find. Jeg bruger så request.querystring ud fra ID'et turnr til de efterfølgende dato'er, men som det er nu vises kun den første dato,- altså den ændrer sig ikke som den burde jeg søger i databasen. En del af koden er:

        <!-- #include file="conn.txt" -->

        <%
            Dim Conn
            Dim SQL
            Dim rs
            Dim DSN

            Dim datoID
            Dim billedeID
            Dim DatoStreng
            Dim i
            Dim antalBilleder
            Dim turnr
            Dim turnrMax
            Dim tilbage
            Dim frem

            Conn.Open DSN
            SQL="SELECT * FROM Indhold ORDER BY Dato DESC;"
            SET rs = Conn.Execute(SQL)

'            datoID = rs("Dato")
            antalBilleder = rs("antalBilleder")

            turnr = Request.querystring("turnr")
                IF turnr = "" THEN
                    turnr = rs("Turnering")
                END IF
       
                turnrMax = rs("Turnering")

                IF turnr = 1 THEN
                    frem = turnr + 1
                    tilbage = ""
                ELSEIF turnr = turnrMax THEN
                    tilbage = turnr -1
                    frem = ""
                ELSE
                    tilbage = turnr - 1
                    frem = turnr + 1
                END IF

            'Response.write turnr
            'Response.write turnrMax

            rs.Find "Turnering = " & turnr,1
            IF NOT rs.BOF THEN
                rs.MoveFirst
                datoID = rs("Dato")
                Response.write datoID
            ELSE
                Response.write "Error"
            END IF

    %>