vb中连接数据库的方法，不用固定的控件，谢谢，给分

[jingxiaoxiang]

vb中连接数据库的方法，不用固定的控件，谢谢，给分

[_1_]

ADO
DAO
RDO

我只回这几种

[浩子]

先引用,后使用,ADO,DAO.

http://www.xygu.com

[szg_cj]

Const CnStr As String = "Driver=SQL Server;Server=(local);Database=Pub;UID=sa;PWD=i Am sa"
Dim rs As New ADODB.Recordset
rs.Open "select * from auhtors", CnStr

连SQL，要是别的换CNSTR

[liberte]

DAO RDO ADO

[of123]

VB中连接数据库实际上是依赖于数据库引擎（或叫驱动），实际上先程控件也是在数据库引擎基础上搭建的。
如果从头学，也不必改写旧程序，建议从ADO学起。
不过还是建议你先用ADODC，这样比较容易上手。

[RandomLife]

不用控件那你就得引用组件。

[tinafang]

我也觉得如果adodc用熟悉了以后，在使用ado对象好一些

[sgx]

dim cnnstr as string
dim cnn as adodb.connection
dim cmm as adodb.command
dim rst as adodb.recordset

cnnstr=连接字符串
set cnn=new adodb.connection
cnn.open cnnstr 用户名,密码

set cmm =new adodb.command
set cmm.activeconnection=cnn
cmm.commandtype=3

set rst=new adodb.recordset
rst.cursorlocation=
rst.cursortype=

rst.open tablename,cnn

......

[mouseanAnya]

of123，敲错字吧：
实际上先程控件也是在数据库引擎基础上搭建的。
－－－》
实际上现成控件也是在数据库引擎基础上搭建的。

不用固定控件就要引用支持的库文件
98 引用Microsoft ActiveX Data Objects 2.0 Library
2000 可引用Microsoft ActiveX Data Objects 2.5 Library

使用如楼上sgx所言

[souther]

dim cnn as new ADODB.Connection

1. 连接Visual Foxpro

cnn.ConnectionString = “PROVIDER=MSDASQL; DRIVER={Microsoft Visual Foxpro Driver};SourceDB=D:\data\;SourceType=DBF”

2．连接SQL Server
cnn.ConnectionString = “PROVIDER= MSDASQL;DRIVER={SQL Server};SERVER=servera;DATABASE=pubs;UID=sa;PWD=yyuui”

3. 连接Sybase数据库
cnn.ConnectionString="PROVIDER=MSDASQL;DRIVER={Sybase System 11};SRVR=serveru;DSN=;DB=dataa;UID=sa;PWD=dqwe;PERSIST SECURITY INFO=False"

4. 连接Oracle数据库
cnn.ConnectionString ="PROVIDER=MSDASQL;DRIVER={Microsoft ODBC for Oracle};SERVER=Webserver;DSN=;databasename=dataall;databasefile=d:\data\;UID=dba;PWD=killer"


cnn.Open