Hi,
I'm trying to write an application for our our company
It has to handle the tickets and data of trucks who come weighing.
First part :
I have to fill in the licenseplate, when the licenseplate doenst't exists it gives an error, when the licenseplate does exist it fills in the licenseplate of the truck and the tare of the truck.
So this is how i started :
Private Sub txtKenteken_Validating(ByVal sender As Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles txtKenteken.Validating
DataSet11.KENTEKENS.Clear()
OleDbDataAdapter1.SelectCommand.Parameters("kenteken").Value = txtKenteken.Text
OleDbDataAdapter1.Fill(DataSet11.KENTEKENS)
If DataSet11.KENTEKENS.Count = 0 Then
erpKenteken.BlinkRate = 1000
erpKenteken.BlinkStyle = ErrorBlinkStyle.AlwaysBlink
erpKenteken.SetError(txtKenteken, "Kenteken bestaat niet")
e.Cancel = True
Else
erpKenteken.SetError(txtKenteken, "")
End If
DataSet11.AANHANGERS.Clear()
OleDbDataAdapter1.Fill(DataSet11.AANHANGERS)
End Sub
It works fine but is this the way ?
Any comments would be helpfull so i can go on.
Thanks
I'm trying to write an application for our our company
It has to handle the tickets and data of trucks who come weighing.
First part :
I have to fill in the licenseplate, when the licenseplate doenst't exists it gives an error, when the licenseplate does exist it fills in the licenseplate of the truck and the tare of the truck.
So this is how i started :
Private Sub txtKenteken_Validating(ByVal sender As Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles txtKenteken.Validating
DataSet11.KENTEKENS.Clear()
OleDbDataAdapter1.SelectCommand.Parameters("kenteken").Value = txtKenteken.Text
OleDbDataAdapter1.Fill(DataSet11.KENTEKENS)
If DataSet11.KENTEKENS.Count = 0 Then
erpKenteken.BlinkRate = 1000
erpKenteken.BlinkStyle = ErrorBlinkStyle.AlwaysBlink
erpKenteken.SetError(txtKenteken, "Kenteken bestaat niet")
e.Cancel = True
Else
erpKenteken.SetError(txtKenteken, "")
End If
DataSet11.AANHANGERS.Clear()
OleDbDataAdapter1.Fill(DataSet11.AANHANGERS)
End Sub
It works fine but is this the way ?
Any comments would be helpfull so i can go on.
Thanks