數(shù)據(jù)庫(kù)操作類(lèi)在網(wǎng)上一搜一大把,我這并不比那些好,只是是自己寫(xiě)的,用著更習(xí)慣。所以我這個(gè)類(lèi)沒(méi)有什么特別的地方,只是自己用著習(xí)慣罷了,至于效率等方面,歡迎賜教!!
程序代碼:
以下為引用的內(nèi)容:
<%
Class dbClass
'-------------------------------------------------------------------------
'變量說(shuō)明
'conn-----------connection對(duì)象
'strsql---------執(zhí)行查詢(xún)的語(yǔ)句
'vTbName--------查詢(xún)分頁(yè)的表名
'vPKey----------查詢(xún)分頁(yè)的表的主鍵
'vPgFields------查詢(xún)分頁(yè)要顯示的字段
'vPgSize--------查詢(xún)分頁(yè)每頁(yè)顯示的記錄數(shù)
'vCurrPg--------查詢(xún)分頁(yè)顯示的當(dāng)前頁(yè)
'vConditions----查詢(xún)分頁(yè)的條件
'vOrderBy-------查詢(xún)分頁(yè)的排序
'-------------------------------------------------------------------------
private conn,strsql,vTbName,vPKey,vPgFields,vPgSize,vCurrPg,vConditions,vOrderBy
'類(lèi)的初始化
private Sub Class_Initialize()
'當(dāng)是MS Sql數(shù)據(jù)庫(kù)時(shí)設(shè)置以下兩個(gè)變量
'dim dbServer '數(shù)據(jù)庫(kù)服務(wù)器的名稱(chēng)或ip地址
'dim dbname '數(shù)據(jù)庫(kù)的名字
dim dbPath '若是Access數(shù)據(jù)庫(kù),此處設(shè)置其路徑
dim dbUser '數(shù)據(jù)庫(kù)的登錄用戶(hù)名
dim dbPass '數(shù)據(jù)庫(kù)的登錄密碼
dim connstr
dbPath = "/testasp/data/data.mdb" '設(shè)置數(shù)據(jù)庫(kù)路徑
dbUser = "admin"
dbPass = "123456"
'若是access,并且有密碼
connstr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(dbPath) &_
";User ID=" & dbUser & ";Password=;Jet OLEDB:Database Password=" & dbPass
'若是access,并且沒(méi)有密碼
'connstr = "Provider = Microsoft.Jet.OLEDB.4.0;Data Source = " & Server.MapPath(dbPath)
'若是ms-sql數(shù)據(jù)庫(kù)
'connstr = "Provider = Sqloledb; User ID = " & dbUser & "; Password = " & dbPass &_
' "; Initial Catalog = " & dbname & "; Data Source = " & dbServer
on error resume next
本新聞共
5頁(yè),當(dāng)前在第
1頁(yè)
1 2 3 4 5