vb 如何輸入密碼以允許訪問 5

有乙個最簡單的方法：

在輸入密碼的表單中，寫下：

dim passwd as string

passwd = "您需要設定密碼"

if = passwd then

elsemsgbox "密碼不正確，請重新輸入！ "

end if

msgbox "請輸入您的密碼！ ", vbexclamation, "密碼"

如果密碼 ="" then end

載入主介面表單。

可以將文字框的 passwordchar 屬性設定為 *。

它們具有相應的功能：

replace：

p=replace(s,s1,s2)

用於將 s1 替換為 s2 並返回 p

例如：p=replace（"i‘m bob","i'm","i am"p=“我是鮑勃”。

private sub cmdok_click()static interr as integerdim suser as string

dim spass as string

suser = ucase$(trim$(spass = trim$(

if suser = "admin" and spass = "123456" then

unload me

elseinterr = interr + 1

if interr > 3 then

msgbox "對不起，您不是本系統的合法使用者。 ", vbinformation, "技巧"

endelse

msgbox "使用者名稱或密碼不正確，請重新輸入", vbexclamation, "技巧"

if suser <>"admin" then= 0

len(else

0= len(

end if

end if

end if

end sub

private sub command2_click()endend sub

我引用asp中的乙個觀點，構建乙個使用者表，每個不同的使用者都有不同的許可權值，標誌許可權越小，許可權越大，那麼在呼叫資料或表單初始化時，如果這個表單的許可權值低於訪問使用者的許可權值，則無法訪問資料，或者無法呼叫表單！

將屬性新增到資料庫中的 user 表中，並暫時呼叫它"許可權"酒吧。 如果經理的使用者名稱是JL，密碼是PWD，許可權是1，那麼在登入時，應該根據使用者名稱和密碼確定許可權值，然後按照許可權值輸入不同的表單。

注意：許可權設定示例包括：經理---許可權：1 管理員---許可權：2....

就是這樣！

驗證標識後，控制項的可見屬性不是就結束了嗎？

為任何PHP頁面新增密碼保護，您需要輸入正確的密碼才能訪問它。

如下：adminkey="123";設定密碼

session_start();

if(@$post['password'] == $adminkey){

session['login'] = md5($adminkey);

if($_server['query_string'] == "logout"){

session['login'] = "";

header("location: " . server['php_self']);

exit();

html_login = <<

eof;if(@$session['login'] != md5($adminkey)){

exit($html_login);

新增要在此處顯示的內容文字或**。

您可以使用php session或cookie首次開啟和關閉瀏覽器，然後重新開啟瀏覽器，您需要輸入密碼才能訪問它，密碼為admin

session_start();

if(isset($_post['password']) post['password'] == 'admin')

if(!isset($_session['ok']))

輸入您的密碼以訪問此頁面。

我給你乙個主意。

製作乙個程式，迴圈瀏覽所有視窗，找到標題為“連線到”的視窗，找到使用者名稱輸入框，輸入使用者名稱，找到密碼框，輸入密碼，然後向視窗傳送回車鍵。

VB 或者如果是 VB，我就能解決它。