1、objCnConnectionString=quotProvider=quotquotDataSource=quotAppPathobjCnOpen 2dimobjCnAsConnection SetobjCn=NewConnection objCnOpen“DSN=实例2DSN”3ADOData控件创建连接。

2、DAOJet是为了实现从VB访问Access数据库而开发的程序接口对象使用DAOs访问SQL Server的过程如下应用程序准备好语句并送至Jet，Jet引擎MASJT200DLL优化查询，载入驱动程序管理器并与之通讯，驱动程序管理器ODBCDLL。

3、有多种连接方式，可以用数据控件连接，也可以用组件连接下面是用ADO组件来连接的例子假定ACCESS数据库文件和程序是放在同一个文件夹的Private Sub Form_Click #39点击窗体运行Dim conn As Object， rs As ObjectSet。

4、打开，说明共享成功，才能调用代码连接，如果需要用户名和密码你要输入那台电脑的一组用户名和密码第四步在第三步成功的情况下，调用以下代码dim 数据库路径 as string dim 数据库密码 as string 数据库路径=quot。

5、ACCESS 表quotAdodc1Refresh #39这就是连接数据库字符串，要引用数据就该这么写 If Not Adodc1RecordSETEOF Then #39必须排除数据连接异常，不然查询数据时每次提示响应连接 Text1=Adodc1RecordSetFieldsquot字段。

6、先看下面的代码，可以成功的打开数据库Connopen quotProvider=Data Source=D\Mainmdbquot这句代码打开了D盘中的Mainmdb这个数据库ConnectionOpen方法的第一个参数是连接代码，它将传递给系统的。

7、它使用Microsoft ActiveX Data ObjectsADO创建到数据库的连接使用Adodc控件之前，要先将Adodc控件添加到控件工具箱中方法如下在VB 60种选择“工程”菜单，再点击“部件”菜单项，在弹出的“部件”对话框中选中“。

8、如果你想要对数据进行比较复杂的程序处理，那么可以使用ado对象来连接和查询数据库，里面有一个recordset对象，可以对查询的结果进行遍历，分析等对access数据库加密一般都是使用access软件实现吧我不清楚代码怎么实现，但是用。

9、代码连接access 首先 工程引用，在可引用的引用中将microsoft activex data objects 28 library和microsoft activex data objects recordset 28 library勾选 然后定义 Dim cn As New ADODBConnection Dim rs As New。

10、以下代码能使用的前提是库引用和数据库连接代码正确两种办法，一种是 用SQL，另一种是ADO 1用SQL添加数据insert into 表名字段1，字段2，字段3values值01，值02，值03例如docmdrunsqlquotinsert into。

11、如果你想要对数据进行比较复杂的程序处理，那么可以使用ADO对象来连接和查询数据库，里面有一个RecordSet对象，可以对查询的结果进行遍历，分析等对Access数据库加密一般都是使用Access软件实现吧我不清楚代码怎么实现，但是用。

12、一，准备工作1，建立新工程，保存到文件夹2，把ACCESS数据库文件**到上述文件夹3，在窗体上，添加一个ADODC控件和一个按钮4，在按钮的单击事件里编写程序程序代码如下#39连接数据库的三步曲Adodc1Connection。

13、vb只是一个编程语言，并不能建立数据库，建立access数据库要完全在access中进行前提条件必须安装微软access数据库步骤1找好要存放数据库的路径，如C盘data路径2路径下空白处点右键，新建Microsoft Access数据库。

14、使用ACCESS查询对象是无法一次运行多个SQL语句的，但是通过ACCESS VBA代码可以实现一次运行多个SQL语句下面是具体实现方案1新建一个ACCESS窗体，窗体添加一个命令按钮2编写按钮单击事件过程 Private Sub Command1_Click。

15、Private Sub Form_LoadcnOpen quotprovider=data source=quot + AppPath + quot\数据库名mdbquot + quotquotsql = quotselect * from 表名quotrs1Open sql， cn rs1MoveFirst Do While Not rs1。

16、如数据库的位置变化，直接更改代码显然容易一些 代码imports *引用命名空间* dim cnstr = quotprovider=，data source=Access数据库文件位置quot *定义连接字符串* dim。

17、1在VB界面选“工程”菜单－“部件”菜单项，系统打开“部件”对话框 选择2个 ADO 控件，即“Microsoft ADO Data Control 60”简称ADODC和“Microsoft DataGrid Control 60”这两个控件前者用来连接数据库。