首先在vb6新增引用，微軟的ado的dll
然後在工程裡就可以進行資料庫的連線，遠端連線字串有多種。
private sub command1_click()
dim adoconntool as new adodb.connection
dim adorstool as new adodb.recordset
dim stradoconntool as string
stradoconntool = ""
'以下三種都可以
' stradoconntool = "provider=sqloledb.1;data source=202.202.172.59;database=new ;uid=sa;pwd=ok xz;"
stradoconntool = "provider=sqloledb;data source=202.202.172.59;database=new ;uid=sa;pwd=ok xz;"
' stradoconntool = "provider=sqloledb.1;persist security info=false;user id=sa;password=ok xz;initial catalog=new ;data source=202.202.172.59;"
strsql1 = "select id,username,password from tuser where id=1"
adoconntool.open stradoconntool
' adorstool.open strsql1, adoconntool, adopenstatic, adlockreadonly
adorstool.open strsql1, adoconntool, adopenforwardonly
' adorstool!username
dim strtotal as string
strtotal = ""
if adorstool.recordcount <> 0 then
msgbox "測試成功"
end if
adorstool.close
adoconntool.close
end sub
ADO遠端連線資料庫SQL sever
1首先要先遠端連線資料庫，必須得保證對方的資料庫允許遠端訪問配置正確。2要知道對方主機的本地ip位址，以及埠號，埠號是否存在對映。資料庫預設埠號為1433 特別需要注意，大部分連不上的原因在埠對映這，我連不上的原因也在這 在自己的電腦上開啟cmd ping 一下另一台電腦的ip，是否能ping通如 ...
ADO連線資料庫
2009 05 02 19 06 1.ado物件連線資料庫 建立乙個mfc對話方塊工程 stdafx.h中新增 import c program files common files system ado msado15.dll no namespace rename eof adoeof rena...
VB遠端連線資料庫字段設定
1 連線字串為 provider sqloledb.1 password 密碼 persist security info true user id 使用者名稱 initial catalog 資料庫名稱data source 遠端主機ip 2 1.引用ado 2.定義連線 dim conn as ...