用元件封裝資料庫操作 二

2022-03-02 05:12:43 字數 1721 閱讀 1214

前段日子發表的文章,資料庫的連線**可以直接在asp檔案中顯示出來。這次又進行了一次封裝。

開啟vb,新建activex控制項,工程名稱為webdb,類模組名稱為getinfomation

引用」microsoft activex data object 2.6 library 」

private conn as adodb.connection

private rs as adodb.recordset

『作用:判斷資料庫是否正確鏈結

'自己可以更改連線串

public function getconn()

conn.open "provider=sqloledb.1;persist security info=false;user id=sa;initial catalog=northwind;data source=yang"

if err.number <> 0 then

getconn = false

else

getconn = true

end if

end function

『根據輸入的雇員id,得到雇員的名稱

public function getemployeename(stremployeeid as integer) as string

dim strsql as string

set rs = new adodb.recordset

strsql = "select lastname+firstname from employees where employeeid=" & stremployeeid

rs.open strsql, conn, adopenstatic, adlockoptimistic

if rs.eof then

getemployeename = ""

else

getemployeename = rs.fields(0)

end if

rs.close

end function

『返回所有的雇員列表

public function getemployeelist() as adodb.recordset

dim strsql as string

set rs = new adodb.recordset

strsql = "select employeeid,lastname,firstname,title,titleofcourtesy,birthdate,hiredate,address,city from employees"

rs.cursorlocation = aduseclient

rs.open strsql, conn, adopenstatic

set getemployeelist = rs

'rs.close

end function

我們進行測試

新建asp頁面,」testwebdb1.asp」。主要用來測試getemployeelist()方法

一些想法:資料庫鏈結如果放到元件裡,如果要修改資料庫鏈結,則要重新編譯元件,可能會由此引發一些問題(但是推薦這種,畢竟資料庫名和伺服器名不會經常改)

如果資料庫鏈結放到asp頁面,可以通過屬性傳值到元件中,但是安全性會降低。

真是……

好了,這篇文章結束了,希望對大家有幫助

今後的話題便是如何實現asptodll這個軟體的功能,我們一步一步實現。

資料庫操作封裝 ExecuteNonQuery

只執行語句,沒有返回值,適用於 insert,update,delete msdn對executenonquery 的詳細解釋 您可以使用 executenonquery 執行目錄操作。例如,您可以使用它來查詢資料庫的結構或者建立資料庫物件 例如表 還可以通過執行 update insert 或 d...

linq 資料庫操作封裝

using system using system.collections.generic using system.linq using system.text using crm.model using system.configuration using system.linq.express...

JAVA 資料庫操作封裝(2)

相關資料 function executeupdate throws sqlexception public void executebatch throws sqlexception function addbatch param value string throws sqlexception ...