Asp til php EFO ?

hvis der er mere data
    udfoer SQL udfra disse data

det her er hele dataen,
men resten kan jeg godt se men er stødt på if not RSprofiler.EOF then flere gange ogkan ikke heltdreje den i den her kode

    SQLbeskeder = "select * from beskeder where id=" & request.QueryString("id") &  ""
    set RSbeskeder = conn.execute(SQLbeskeder)


        if not RSbeskeder("afsenderID") = "0" then

            SQLprofiler = "select * from profiler where id=" & RSbeskeder("afsenderID")
            set RSprofiler = conn.execute(SQLprofiler)
   
                if not RSprofiler.EOF then
   
                    SQL = "UPDATE beskeder SET statuss = '2' WHERE id = '" & RSbeskeder("tilhore") & "'"
                    Conn.execute(SQL)
   
                end if

        end if

lukker