dudeishere
New Member
hi i have a problem with this "For i To c.RowCount-1" line...the program says "regular variable followed by '='expected"
idk how to solve it
the code is here
Sub Button1_Click
Try
Dim flag As Boolean
flag=False
c=s.ExecQuery("select * from idpass")
Dim i As Int
For i To c.RowCount-1
c.Position=i
If EditText1.Text=c.GetInt("id") AND EditText2.Text=c.GetInt("pass") Then
Msgbox("done","done")
flag=True
i=c.RowCount+1
End If
Next
If flag=False Then
Msgbox("no ","no")
End If
Catch
Msgbox("err","err")
End Try
End Sub
idk how to solve it
the code is here
Sub Button1_Click
Try
Dim flag As Boolean
flag=False
c=s.ExecQuery("select * from idpass")
Dim i As Int
For i To c.RowCount-1
c.Position=i
If EditText1.Text=c.GetInt("id") AND EditText2.Text=c.GetInt("pass") Then
Msgbox("done","done")
flag=True
i=c.RowCount+1
End If
Next
If flag=False Then
Msgbox("no ","no")
End If
Catch
Msgbox("err","err")
End Try
End Sub