Dynamiske variabler fra min Database? Execute ell Eval?

Jeg fatter det inte....Jeg har lave følgende meget simple opsætning, men det virker ikke

Jeg prøver at definere variabler udfra database (pr side, derfor dur session og applikation ikke) Den fungerer fint nok med at definere Felterne som en variable, men den vil fanme ikke skrive resultatet i sidste del af execute sætningen.....nogen der kan hjælpe?

    set Rs = Server.CreateObject("ADODB.Recordset")
            StrSQL = "SELECT categories.* " _
                              & "FROM categories " _
                              & "WHERE ID = 14"
'  & PageID

           

           
            Rs.Open StrSQL, DBCONNECTIONSTRING


Do While Not Rs.EOF
For i = 0 To RS.Fields.Count - 1
valuer = rs(RS.Fields(i).Name)
response.write "value:" & valuer & "<br><br>"
Execute(RS.Fields(i).Name & "=" & Chr(34) & Cstr(valuer) & Chr(34))

Next
RS.MoveNext
Loop
response.write "<br>hurra!" & PageContent