vb.net ADODB连接sqlserver

VB.NET中使用ADODB连接SQL Server数据库的方法如下：
1. 引用ADODB库：在项目中添加对ADODB库的引用。
2. 创建Connection对象：使用ADODB.Connection对象创建一个新的连接。
3. 设置ConnectionString属性：将连接字符串分配给ConnectionString属性。
4. 打开连接：使用Open方法打开连接。
5. 创建Recordset对象：使用ADODB.Recordset对象创建一个新的记录集。
6. 执行SQL语句：使用Execute方法执行SQL语句。
7. 关闭连接：使用Close方法关闭连接。

代码示例：

Dim cn As New ADODB.Connection
Dim rs As New ADODB.Recordset
Dim strCon As String

'设置连接字符串
strCon = "Provider=SQLOLEDB;Data Source=myServerAddress;" & _
         "Initial Catalog=myDataBase;User Id=myUsername;Password=myPassword;"

'打开连接
cn.Open strCon

'执行SQL语句
rs.Open "SELECT * FROM myTable", cn

'关闭连接
cn.Close

相关问题

vb6.0同时连接两个sql server数据库

在Visual Basic 6 (VB6) 中同时连接两个SQL Server数据库，你可以通过ADO（ActiveX Data Objects）组件来实现。以下是一个简单的步骤说明：

1. 添加引用：首先，你需要在工程资源管理器中添加对Microsoft DAO 和 ADO .NET 的引用，以便访问数据库。

2. 创建连接对象：对于每个数据库，分别创建`ADODB.Connection`对象。例如：

Dim conn1 As New ADODB.Connection
Dim conn2 As New ADODB.Connection

3. 设置连接字符串：为每个连接设置合适的`ConnectionString`属性，包含服务器地址、数据库名称、用户名和密码。例如：

conn1.ConnectionString = "Provider=SQLOLEDB;Data Source=<server1>;Initial Catalog=<database1>;User ID=<username1>;Password=<password1>"
conn2.ConnectionString = "Provider=SQLOLEDB;Data Source=<server2>;Initial Catalog=<database2>;User ID=<username2>;Password=<password2>"

4. 打开连接：调用`Open`方法打开连接：

conn1.Open
conn2.Open

5. 使用连接：现在你可以分别使用这两个连接对象执行查询或操作，如`Execute`、`Recordset`等。完成操作后别忘了关闭连接：

conn1.Close
conn2.Close