0 
Private Sub CheckLogin()

If Failed == 3
    'show recapacha
    If Page.IsValid Then
    CheckLogin2()
    End If
End If
Else
Try
    'login code
    ' on password fail Failed+1
End Try
End If

私が持っているのはログインフォームですが、無効なログイン試行が3回行われるまで、要約を表示したくありません。そのための最善の方法がわかりません。上記は、私がどこに向かっているのかを理解するためのモックアップコードです。

4

1 に答える 1

0 
Private Sub CheckLogin()

    'after the three attempts 
    If (LoginCount = 3) Then
        'show captcha code
        Return
    End If
    'your login code if found unsuccessful increase the counter
    LoginCount += 1

End Sub

カウンターを増やし、ログイン試行回数を確認するプロパティ

Public Property LoginCount() As Integer
    Get
        If (ViewState("LoginCount") = Nothing) Then
            ViewState("LoginCount") = 0
        End If
        Return DirectCast(ViewState("LoginCount"), Integer)
    End Get
    Set(ByVal value As Integer)
        ViewState("LoginCount") = value
    End Set
End Property
于 2012-04-12T15:57:27.127 に答える