0

データベースに最後に保存された日付: 6/13/2012 12:27:30 PM

私のDateTime Nowは次のとおりです：6/13/2012 01:27:57 AM

しかし、この関数を実行すると、常に「日付が手動で変更されました。有効な DateTime に設定してください」と表示されます。

しかし、DateTime Now は、データベースの日付よりも小さくありません。どうしたの？

これはコードです。修正してください。

Private lastdate As DateTime
Private Sub GetDBdate()
...
    Dim ss As String
    Dim sc As New SQLiteCommand
    ss = "select dtime from dincome order by dtime desc limit 1"
    sc = New SQLiteCommand(ss, mycon)
    lastdate = CDate(sc.ExecuteScalar)
End Sub



    Private Function CheckValidDate() As Boolean
    Dim dtnow As DateTime = DateTime.Now
    If dtnow < lastdate Then
        Return False
    End If
    Return True
    End Function




    Private Sub Button_Click
    If Not CheckValidDate() Then
    label1.Text = "Date has been manually modified, Please Set to Valid DateTime"
        Exit Sub
    End If
    ...
    ...
    Exit Sub
4

2 に答える 2

0

あなたの時間は約 1 時間オフです。タイムゾーンの設定を確認しましたか? これは過去に私に問題を引き起こしました。

于 2012-06-12T17:42:34.343 に答える
0

それは24時間の問題だったと思います。昨日、ttを削除しました

Dim dt As DateTime = DateTime.Now.ToString("yyyy-MM-dd hh:mm:ss")

察するに：

Dim dt As DateTime = DateTime.Now.ToString("yyyy-MM-dd hh:mm:ss tt")

両方ありがとう

于 2012-06-12T19:40:54.040 に答える