 Lid |
|
Mede programmeurs (hoewel ik me dit momenteel ff niet durf noemen)
mijn fout is zeer persistent en ik krijg ze van geen kanten opgelost 
kan iemand mij helpen aub?
Mijn connectie enzo is in orde, want net hierna doe ik een insert en die werkt wel.
maar staat nu niet in deze code.
Ik blijft de fout krijgen
"Gegevenstypen komen niet overeen in criteriumexpressie"
BEATS ME!! 
Public Function chkDoubleDag(ByVal datum As String) As Boolean
Dim query As String = "SELECT count(*) from tb_dag where dag_dt = '" & datum & "'"
Dim sqlCommand As OleDbCommand = New OleDbCommand(query, conn)
Dim cnt As Integer
Try
conn.Open()
cnt = sqlCommand.ExecuteScalar()
'Heb hier al conversies gedaan met Cint, convert.toint32, ....
'maar ik blijf dezelfde fout krijgen.
'Google geeft vele oplossingen die identiek aan de mijne zijn...
Catch x As Exception
MessageBox.Show(x.Message, "Fout", MessageBoxButtons.OK, MessageBoxIcon.Error)
Finally
conn.Close()
MsgBox("aantal: " & cnt.ToString)
End Try
End Function
Public Function chkDoubleDag(ByVal datum As String) As Boolean Dim query As String = "SELECT count(*) from tb_dag where dag_dt = '" & datum & "'" Dim sqlCommand As OleDbCommand = New OleDbCommand(query, conn) Dim cnt As Integer Try conn.Open() cnt = sqlCommand.ExecuteScalar() 'Heb hier al conversies gedaan met Cint, convert.toint32, .... 'maar ik blijf dezelfde fout krijgen. 'Google geeft vele oplossingen die identiek aan de mijne zijn... Catch x As Exception MessageBox.Show(x.Message, "Fout", MessageBoxButtons.OK, MessageBoxIcon.Error) Finally conn.Close() MsgBox("aantal: " & cnt.ToString) End Try End Function
alvast bedankt!!
|
Wat is jouw favoriete javascript framework? (S: 18, R: 2)
Gesponsorde links
Actiefste leden van de maand
