Hallo zusammen,
ich verzweifle!
Ich möchte ganz einfach nur ein Datum MIT Uhrzeit (also Standarddatum) aus einer VB 2010 Anwendung in eine Accessdatenbank abspeichern.
Hier meine Prozedur:
Datensatz.Get_DatumUhrzeitliefer ein Date-Datentyp. In der Accesstabelle ist die Spalte "Datum" vom Typ Datum/Uhrzeit (Standarddatum).
SQLtext sieht in der Console (Console.WriteLine(SqlStr)) folgendermaßen aus:
"INSERT INTO Tbl_Datensatz (DatensatzId, Datum, Beschreibung) Values ('DataId01', #2014-01-27 11:53:00#, 'test')"
Der Fehlertext: "Datentypkonflikt in Kriterienauswahl"
Ich weiß, dass es zu dem Thema bei google wie auch hier massig Beiträge gibt, aber ihr müßt mir glauben, auch nach 3 Stündiger Suche habe ich nichts gefunden, was mir geholfen hat, bzw. mein Problem lösen konnte!
Kann mir jemand den entscheidenen Tip geben, was ich falsch mache? Es kann doch nich so schwer sein ein verfli.... Datum mit Uhrzeit in Access abzulegen!
Gruß,
Mario
ich verzweifle!
Ich möchte ganz einfach nur ein Datum MIT Uhrzeit (also Standarddatum) aus einer VB 2010 Anwendung in eine Accessdatenbank abspeichern.
Hier meine Prozedur:
VB.NET-Quellcode
- Public Function Set_Datensatz(Datensatz As Datensatz ) As Integer
- Dim con As New OleDb.OleDbConnection
- con.ConnectionString = Me.ConnString
- Try
- Dim anzahl As Integer
- con.Open()
- Dim SqlStr As String = _
- "INSERT INTO Tbl_Datensatz (DatensatzId, Datum, Beschreibung) " & _
- "Values ('" & _
- Datensatz.Get_DatensatzId & "', " & _
- Get_SQLStandardDateString(Datensatz.Get_DatumUhrzeit) & ", '" & _
- Datensatz.Get_Beschreibung & "')"
- Console.WriteLine(SqlStr)
- Using cmd As New OleDb.OleDbCommand(SqlStr, con)
- anzahl = cmd.ExecuteNonQuery()
- End Using
- Return 0
- Catch ex As Exception
- MsgBox("Fehler in Set_Datensatz : " & ex.Message, MsgBoxStyle.Critical)
- Return -1
- Finally
- con.Close()
- End Try
- Public Function Get_SQLStandardDateString(datDate As Date) As String
- Try
- If IsDate(datDate) Then
- Return Format(CDate(datDate), "#yyyy-MM-dd HH:mm:ss#")
- Else
- Return Nothing
- End If
- Catch ex As Exception
- MsgBox("Fehler in Get_SQLDate: " & ex.Message, MsgBoxStyle.Critical)
- Return Nothing
- End Try
- End Function
Datensatz.Get_DatumUhrzeitliefer ein Date-Datentyp. In der Accesstabelle ist die Spalte "Datum" vom Typ Datum/Uhrzeit (Standarddatum).
SQLtext sieht in der Console (Console.WriteLine(SqlStr)) folgendermaßen aus:
"INSERT INTO Tbl_Datensatz (DatensatzId, Datum, Beschreibung) Values ('DataId01', #2014-01-27 11:53:00#, 'test')"
Der Fehlertext: "Datentypkonflikt in Kriterienauswahl"
Ich weiß, dass es zu dem Thema bei google wie auch hier massig Beiträge gibt, aber ihr müßt mir glauben, auch nach 3 Stündiger Suche habe ich nichts gefunden, was mir geholfen hat, bzw. mein Problem lösen konnte!
Kann mir jemand den entscheidenen Tip geben, was ich falsch mache? Es kann doch nich so schwer sein ein verfli.... Datum mit Uhrzeit in Access abzulegen!
Gruß,
Mario
