Dim SQL1 as SQL 'in process global
Dim txt as string 'globals
Dim UpdatedRecos as Int 'globals
txt="UPDATE MyTable SET City= 'Rome', MyUpdate =1 WHERE Country='Italy'"
SQL1.ExecNonQuery(txt)
txt="SELECT count(*) FROM myTable WHERE MyUpdate = 1"
UpdatedRecs=SQL1.ExecQuerySingleResult(txt)
Msgbox(UpdatedRecs,"Number of updated records.")
txt="UPDATE MyTable SET MyUpdate =0 WHERE MyUpdate = 1"
SQL1.ExecNonQuery(txt)