SQL1.AddNonQueryToBatch("UPDATE TblProva SET Inviato = 1 WHERE Id = " & ID, Null)
Dim SenderFilter As Object = SQL1.ExecNonQueryBatch("SQL1")
Wait For (SenderFilter) SQL_NonQueryComplete (Success As Boolean)
If Success Then
TimerInvioHttp.Enabled = True
CallSubDelayed(Main, "FillWebView")
Else
Log("NonQuery: " & Success)
End If