How to use UPDATE?

[JVilar]

the SELECT is perfect, but i'd like to use UPDATE int JSON.

What can i do? What can i change?

JSON_UTIL.asp

<%

Function QueryToJSON(dbc, sql)

        Dim rs, jsa

Set dbc = Server.CreateObject("adodb.connection")

dbc.open "provider=SQLOLEDB;server=.;Database=SurfByte","sa","surfbyte"

        Set jsa = jsArray()

        Set rs = dbc.Execute(sql)

       While Not (rs.EOF Or rs.BOF)

               Set jsa(Null) = jsObject()

                For Each col In rs.Fields

                       jsa(Null)(col.Name) = col.Value

               Next

        rs.MoveNext

        Wend

dbc.close

        Set QueryToJSON = jsa

End Function

%>

[Diego Braga]

Try this:

<%

Function QueryUpdate(dbc, sql)

Set dbc = Server.CreateObject("adodb.connection")

dbc.open "provider=SQLOLEDB;server=.;Database=SurfByte","sa","surfbyte"

        dbc.Execute(sql)

dbc.close

End Function

%>