<% function convertCursor(theCursor) if theCursor = "true" Then theCursor = 1 else theCursor = 0 end if convertCursor = theCursor end function strCursor = request.QueryString("cursor") strID = request.QueryString("id") strSQL = "UPDATE T_COMMENTS SET isApproved = " & convertCursor(strCursor) & " WHERE id = " & strID response.Write(strSQL) Set MyConn = Server.CreateObject("ADODB.Connection") MyConn.Open strConn MyConn.Execute(strSQL) MyConn.Close Set MyConn = Nothing %>