VB SQL 實現註冊功能

2025-02-20 08:50:29 字數 3066 閱讀 3864

1樓:網友

"研究所管理", sa", sa"

這裡,改為。

myconstring,"sa", sa"

2樓:網友

你資料來源設了沒。。。控制面板-管理工具-資料來源。

vb連線sql server2000資料庫,實現查詢功能

3樓:念雨靈

這個不是很簡單嗎,你那個登入後才顯示的窗體不要設為啟動窗體,只有在使用者名稱和密碼均正確時才呼叫這個方法"窗體名。show",至於那個窗體中文字框顯示使用者名稱,那就有很多種方式了,其一是建一公共模組,裡面設一全域性變數,將這個全域性變數賦值給那個文體框即可。

4樓:網友

在登陸窗體的登陸按鈕裡寫:

主介面。show

主介面。你用來填寫使用者名稱的。

unload me

就這樣了……

vb+sql實現系統登入

5樓:網友

問題看不大懂,你是說你要編寫乙個系統,不知道怎樣實現系統登陸嗎?

1.建立資料庫如aa--建表如b表(表中包含使用者,密碼列),在表中相應列填寫相應資料。

2.開啟vb--建立標準exe窗體,新增兩個text控制項,再新增兩個按鈕。分別是登陸和退出。新增部件找到 微軟ado控制項選擇上。再在窗體任意位置田間乙個ado控制項。

3.退出中寫 end ;右擊adodc控制項屬性,點生成,找到sql server再點下一步,選擇「使用windows nt整合安全設定」選項,在「在伺服器上選擇資料庫」下拉單中找到你建的資料庫aa,點選「測試連線」,成功後點確定。登陸按鈕的**如下:

if text1 = "" then

msgbox "請輸入使用者名稱"

exit sub

end if

if text2 = "" then

msgbox "請輸入密碼"

exit sub

end if

將使用者輸入賦值到變數中。

namekey = trim(combo1)

passwordkey = trim(

判斷使用者是否存在。

select * from aa where 使用者名稱 = '" + namekey + "'"

if = true then

msgbox "使用者名稱不存在"

try_times = try_times + 1

if try_times >= 3 then

msgbox "您已經三次嘗試進入本系統,均不成功,系統將關閉"

exit sub

elseexit sub

end if

end if

判斷密碼是否正確。

if passwordkey <>then

msgbox "密碼錯誤"

try_times = try_times + 1

if try_times >= 3 then

msgbox "您已經三次嘗試進入本系統,均不成功,系統將關閉"

exit sub

elseexit sub

end if

end if

關閉登入對話方塊。

unload me

form2是你的系統主介面。

要是一切無誤而提醒密碼錯誤的話,就修改aa表的密碼的字元型別或密碼位數。

6樓:網友

其實 你就乙個登陸的資料庫 包含使用者名稱和密碼。

那你在vb介面的寫呼叫語句就可以了。

vb中要如何實現sql連線

7樓:巴哥泡泡

dim conn as new

dim adonm as new

cnn = "driver=;" &

sqlserver &

uid=root;pwd=123456;option=3;autotranslate=false"

5= cnn

sqlstr = "set names gbk"

sqlstr, conn, adopenkeyset, adlockpessimistic

這是連線資料庫的例子。

8樓:網友

你跟我學,我是專門搞軟體的。

q:304690418,我就喜歡幫助人。

求乙個利用vb和sql的程式能實現如下功能 [email protected]

9樓:網友

這個問題有點大,你可以去找本vb的高階教程,一般都會有圖書館借閱或成績統計的程式例項,你可以借鑑。

10樓:網友

茁壯成長的意思通常是指植物在陽光的照耀下吮吸陽光的照射,一天乙個樣。不過通常比喻父母長輩們希望青少年兒童健康快來的成長。有時候是指人們盼。

vb該如何連線sql資料庫且實現查詢 刪除 增加 功能呢?

11樓:網友

首先必須引用工程-引用-microsoft activex data object library. 顯示就引用工程部件datagrid.

dim conn as

dim rs as

private sub form_load()dim strsql as string

set conn = new

provider=;data source=d:\銷售管理系統\庫\產品資訊。mdb(資料庫路徑);persist security info=false"

strsql = "select * from 產品資訊表"

set rs = new

aduseclient

strsql, conn, adopendynamic, adlockreadonly

set = rs

end sub

這需要寫的多哦,都不給點分。其他的你就去查點書嘛,上面也不好說。

12樓:網友

這個 比較不好說 有書麼。

vboptionbutton的功能實現問題

1.需設定預設狀態,即程式執行時按鈕的狀態及frame1,frame2的顯示狀態.否則剛執行時可能會與所需要的效果背道而馳.private sub form load optionbutton1.value trueframe1.visible true frame2.visible false e...

用java實現上傳功能

下面是我用過的一段 fileupload servlet搞的 diskfileitemfactory factory new diskfileitemfactory 為該請求建立一個diskfileitemfactory物件,通過它來解析請求。執行解析後,所有的表單專案都儲存在一個list中。fac...

智慧家居能實現什麼功能,智慧家居主要能實現什麼功能

1 假如你回家較晚,您可以通過手機輕鬆地開啟你的前廊燈。2 下班前你可以通過手機開啟家中的空調裝置,設定好適應的溫度。3 為了提高安全性和警惕性,當您進家前,可以使用使用 開啟室內所有燈光 功能。4 如果有小偷闖入你的房子,紅外報警探測器會發出警報,你可以看到通過監控攝像頭找到小偷的蹤跡。同時還可以...