0

次のコードがあります

        Dim time As Date
    Dim currentHour As Integer
    Dim currentMinute As Integer

    time = DateTime.Now
    currentHour = time.Hour
    currentMinute = time.Minute

    If currentHour > 10 AndAlso currentMinute > 8 Then
        Response.Redirect("holdingpage.aspx")

    Else
        'do nothing
    End If

基本的に、現在の時刻が午前 10 時 8 分を過ぎている場合、別のページにリダイレクトしたいのですが、何も起こりません。

4

2 に答える 2

1

11:00 の場合、コードは失敗します。

どちらかを使用

If currentHour > 10 OrElse (currentHour = 10 AndAlso currentMinute > 8) Then

またはさらに良い

If Date.Now.TimeOfDay > New TimeSpan(10, 8, 0) Then
于 2013-07-12T09:21:20.197 に答える