B4X FEED error when enterpressed textbox

[practicalsoft]

hello everybody
can help me...

this myTable

CodeItem, ProdName
000001, Bread
000002, egg

example, when i fill the codeitem textbox with type "000001" and then ENTER
the ProdName textBox will show "Bread"

Sub Process_Globals
'These global variables will be declared once when the application starts.
'These variables can be accessed from all modules.
Dim SQL1 As SQL
Dim Csr1 As Cursor
End Sub

Sub edtcditem_EnterPressed
mdlConn.CSR1=mdlConn.SQL1.ExecQuery("select * from myTabel where PartCode = '" & edtCdItem.Text & "'")
If mdlConn.CSR1.RowCount > 0 Then
ToastMessageShow("The Item is Found...",True)
edtProdName.Text = CSR1.GetString("ProdCode")
Else
ToastMessageShow("the Item Not Found",True)
End If
End Sub

its always error, when i try running affter fill type the code item textbox

but when i delete/non active the sintaks ( Bold text ), is succes running

any solution .... ?? thx

برای دیدن لینک ها باید ثبت نام کنید