ACCESS做的登陸窗體,無法輸入使用者名稱和密碼

時間 2022-03-15 05:10:10

1樓:

你按住shift鍵,用設計狀態開啟資料庫,找到該登陸窗體,用設計模式開啟,從窗體屬性表中---資料---將記錄源清空,將"允許新增"設為否,將"允許刪除"設為否,將"允許編輯"設為是。

然後要求編寫程式,就行了。

2樓:匿名使用者

沒設計好。不知你具體是怎麼設計的

3樓:匿名使用者

登入窗體的控制項不要繫結記錄源。

急~~!!怎樣在access中做乙個帶有使用者名稱、密碼的登陸窗體?

4樓:易登

access 中的窗體是一種資料庫物件,可用於建立資料庫應用程式的使用者介面。「繫結」窗體直接連線到表或查詢之類的資料來源,可用於輸入、編輯或顯示來自該資料來源的資料。或者也可以建立「未繫結」窗體。

5樓:解0人

看你的樣子,是不是把登入窗體做成繫結窗體了??

不要繫結窗體,窗體中的使用者名稱和登入密碼兩個文字框不要和表字段繫結,不需要神馬有效性規則...只需要:

1.建好使用者表,表中設好使用者名稱和密碼;

2.登入窗體中【進入系統】按鈕的單擊事件**:

if isnull(me.使用者名稱) or isnull(me.登入密碼) then

msgbox "請輸入正確的使用者名稱和密碼!"

elseif isnull(dlookup("密碼","使用者表","使用者名稱='" & me.使用者名稱 & "'")) then

msgbox "使用者名稱不存在!"

elseif dlookup("密碼","使用者表","使用者名稱='" & me.使用者名稱 & "'")=me.登入密碼 then

docmd.openform 窗體名稱

else

msgbox "密碼錯誤!"

end if

'祝你成功!

6樓:矮漢恨天高

用vba,先建立乙個使用者表,在窗體上拉兩個文字框輸入使用者名稱和密碼用,再拖乙個按鈕,在vba工程模組中找到按鈕名稱,並在他的click事件中加入下面的**:

private sub command1_click() '//假設你的按鈕名叫command1

'//連線資料庫去查詢使用者

dim cnn as adodb.connection   '//連線物件

dim rs as adodb.recordset   '//資料集合

set cnn = currentproject.connection   '//連線物件就是本身,臨時連線就好了

set rs = new adodb.recordset    '//例項化資料集合

rs.open "select * from 使用者表 where 使用者名稱='" + trim(me.text1) + "' and 密碼='"+trim(text2)+"'", cnn     '//注意不要畫蛇添足寫個text1.

text,access不一樣,寫屬性會讓你不停去找焦點的,這裡是開啟資料集合

if rs.eof then        '//如果沒找到記錄,就說明驗證錯誤了嘛

msgbox "對不起!使用者名稱或密碼錯誤,請重新輸入!",vbokonly,"系統訊息"

me.text1=""

me.text2=""    '//如果驗證失敗,兩個文字框空值

me.text1.setfucos   '//讓游標焦點跳到text1使用者名稱輸入框上去

else       '//如果查到了使用者資料,那就登陸成功了

msgbox "登陸成功","系統訊息"

你需要開啟的窗體名稱.show

me.hide     '//隱藏自己,開啟你要開啟的窗體介面

end if     '//結束if迴圈

end sub     '//結束按鈕事件

這只是個簡單例子,希望對你有幫助,寫完**要把窗體設定成啟動模式,只啟動登陸窗體就好了,人家看到你使用者表做登陸事件也是沒意義的。access本身就可以設定密碼安全,他其實不是開發環境,本身就是個軟體,你做好了驗證別人拿著往別的表一匯入,一樣的可以用。

access開啟的時候把檔案取消開啟,然後在檔案選單下面找到開啟,找到你的檔案

右下腳有個按鈕,選擇以獨佔形式開啟,進入access後在安全裡就可以設定密碼了,

這個密碼比上面的策略安全,別人很難破解

不知道樓主能不能看懂

自學網

軟體教程

教程

7樓:小石子

jm/lk就iojiojmkojioj8by

我的access登入窗體輸入了使用者名稱和密碼之後還要再輸入一次使用者名稱,是**出問題了麼

8樓:匿名使用者

**邏輯有問題,建議修改如下:

private sub command16_click()if isnull(me.使用者名稱) thenmsgbox "請輸入使用者名稱"

me.使用者名稱.setfocus

exit sub

end if

if isnull(me.密碼) thenmsgbox "請輸入密碼"

me.密碼.setfocus

exit sub

end if

if dcount("*","使用者表","使用者名稱='" & me.使用者名稱 & "' and 密碼='" & me.密碼 & "'")>0 then

msgbox "登入成功"

else

msgbox "使用者名稱或密碼錯誤,請重新登入"

me.使用者名稱=null

me.密碼=null

end if

end sub

用access資料庫實現使用者登入,我建了乙個包括使用者名稱和使用者密碼的表,做了乙個窗體,窗體裡有使用者名稱和密碼

9樓:匿名使用者

請進一步說明,用的什麼程式設計環境,是直接在access裡做還是只使用access庫?

access登入窗體密碼設定問題

10樓:匿名使用者

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做好的登入窗體登陸不了,求幫忙!

11樓:慶有

1、以上這些**要寫在「登陸」這個按鈕的單機動作裡面;

2、賬號兩個字後面的文字框的名字應該為「使用者名稱」,密碼那個文字框的名字應該是「密碼」;

3、看這段**,如果你的密碼輸入正確的話,也會開啟「登入」這個對話方塊!所以你應該把

docmd.openform 登入 改成 docmd.openform 「密碼正確時應該開啟的窗體」,注意要留著引號,窗體的名字應該在引號裡面。

修改完這三條您再試一試!

12樓:百無生

1)確認窗體上文字框名稱是「使用者名稱」和「密碼」,而並非「帳號」

2)3個條件,換了種寫法試試

if isnull(me.使用者名稱) or isnull(me.密碼) then msgbox "請輸入使用者名稱和密碼!": exit sub

if dcount("id", "使用者表", "使用者名稱='" & me.使用者名稱 & "'") = 0 then msgbox "不存在!": exit sub

if dlookup("登入密碼", "使用者表", "使用者名稱='" & me.使用者名稱 & "'") <> me.密碼 then msgbox "密碼錯誤!": exit sub

docmd.openform "目標窗體名稱"

3)還不行的話,單步執行除錯,看問題在**。

4)還不行,在網盤上分享一下,我再看看

access2003登入窗體,要設定使用者名稱和密碼。且密碼錯誤三次以後就禁止操作。想知道登入按鈕的**怎麼編寫

13樓:匿名使用者

咳!這麼久了 還是沒有人來回答你的問題,那麼就先簡單滴給你乙個提示吧……

1、首先要建立乙個 使用者表 包含使用者名稱 與 密碼 的資料表……

2、在乙個 登入窗體中 加入乙個 使用者名稱 、密碼 、登入次數記錄三個文字框

3、在這個窗體中 插入乙個 子窗體(對於不太熟悉**的朋友推薦)這個子窗體的資料來源 就是 使用者表 作為資料來源 使用者名稱 為查詢條件的查詢來做的 子窗體資料來源…… 設定這個窗體的的屬性 為隱藏……

4、通過乙個按鈕 對應乙個時間過程 事件過程

這個過程 通過比較 密碼框中的資料 是否 與 子窗體 密碼框中的值相等 如果不相等 就把 登入次數框 加1 然後結束** 回到登入窗體……

使用 if then 語句進行比較………

當然 你對**比較熟悉的話 可以不加子窗體 而改用一段sql 語句在你的vba中……

具體的還要你自己來做哦 遇到具體問題再問吧……

電腦無法登陸 系統無法讓你登陸 請確定你的使用者名稱及域無誤

好程式設計師 如果是xp的機器.1 執行 輸入 control userpasswords2 選上 要使用本機,使用者必須輸入使用者名稱和密碼 2 執行 輸入regedit 到 hkey local machine software microsoft windows nt currentversi...

C登陸窗體的登入名怎麼傳值到其他的窗體

首頁在需要登入的窗體內設定乙個屬性。然後再在登入的窗體設定這個屬性的值就可以了 登陸窗體定義乙個static屬性,在 另一窗體 用login.property 登陸介面類名.屬性 取值。寫乙個構造方法唄。在跳轉窗體的時候,把你要傳遞的東西 寫入構造方法中 那個窗體初始化的 時候不就過去了麼 另乙個窗...

用C編的窗體應用程式,要實現使用者登陸後,例如使用者名為123,能夠在下窗體中顯示歡迎123,怎麼實現

1.設定全域性變數 2.窗體間傳值,接收窗體設定引數接收 樓上的方法可行,再給你個方法,在登入視窗建立乙個公共變數public string user 然後在登入的時候把登入名賦值給user,比如user textbox.text.trim tostring 然後在例項化下乙個視窗的地方加 this...