關於ACCESS登入按鈕核對密碼的問題

時間 2022-11-28 09:50:10

1樓:解0人

檢查一下你的dlookup()結果到底是什麼?

debug.print dlookup("[密碼]", "使用者密碼", "[使用者名稱]=" & "'" & username & "'")

看看它和你的password文字框內容是不是相同?

祝你成功!

access的登入密碼問題

2樓:百無生

建乙個不繫結資料的登入介面窗體。

1)窗體上新增乙個組合框控制項,用於選擇使用者名稱2)使用者名稱組合框的行**為使用者表的使用者名列3)窗體上還應有乙個文字框控制項,用於輸入密碼4)點選登陸按鈕時,執行以下**:

private sub 登陸按鈕_click()if me.密碼文字框.value=dlookup("密碼","使用者表","使用者名稱" & me.

使用者名稱組合框.value & "'") then

docmd.openform "窗體1"

else

msgbox "密碼錯誤"

end if

end sub

3樓:揭戈雅

access登入** 我教你實現吧

access窗體 登陸按鈕**問題

4樓:access軟體網

可能錯誤原因有以下

一、出錯原因:窗體控制項名稱與**名稱不一致

解決方法:把控制項名稱改成跟**裡面呼叫的名稱一致 (一般是文字框名稱寫錯,如名稱命名到標籤上,造成誤認為命名到文字框)

二、出錯原因:物件的屬性名或方法名寫錯

解決方法:盡量使用vb的自動列出成員功能:當準確拼寫出物件名和 .

後,系統自動會列出該物件在執行態可用的屬性和方法,使用者可以定位後按tab鍵或空格鍵或雙擊滑鼠快速準確錄入。這樣既可減少錄入,也可防止此類錯誤的出現。

dlookup 後面的變數格式也不對

數值型: dlookup ("字段","表名","欄位名="&數值型變數)

文字型: dlookup ("字段","表名","欄位名='"& 文字型變數 &"'")

日期型: dlookup ("字段","表名","欄位名=#"& 日期型變數 &"#")

關於access登陸介面的問題 10

5樓:不想起名字了

程式寫完後,在資料庫工具中,生成accde檔案

就再也回不到設計介面了。

access登入窗體密碼設定問題

6樓:匿名使用者

private sub 登入_click()

if isnull(使用者名稱) then

msgbox "使用者名稱不能為空,請重新選擇!", vbexclamation + vbokonly, "提醒您!"

me.使用者名稱.setfocus

else

if isnull(密碼) then

msgbox "注意,您忘了輸入密碼!", vbexclamation + vbokonly, "提醒您!"

me.密碼.setfocus

else

if dlookup("密碼", "使用者", "使用者名稱='" & 使用者名稱 & "'") = [密碼] then

me.visible = false

me.密碼 = null

msgbox "登入成功!", vbexclamation, "提醒您"

else

msgbox "您輸入的密碼有誤,請重新輸入!", vbexclamation + vbokonly, "提醒您!"

me.密碼 = null

me.密碼.setfocus

end if

end if

end if

end sub

這段** 沒問題啊!你再試試吧……但是 你的資料表中 密碼不能為空!

注意 你實際的窗體上 登入用的使用者名稱、密碼 等控制項的名稱 要用對!最好就是 與你的使用者表中的名稱一致! 估計你的問題就在這裡……實際上 有什麼問題 還要看你實際情況 在此不好猜測……自己在檢查一次吧……注意 不能使用 空密碼登入!

還有 乙個 登入窗體 還要有乙個 保護設定 就是加乙個計數器 發生錯誤密碼一次 就記錄一次 如果 達到了設定的次數限制 本次登入失敗 關閉資料庫……

一般來說 對於 密碼不是很熟悉的朋友 建議 開始學著做的時候 先盡量 使用 巨集 來操作而不是使用 vba**……使用 巨集 與 主子窗體 以及查詢的配合 一樣 可以得到 你需要的效果 這裡邊 的一些邏輯關係 一般都是很直觀的…

比如你這個問題:

1、首先 窗體的登入用的 「使用者名稱」 控制項 你要登陸 首先 就要輸入乙個使用者名稱……然後 根據這個名稱 要查詢 使用者表中對應的記錄……

2、然後 你要輸入乙個 登入密碼 這個密碼要與 使用者表中的 資料 進行比較 如果密碼不相等(就是因為這個比較 所以 使用者表中的 密碼不能為空)增登入不成功 只有密碼相等了 才能繼續登入成功……

基於這樣的邏輯思維 那麼 你就要建立乙個 查詢 作為子窗體 插入到登入窗體上 然後 可以使用 巨集 命令 來對 它們 進行比較 ……剩下的 你應該懂得 ……慢慢研究一下……這裡面的設計 就不會 像現在的** 這樣 那麼抽象了……

最基本的都 用熟練了 再學習用**來做 邏輯上 也就不會感到那麼抽象了……你需要的 每一步操作 你只要去尋找相應的** 就可以了 然後 把它們組合在一起 就是最後的解決方案了……

關於access:實現「身份驗證」窗體的密碼驗證功能。

7樓:羽扇子君

這個問題實現起來不難,但要求您了解一些access中巨集的命令方法:

1、要建立乙個窗體→「身份驗證」窗體,並在其中放置好3個控制項,請自行調整好位置並按後面括號中的文字給控制項命名(控制項的「名稱」屬性):1個文字框(text密碼),2個命令按鈕(command確定、command取消);

2、屬性設定1,將文字框「text密碼」的「輸入掩碼」屬性設定為「密碼」、將其附帶的「標籤」的標題屬性(caption)設定為 「請輸入密碼:」、將命令按鈕「command確定」及「command取消」的標題屬性(caption)分別設定為「確定」、「取消」、然後儲存並將窗體重命名為「身份驗證」;

3、屬性設定2,將窗體的「記錄選擇器」、「導航按鈕」、「分隔線」、「控制框」、「快捷選單」均設定為「否」;「邊框樣式」設定為「細邊框」;「自動居中」、「彈出方式」、「模式」設定為「是」;然後儲存並關閉窗體;

4,新建物件 巨集 「巨集1」,進入設計檢視,確保「巨集名」、「條件」為選擇的,並寫入以下幾行內容:

a、巨集名處寫入「command確定」,在條件處寫入「[forms]![身份驗證]![text密碼]="123"」、在操作處選擇「close」、「物件型別」選擇「窗體」、「物件名稱」選擇「身份驗證」、「儲存」選擇「否」;

b、條件處寫入「...」,操作處選擇「openform」、窗體名稱選擇「主窗體」、檢視選擇「窗體」;

c、條件處寫入「...」,操作處選擇「stopmacro」;

d、操作處選擇「msgbox」、「訊息」處寫入「密碼輸入錯誤,請重新輸入。」;

e、操作處選擇「setvalue」、「專案」處寫入「[forms]![身份驗證]![text密碼]」、表示式處寫入「""」;

f、操作處選擇「gotocontrol」、「控制項名稱」處寫入「text密碼」;

g、操作處選擇「stopmacro」;

h、巨集名處寫入「command取消」,操作處選擇「quit」。

退出並儲存巨集的修改;

5、屬性設定3,在「身份驗證」窗體的「設計檢視」中,將「command確定」控制項的「單擊」事件屬性設定為「巨集1.command確定」、將「command取消」控制項的「單擊」事件屬性設定為「巨集1.command取消」,儲存窗體的設計並關閉窗體;

6、開啟access選單「工具」→「啟動」的對話方塊,在「顯示窗體/頁」中選擇「身份驗證」、去掉「顯示資料庫窗體」的「√」,然後單擊「確定」;

7、關閉並重新開啟該資料庫;

8、good luck!~

access 能通過窗體實現使用者登入的效果嗎

8樓:常山大寶

能!2003版本點選【工具】選單下的【選項】,2007或以上版本點選左上角微軟圖示裡面的【access選項】。開啟後在顯示視窗選中【使用者登入】窗體即可。。

'下面**為【使用者登入】窗體的名為【鈕取消】和【鈕確定】的兩個按鈕事件

private sub 鈕取消_click()

docmd.quit '退出程式

end sub

private sub 鈕確定_enter()

'驗證使用者和密碼,登入系統

if dcount("[使用者名稱]", "使用者", "[使用者名稱]='" & text1 & "'") = 0 then 'text1為使用者名稱輸入框

msgbox "請輸入正確的使用者名稱!", 4096 + 48, "波濤工作室"

elseif nz([text2]) = nz(dlookup("[密碼]", "使用者", "[使用者名稱]='" & text1 & "'")) then 'text2為密碼輸入框

me.visible = false '隱藏窗體

docmd.openform "使用者介面" '開啟使用者介面窗體

else '密碼錯誤後的處理

msgbox "密碼錯誤,請重輸!", 4096 + 48, "波濤工作室"

end if

end sub

'下面**為【使用者介面】窗體的載入事件

private sub form_load()

me.label1 = forms![使用者登入]![text1] & "您好!歡迎使用本系統..." '把登入使用者名稱寫入label1標籤

end sub

9樓:解0人

大概如下:

在登入按鈕的單擊事件中寫如下**:

dim passwd as string

passwd=dlookup("使用者表密碼欄位名稱", "使用者表名稱", "使用者表賬號欄位名稱='" & me.登入窗體賬號文字框名稱 & "'")

if me.登入窗體密碼文字框名稱=passwd thendocmd.openform "使用者介面窗體名稱"

forms.使用者介面窗體名稱.使用者介面顯示使用者名稱的文字框名稱 = me.text4

docmd.close acform, "登入窗體"

else

msgbox "您輸入的使用者名稱或密碼錯誤,請確認後重新輸入!"

end if

10樓:

修補下最佳答案漏洞:空密碼可以直接登入

private sub 鈕取消_click()

docmd.quit '退出程式

end sub

private sub 鈕確定_enter()

'驗證使用者和密碼,登入系統

if dcount("[使用者名稱]", "使用者", "[使用者名稱]='" & text1 & "'") = 0 then 'text1為使用者名稱輸入框

msgbox "請輸入正確的使用者名稱!", 4096 + 48, "波濤工作室"

elseif dcount("[密碼]", "使用者", "[密碼]='" & text2 & "'") = 0 then

'text2為密碼輸入框

msgbox "請輸入正確的使用者密碼!", 4096 + 48, "波濤工作室"

elseif nz([text2]) = nz(dlookup("[密碼]", "使用者", "[使用者名稱]='" & text1 & "'")) then 'text2為密碼輸入框

me.visible = false '隱藏窗體

docmd.openform "使用者介面" '開啟使用者介面窗體

else '密碼錯誤後的處理

msgbox "密碼錯誤,請重輸!", 4096 + 48, "波濤工作室"

end if

end sub

access查詢問題謝謝,access查詢問題 謝謝

select from 表1,表2 where 表1.性別 表2.性別 and 表1.年齡 表2.年齡 性別 和 年齡都相同的人 select from 表1 while 性別 select 性別 from 表2 while 姓名 趙x and 年齡 select 年齡 from 表2 while ...

access2019啟用不了,access2010 啟用不了

access2010啟用需要專門工具 2 開啟介面如下 3 選擇 key management 選項卡,選擇access2010,如果沒有access2010這個選項,請直接選擇access也可以,但是在下面的主選單一定要選擇microsoft office 2010這一項。4 反回main選項卡,...

c中有沒有關於Access資料的命名空間,有的話,它的作用是什麼

有ado.net包含了對access資料庫的支援 詳細的使用方法與訪問sql server資料庫類似,只是使用的命名空間不同 以下是與sql server訪問的對比 命名空間 sql ssytem.data.sqlclient access system.data.oledbclient 鏈結物件 ...

用ACCESS怎麼做條碼?ACCESS我完全不懂,知道的大俠,請發具體的教程!謝

樓上幾位都是瞎扯.access確實可以做條碼 bar code 但你說 access完全不懂 以下內容不知你看不看得懂 步驟如下 1.完整安裝 office 元件 這其中包括條形碼元件.如何安裝就不上圖了.2.在vba中,開啟 工具 引用 找到microsoft barcode 控制項 x.x 後,...

access資料庫的型別是,Access資料庫的型別是

選c,資料庫相應的分類根據資料庫所使用的資料模型分為 層次型資料庫 網狀型資料庫和關係型資料庫,而access資料庫的型別為 關係型資料庫。bt的問題,沒有實際意義 還有這種問題問呀。真服lz了。現在一般情況下有用層次和網狀的嗎?物件導向資料庫?提法比較有意思,可以研究研究。access資料庫的型別...