VB連線SQL資料庫的方法

vb使用ado資料庫可以分為有源資料庫和無源資料庫，即是否使用了dsn資料來源，如下例：

1、在連線資料庫前首先要在vb選單中「工程」-「引用」從中選擇 microsoft activex data objects 2.6 library和 microsoft activex data objects recordset 2.6兩個元件，這是在連線資料前所必做的工作。

2、接下來定義ado的連線物件，如下所示：

set conn = new adodb.connection

set rs = new adodb.recordset

第一種方法採用的是無源的資料庫連線方法

conn.connectionstring = "driver=;server=jszx3-11;uid=sa;pwd=;database=wzc"

conn.connectiontimeout = 30

conn.open

rs.open "select 使用者名稱,密碼 from login where 使用者名稱='" & trim(combo1.text) & "' and 密碼='" & trim(text1.text) & "'", conn, adopenstatic, adlockreadonly, adcmdtext

if rs.eof = true and rs.bof then

m = msgbox("請重新登入", vbexclamation)

text1.text = ""

text1.setfocus

else

form1.hide

end if

rs.close

這是第二種方法連線資料庫的方法，這一種方法是採用有源的方法與資料庫連線的方法，**如下所示：

set conn = new adodb.connection

set rs = new adodb.recordset

conn.connectionstring = "dsn=login;uid=sa;pwd=;"

conn.connectiontimeout = 30

conn.open

rs.open "select 使用者名稱 from login", conn, adopenstatic, adlockreadonly, adcmdtext

dim i as string

for t = 0 to val(rs.recordcount) - 1

i = trim(rs.fields("使用者名稱").value)

rs.movenext

combo1.additem i

next t

rs.close

VB連線SQL資料庫的方法

vb使用ado資料庫可以分為有源資料庫和無源資料庫，即是否使用了dsn資料來源，如下例 1 在連線資料庫前首先要在vb選單中 工程 引用 從中選擇 microsoft activex data objects 2.6 library和 microsoft activex data objects r...

VB與資料庫 資料庫連線

話說學生管理系統和機房收費系統都完成了，再回來說資料庫的連線真的好嗎？貌似不太好，但是誰讓自己欠賬了呢 除了還，還能有更好的解決方法嗎？前幾天說 紅皮書 中的七個物件。當時的反應哪七個，腦子完全一片空白，不知所云。所以找出來，再看看吧。vb6.0與sqlserver有源資料庫連線，vb6.0中資料訪...

vb和資料庫連線

比較容易實現的用adodc控制元件吧 當然也可以用 實現 建議先看看下面的adodc控制元件的連線方式 private sub form load dim connstr as string dim sql as string connstr driver server 計算機名稱或ip地址 dat...

VB連線ORACLE資料庫

開啟資料庫 public sub openoradb on error goto toexit oradb open false set oradb new adodb.connection oraconstr provider oraoledb.oracle.1 password strorapw...

VB連線oracle資料庫

做個人用小工具，而不是頻繁交易的大專案，下面兩種連線都可以 各自需要相關驅動 注 還有其它連線方式，對比後放棄了。不需要安裝oracle客戶端。環境變數需要配置。public function getconndb as integer on error goto errflag getconndb ...