I delete a Recordset ( will be deleted! ) an try to refresh with the Function
"MySQL_ExecResult", but this Error is occurred by raising:
"MySQL_ExecResult", but this Error is occurred by raising:
B4X:
Sub MySQL_ExecResult(meta As Map)
'Dim m As Map = meta
' no matter wich Code is here, always the same Error... also with no Code... so where is the Problem... ?? :-O
End Sub
Sub ViewTable_CellClick(Col As Int, Row As Int)
Dim result As Int
result = Msgbox2("Delete Recordset ?", "Delete, "Yes", "", "No", Null)
If result = DialogResponse.POSITIVE Then
'If Yes...roast it
Main.db.ExecuteASync("DELETE FROM t_abrechnung WHERE ID = " & myID, "Delete")
End If
End Sub