怎样在VB中进行sql server的连接呢？

Question

怎样在VB中设置sql server的驱动呢？我进行数据库连接的时候提示：Data Source Name Not Found and no default driver specified

Answer 1

用ADO啊。
CONNECTSTRING设置好ODBC OLE就行了啊

Answer 2

Dim cn As New ADODB.Connection
Dim rs As New ADODB.Recordset
cn.ConnectionTimeout = 100
cn.Open "Driver={SQL Server};Server=localhost;Database=test;Uid=sa;Pwd=oo;"
rs.Open "select * from student", cn, adOpenDynamic, adLockPessimistic
MsgBox rs("xh")

Answer 3

在工程引用里添加Microsoft ActiveX Data Objects 2.0 library就可以用上面的代码连了
SA为用户名,oo为密码,test为数据库名

Answer 4

工程---引用---microsoft active data object 2.xdim cnn as adodb.Connection
dim rs as adodb.recordsetcnn="Provider =SQLOLEDB.1; Persist Security Info =False; 
User ID = 登录名; Password = 密码; Initial Catalog = 
数据库名;Data Source = 数据源名"。