iam getting error too many paramenters when i try to implemement this please help
B4X:
Dim strSQL As String
Dim strName As String
Dim strNames As String
Try
strName =Rsms.Text
strNames =Rsms2.Text
If strName = "no filter" Then
MsgboxAsync("Please select a Name to delete", "E R R O R")
Return
End If
strSQL = "DELETE FROM SMSlist WHERE sms = ? AND Datesent = ?"
Starter.SQL1.ExecNonQuery2(strSQL, Array As Object(strName), strNames)
InitSpinners
Catch
Log(LastException)
End Try