VB通過ADO連線SQL資料的兩種方法

2022-03-22 01:03:01 字數 1469 閱讀 3003

其實第一種是不用odbc聯絡資料庫,第二種是使用odbc連線資料庫

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

連線資料庫的方法很多很多,只要各位去勇敢的償試一下,就可以感覺資料庫的方法並不是很難,本人以前也很想做這方法的工作,只是學識不深,未能完成胸中大志,如今對這些方法的多少有一些了解,特意為那些初學者以供學習之用。

MFC通過ADO連線 SQL 2005

1 新建乙個類,型別為generic class,名稱為cdatabase 2 新增匯入檔案 import c program files common files system ado msado15.dll no namespace rename eof adoeof rename bof ad...

MFC通過ADO技術連線Access資料步驟

如果想一步一步看懂的話,請按照步驟看,如果急著用的話,後面有示例完整 另外,我這裡用了ace 12.0,連線的是2013版本access資料庫,其實還有一種方法是jet 4.0,具體的看我另外一篇。1 使用 import 語句匯入dll檔案,將以下語句放入stdafx.h檔案中,一般是這個路徑 im...

VB6 ado遠端連線資料庫 sql2005

首先在vb6新增引用,微軟的ado的dll 然後在工程裡就可以進行資料庫的連線,遠端連線字串有多種。private sub command1 click dim adoconntool as new adodb.connection dim adorstool as new adodb.record...