2012-03-14 66 views
0

我需要一些幫助,在Microsoft Access的登錄表單上進行密碼驗證......請理解,這僅適用於學校項目,因此我不打算在此創建一些超強健的解決方案。 ;)這個密碼驗證碼不起作用?

登錄表單有一個用於用戶名選擇的組合框,它從我稱爲「用戶」的用戶表中查找記錄,並且它還具有用於輸入用戶密碼的字段(稱爲「Text8」 )。

所以這是我的代碼有:

Option Compare Database 

Private Sub Command13_Click() 

If IsNull(Me.Text8) Or Me.Text8 = "" Then 
    MsgBox "You must enter a Password.", vbExclamation 
    Me.Text8.SetFocus 
    Exit Sub 
End If 

End Sub 

當我切換到窗體視圖,請保留密碼字段爲空,然後單擊按鈕,沒有任何反應......

一旦我有這個想通我將擴展代碼並輸入用戶名/密碼,並查找「用戶」表中的記錄以查看是否匹配 - 如果存在,它們將被允許訪問。

回答

2

我懷疑沒有任何反應,因爲你的代碼沒有運行。檢查命令按鈕的單擊事件是否設置爲[event procedure]

您可以通過設置斷點並逐步執行代碼來確保已達到代碼。要做到這一點,把信用卡放在適當的線上,說第一行,然後按F9。現在,當你點擊命令按鈕時,如果代碼完全工作,也就是說,如果達到子代碼,代碼窗口就會打開,你可以按F8來逐步執行代碼。

你的代碼沒有問題,雖然我總是推薦使用明智的控件名稱,而不僅僅是默認值。

+0

它被設置爲[事件過程],我儘可能早地嘗試設置一箇中斷點,但它仍然不能運行......是否還有更多信息可以幫助您回答我的問題? – Dan 2012-03-14 11:29:17

+0

你的代碼適合我。你可以備份,然後緊湊和修復?如果你仍然有問題,你可以反編譯(http://www.granite.ab.ca/access/decompile.htm)。如果仍然不起作用,請回到這裏。 – Fionnuala 2012-03-14 11:35:51

+0

感謝所有的幫助@Remou - 我只是嘗試過「緊湊和修復」,但無濟於事。我將在大約一個半小時內進入我的IT課程,以便我看看它是否適用於學校的電腦。如果沒有,我會回到這裏。 – Dan 2012-03-14 11:49:57