vb点虐 连接access数据库问题

1，使用ADO connection对象

成都创新互联自2013年起，先为永登等服务建站，永登等地企业，进行企业商务咨询服务。为永登企业网站制作PC+手机+微官网三网同步一站式服务解决您的所有建站问题。

首先，要建立ADO引用，定义connection这个类，然后实例化对象。

代码完成如下：

span style="font-size:18px;"Dim objCn As New Connection, objRs As New Recordset        

objCn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.3.51;"  "Data Source="  App.Path  "\实例01.mdb"

objCn.Open  

/span

2，使用ODBC数据源

首先，打开电脑上的ODBC数据源，建立关系。

步骤如下：

1），打开电脑上的ODBC数据源

如下图所示：

         

2）点击添加

3）命名

4）和数据库源建立关系

5）用代码实现连接

span style="font-size:18px;"       

dim objCn As Connection  

Set objCn = New Connection  

objCn.Open "DSN=实例2DSN"  

/span

3、ADO Data 控件创建连接

1）右击data控件，选择ADODC属性

2）从三种连接资源中选择一种。

使用data Link 文件：直接点击浏览，找到包含连接字符串的.udl文件即可

使用ODBC数据源连接，单击新建

选择用户数据库，之后的操作跟2中步骤一样。

使用连接字符串：单击生成

测试连接

4、使用数据环境设计器创建数据库连接

添加引用

右击创建连接，在右击想要连接的属性，之后的操作跟data控件中使用字符串中的操作一致

vb点虐 使用模块连接数据库

你说这么一大篇全是业务逻辑，没说明你遇到的技术性问题在哪

点虐 自带的config文件来配置连接字符串，比ini好N倍，如果你非要用ini那么自己解决问题

检测是否能连接用Connection.Open加try catch就可以

vb点虐 的数据库怎么连接啊?

Dim

sqlConnection1

As

SqlClient.SqlConnection

　Dim

strConnect

As

String=”data

source=服务器名;initial

catalog=数据库名;user

id=sa;password=;”

sqlConnection1=New

System.Data.SqlClient.SqlConnection(strConnect)

　sqlConnection1.open

‘打开数据库

sqlConnection1.close

‘关闭连接，释放资源

1)连接Sql

Server数据库

Dim

odbcDbConnetion1

As

Microsoft.Data.OdbcConnection

　Dim

strConnect

As

Sting=”Driver={SQL

Server};Server=服务器名;Uid=sa;pwd=;Database=

数据库名;”

　odbcDbConnetion1=New

Microsoft.Data.OdbcConnection(strConnect)

vb点虐 链接数据库怎么出现链接不上请大神指点？

1、开始--》所有程序--》Microsoft Visual Studio 2008 R2--》配置工具--》SQL server配置管理器

2、然后打开配置管理器，查看图中的服务是否开启了。如果没有开启，就把相应的服务开启。

3、进行连接，此时已经已经不再报错了。

注意：第一步中的是sql server配置管理器而不是reporting service 配置管理器。

网页名称：vbnet数据库连接 vbnet访问数据库
网址分享：http://scgulin.cn/article/ddghdih.html