VB操作SQL Server（一）——如何连接数据库

plantegg

在我们的初期学习中，VB与SQL Server都是不可缺少的，那么，如何用VB来连接数据库？今天，我们就来解决这个不是问题的问题：


1.使用ADO（ActiveX Data Objec，ActiveX数据对象）连接SQL
Server


1）使用ADO控件连接
使用ADO控件的ConnectionString属性就可以连接SQL
Server，该属性包含一个由分号分隔的argument=value语句的字符串，用于指定建立与数据源连接的信息，语法如下：



Provider=Drive;Password=UserPassword;PersistSecurity Info=False;User ID=UserName;Initial Catalog=Data Name;DataSource=ServerName

　　
例：使用ADO控件连接名为student的数据库



PrivateSub Form_Load()
Adodc1.connectionstring="Provider=SQLOLEDB.1;Password=;PersistSecurity Info=False;User ID=sa;Initial Catalog=student;Data Source=."
End Sub


　　
2）使用ADO对象连接
ADO的数据库访问技术，不仅可以通过VB提供的控件实现，还可以通过ADO相关的对象实现。ADO对象包括了command对象、connection对象、recordset对象、Error对象、field对象、parameter对象、property对象，其中，connection对象是用来管理与数据库的连接的


例：使用connection对象的Open方法连接名为student的数据库



Dim cnn as ADODB.Connection
Privatesub Form_Load()
set cnn=New ADODB.Connection
Cnn.open="provider=SQLOLEDB;password=;PersistSecurity Info=true;User ID=sa;Initial Catalog=student;Data Source=."
End Sub


　　
2.使用DAO（Data
Access Object，数据访问对象)连接SQL Server
使用DAO连接SQL
Server可以使用VB提供的Data控件实现，使用其访问SQL
Server时需要掌握connect属性用于定义所要连接数据库的类型，由于Data控件采用的是Access/Jet为数据引擎，所以访问SQL
Server时需要用ODBC间接访问
connect属性访问ODBC时的字符串格式设置：


ODBC；DataBase=DataName；UID=UserName；PWD-UserPassword；DSN=DataSourceName


　　
例：用Data控件通过ODBC中的studentinfo数据源连接名为student的数据库



PrivateSub Form_Load()
Data1.connect="ODBC;DataBase=student;UID=sa;PWD=123;DSN=studentinfo"
End Sub


　　

上面的方法都适用于与VB操作SQL Server，这些可能相较于Deplin或者ASP与数据库的连接较为简单，但是在初期学习中，只要掌握好这些连接方法，便游刃有余。