推薦：Access通用-自動(dòng)替換數(shù)據(jù)庫中的字符串
自己可以修改myreplace函數(shù),實(shí)現(xiàn)復(fù)雜的替換.呵呵,好象用處不大.主要是看看如何讀取access表和字段列表 % '#################################### '替換數(shù)據(jù)庫內(nèi)容 lamking 2005-8-22 'http://www.lamking.com QQ:628557 '###################################

ADO數(shù)據(jù)對(duì)象用來連接數(shù)據(jù)庫的方式有兩種,分別是ODBC和OLE DB方式

(一) 使用OLE DB方式
********************************************************
*** OLE DB Provider for Microsoft Jet
********************************************************
Dim oConn,strConn
Set oConn=Server.CreateObject("ADODB.Connection")
StrConn= "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=c:\somepath\myDb.mdb;" & _
"User Id=admin;" & _
"Password=;"
oConn.Open strConn

********************************************************
*** OLE DB Provider for ODBC Databases
********************************************************
訪問MS Access數(shù)據(jù)庫
Dim oConn,strConn
Set oConn=Server.CreateObject("ADODB.Connection")
StrConn= "Provider=MSDASQL;" & _
"Driver={Microsoft Access Driver (*.mdb)};" & _
"Dbq=c:\somepath\mydb.mdb;" & _
"Uid=myUsername;" & _
"Pwd=myPassword;"
oConn.Open strConn

(二) 使用ODBC方式
********************************************************
*** ODBC Driver for Access
********************************************************
Dim oConn,strConn
Set oConn=Server.CreateObject("ADODB.Connection")
StrConn= "Driver={Microsoft Access Driver (*.mdb)};" & _
"Dbq="&Server.MapPath("Testdb.mdb"); & _
"Uid=AdminAccount;" & _
"Pwd=Password;"
oConn.Open strConn

分享：Access隨機(jī)顯示不重復(fù)記錄
看了很多人討論關(guān)于access隨機(jī)取記錄的帖子，不才,寫了一個(gè)隨機(jī)顯示記錄的解決方法,希望大家指正。數(shù)據(jù)庫里有5條記錄，隨機(jī)抽取4條。 code -------------------------------------- % '-------------------------數(shù)據(jù)庫連接----------------------- Set objCo