hallo, Ik ben een programma aan het schrijven in VB.NET en een deel vn het programma bestaat er in om een gegeven na 4 cijfers automatisch aan de databank toe te voegen. Ook is de tijd een factor die bepaalt naar welke tabel er zal worden weg geschreven.
Nu blijkt er een fout in mijn SQL te zitten, ik kan deze echter niet vinden, kan iemand mij helpen.
Dit is wat ik al heb:
Dank bij voorbaat
Junior
Nu blijkt er een fout in mijn SQL te zitten, ik kan deze echter niet vinden, kan iemand mij helpen.
Dit is wat ik al heb:
Code:
Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged
Dim inh As String
Dim tijd As Date
inh = TextBox1.Text
tijd = TimeOfDay.ToString
If inh.Length = 4 Then
con.ConnectionString = "PROVIDER=microsoft.jet.OLEdb.4.0;data source = G:\school\GIP\Programma\kindLoco\kindLoco\db1.mdb"
con.Open()
If tijd < "#8:35:00 AM#" Then
sql = "INSERT INTO tbl_scans_ochtend (naam) VALUES (inh)"
Else
sql = "INSERT INTO tbl_scans_avond (naam) VALUES (inh)"
End If
da = New OleDb.OleDbDataAdapter(sql, con)
da.Fill(ds, "test")
con.Close()
End If
End Sub
Dank bij voorbaat
Junior
Laatst bewerkt: