當前位置:首頁 » 密碼管理 » vb修改資料庫密碼是什麼意思

vb修改資料庫密碼是什麼意思

發布時間: 2024-11-22 12:16:12

Ⅰ 急求一個VB程序代碼,實現資料庫內容的查詢,修改,新增,刪除

'點擊工程(P)--引用(N)--選擇 "Microsoft DAO2.5/3.5 compatibility Library" 打鉤確定。
Dim D As Database, T As TableDef, R As Recordset
Private Sub Command1_Click() '創建資料庫
Set D = CreateDatabase("D:\資料庫名稱.mdb", dbLangGeneral, dbEncrypt) '創建資料庫對象(dbEncrypt=加密)
D.NewPassword "", "123456" '資料庫密碼設置為123456
'建立設置數據表
Set T = D.CreateTableDef("數據表名稱") '數據表名稱:
T.Fields.Append T.CreateField("項目一", dbMemo) 'TEXT1內容
T.Fields.Append T.CreateField("項目二", dbMemo) 'TEXT2內容
D.TableDefs.Append T '將數據表添加到資料庫中
D.Close '關閉資料庫
End Sub
Private Sub Command2_Click() '查詢
Dim T1 As Boolean '判斷查詢數據是否存在參數
Set D = OpenDatabase("D:\資料庫名稱.mdb", True, False, ";pwd=123456") '需要查詢的資料庫名稱,格式,允許修改,資料庫密碼
Set R = d1.OpenRecordset("Select * From 數據表名稱") '數據表名稱:
R.MoveFirst '記錄移到第一條記錄
Do While (R.EOF = False) '如果記錄已經是最後一條就退出循環
If R.Fields("項目一") = Text1.Text Then '判斷項目一是否等於文本TEXT1內容
Text2.Text = R.Fields("項目二") '如果存在TEXT2文本框就引入記錄內容
T1 = True '作於下面判斷記錄已經存在的條件
Exit Do '記錄已經查到,可以退出循環查詢比較
End If
R.MoveNext '如果本條記錄不符合要就就記錄移到下一條記錄
Loop
If T1 = False Then MsgBox "您查詢的結果不存在" '這里使用到了參數 T1 作為判斷是否存在記錄
D.Close '關閉資料庫
End Sub
Private Sub Command32_Click() '新數據錄入
Set D = OpenDatabase("D:\資料庫名稱.mdb", True, False, ";pwd=123456") '需要查詢的資料庫名稱,格式,允許修改,資料庫密碼
Set R = D.OpenRecordset("Select * From 數據表名稱")
R.AddNew '增加一條新記錄
R.Fields("項目一") = 1 'TEXT1新記錄內容
R.Fields("項目二") = "個VB程序代碼,實現資料庫內容的查詢,修改,新增,刪除" 'TEXT2新記錄內容
R.Update '保存記錄
D.Close '關閉資料庫
End Sub
Private Sub Command4_Click() '修改
Set D = OpenDatabase("D:\資料庫名稱.mdb", True, False, ";pwd=123456") '需要查詢的資料庫名稱,格式,允許修改,資料庫密碼
Set R = D.OpenRecordset("Select * From 數據表名稱")
R.Edit '修改記錄 (注意 在程序中你根據需要條件將記錄移到你需要修改的位置才進行修改)
R.Fields("項目一") = Text1.Text 'TEXT1記錄內容修改
R.Fields("項目二") = Text2.Text 'TEXT2記錄內容修改
R.Update '保存記錄
D.Close '關閉資料庫
End Sub
Private Sub Command5_Click() '刪除
Set D = OpenDatabase("D:\資料庫名稱.mdb", True, False, ";pwd=123456") '需要查詢的資料庫名稱,格式,允許修改,資料庫密碼
Set R = D.OpenRecordset("Select * From 數據表名稱")
'

Data1.Recordset.Delete '刪除該條記錄 ,(注意 在程序中你根據需要條件將記錄移到你需要刪除的位置才進行刪除)
D.Close '關閉資料庫
End Sub
'我今晚使用的電腦沒有安裝VB企業版,未經測試,如有疑問星期一上班有時間再回復。

Ⅱ VB 程序中 如果 進行了 SQL 資料庫 讀寫操作,如果防止資料庫存密碼泄露

這個對應第二條啊…

1。對於資料庫存儲密碼,你可以先對密碼進行MD5或SHA-512等的hash函數加密,然後再進行存儲…
2。對於資料庫自己的密碼,沒辦法防止,只能讓用戶自己輸入(就是第一次登錄讓用戶輸入密碼,然後把資料庫密碼設置成用戶輸入的密碼,以後登錄讓用戶自己輸入密碼,然後把密碼存入一個變數,用它去連接資料庫),然後看能不能連上資料庫就好了…

你可以對資料庫用戶許可權進行設置,先新建幾個用戶,然後用比如grand的SQL語句來調配它們的許可權,最後按需登錄就好了。
不論用什麼方法只要你存放了讀出明文的方法就不可能不被攻破,所以只能設置資料庫用戶許可權……
這實際是把安全移交給資料庫了,只要資料庫足夠安全就沒問題…

熱點內容
壓縮營養品 發布:2024-11-22 18:17:57 瀏覽:221
網簽備案查詢的密碼在哪裡 發布:2024-11-22 18:17:20 瀏覽:251
怎麼改郵政網銀密碼 發布:2024-11-22 18:06:24 瀏覽:354
壓縮機不製冷 發布:2024-11-22 17:57:45 瀏覽:429
linux面試題及答案100 發布:2024-11-22 17:56:06 瀏覽:17
密碼門卡如何用nfc 發布:2024-11-22 17:45:11 瀏覽:138
linux開啟snmp 發布:2024-11-22 17:40:51 瀏覽:939
js檢測手機訪問 發布:2024-11-22 17:25:08 瀏覽:799
ftp伺服器上傳不了文件怎麼辦 發布:2024-11-22 17:24:19 瀏覽:260
資料庫改售價 發布:2024-11-22 17:19:54 瀏覽:998