推薦：ASP轉(zhuǎn)ACCESS為SQL數(shù)據(jù)庫(kù)連接
其實(shí)兩者基本通用 步驟很簡(jiǎn)單3步： 1，轉(zhuǎn)化MDB數(shù)據(jù)庫(kù)到SQL SQL工具里就有 2, 更改數(shù)據(jù)庫(kù)鏈接字串 以下為代碼: 以下為引用的內(nèi)容： Set Co

大家都知道，數(shù)據(jù)庫(kù)的安全性是很重要的，它直接影響到數(shù)據(jù)庫(kù)的廣泛應(yīng)用。用戶可以采用任意一種方法來(lái)保護(hù)數(shù)據(jù)庫(kù)應(yīng)用程序，也可以將幾種方法結(jié)合起來(lái)使用。利用Access數(shù)據(jù)庫(kù)自身提供的加密功能及其他保護(hù)方法是很容易的，我就不多說(shuō)了。在Access數(shù)據(jù)庫(kù)中，嵌入了一種很強(qiáng)的數(shù)據(jù)庫(kù)操作語(yǔ)言——VisualBasic語(yǔ)言，所以可以采用VisualBasic編寫(xiě)程序，來(lái)實(shí)現(xiàn)一些復(fù)雜的功能。下面將介紹如何在VisualBasic程序中實(shí)現(xiàn)加密功能，以確保數(shù)據(jù)的安全性。
　　----對(duì)于一些公司來(lái)說(shuō)，職員的工資管理是一個(gè)不大不小的問(wèn)題。有時(shí)，領(lǐng)導(dǎo)需要了解一段時(shí)間內(nèi)每個(gè)職員的收入如何，以便掌握各項(xiàng)獎(jiǎng)金的發(fā)放情況。為此，我設(shè)計(jì)了一個(gè)“工資管理”數(shù)據(jù)庫(kù)，可以按時(shí)間進(jìn)行查詢，并根據(jù)所選的工資類別進(jìn)行統(tǒng)計(jì)。為了防止其他人查看此數(shù)據(jù)庫(kù)，我采用“獨(dú)占”方式給數(shù)據(jù)庫(kù)設(shè)置了密碼。這種方法也有一定的局限性，如果用戶恰巧提供了正確的數(shù)據(jù)庫(kù)密碼，該方法就不能控制用戶對(duì)數(shù)據(jù)庫(kù)進(jìn)行操作。

　　----為了進(jìn)一步防止職員查看工資的統(tǒng)計(jì)結(jié)果（即有些獎(jiǎng)金并不是公開(kāi)的，除領(lǐng)導(dǎo)以外的其他人不應(yīng)該知道工資數(shù)目），我又創(chuàng)建了一個(gè)密碼表，設(shè)置好密碼，記住并將其隱藏起來(lái)（先選中“密碼表”，再單擊“窗口”菜單中的“隱藏”命令，即可把此表隱藏起來(lái)）。然后，在“職工工資對(duì)話框”窗體中，添加“密碼”文本框，并在“預(yù)覽”及“打印”的事件過(guò)程中加入下列語(yǔ)句：

DoCmd.ApplyFilter , "密碼 = Forms!
　　職工工資對(duì)話框!PassText"
　　If Not IsNull([密碼]) Then
　　/*其他代碼*/
　　Else
　　MsgBox "請(qǐng)輸入正確的密碼！"
　　PassText.SetFocus
　　End If
　　/*其他代碼*/

　　這樣,就實(shí)現(xiàn)了雙重加密功能。即使用戶能進(jìn)入數(shù)據(jù)庫(kù),如果第二次沒(méi)有提供正確的密碼,他也不能預(yù)覽和打印一定時(shí)間范圍的統(tǒng)計(jì)結(jié)果。這就進(jìn)一步限制了用戶的非授權(quán)訪問(wèn)。
　　----為了提高數(shù)據(jù)庫(kù)的安全性,每隔一段時(shí)間都應(yīng)更改密碼。為此,在“職工工資對(duì)話框”窗體中,我又添加了一個(gè)“更改密碼”子窗體,在此窗體中加入下列代碼,即可隨時(shí)更改密

Private Sub確定_Click()
　　On Error GoTo Err_確定_Click
　　DoCmd.ApplyFilter , "密碼
　　= Forms!更改密碼!Text1"
　　If IsNull([密碼]) Then
　　MsgBox ("密碼不正確，
　　請(qǐng)?jiān)佥斎胍淮?quot;)
　　Text1.SetFocus
　　GoTo Exit_確定_Click:
　　End If
　　If Text3.Value < > Text2.Value Then
　　Text3.SetFocus
　　MsgBox ("請(qǐng)輸入正確的確認(rèn)密碼")
　　Else:
　　密碼 = Text3.Value
　　DoCmd.Close
　　End If
　　Exit_確定_Click:
　　Exit Sub
　　Err_確定_Click:
　　MsgBox Err.Description
　　Resume Exit_確定_Click
　　End Sub
　　更改密碼后，應(yīng)記住此密碼，以備以后使用。
　　----設(shè)計(jì)好程序，并將有關(guān)代碼隱藏起來(lái)（與隱藏“表”的方法相同），以防其他人修改或偷看。這里介紹的方法只是在程序中實(shí)現(xiàn)加密功能的一個(gè)小技巧，在其他數(shù)據(jù)庫(kù)管理中，也可采用此方法進(jìn)行加密。也許存在更為簡(jiǎn)潔的方法，有待大家在編程過(guò)程中發(fā)掘出來(lái)并互相交流。

分享：ASP顯示ACCESS數(shù)據(jù)庫(kù)的GIF圖象
寫(xiě)入： 1:把gif圖像文件讀入內(nèi)存（一個(gè)變量strTemp）。 2:寫(xiě)入數(shù)據(jù)庫(kù)。 以下為引用的內(nèi)容： 　Dim binTmp() As Byte 　Dim conn As ADODB