VB.Net – SQL Datumsformat

So wird es gemacht:

    '============================================
    ' VB.NET Beispiel in Visual Basic .Net
    ' © wilfried.bitz@bridgesolution.de
    '============================================
    Public Function SQL_Datum( _
        ByRef strDatum As String, _
        ByVal blnMitZeit As Boolean) As String
        On Error Resume Next
 
        Dim dDatum As Date
        'Das ist die Richtige ;-)
 
        If strDatum <> "" Then
            If IsDate(strDatum) Then
                dDatum = CDate(strDatum)
            End If
            If blnMitZeit Then
                SQL_Datum = "'" & Format$(dDatum, "dd/MM/yyyy").Replace(".", "/") & " " & Format$(dDatum, "HH:mm:ss") & "'"
            Else
                SQL_Datum = "'" & Format$(dDatum, "dd/MM/yyyy").Replace(".", "/") & "'"
            End If
        End If
 
    End Function

Spendierst du mir eine Tasse Kaffee? Ich würd mich riesig freuen. DANKE !! 🙂

[wpedon id=2074]


0 Kommentare

Schreibe einen Kommentar

Deine E-Mail-Adresse wird nicht veröffentlicht. Erforderliche Felder sind mit * markiert.