1. VB与Access连接的代码
提示什么错误？请说明
App是指当前应用程序，App.Path 指当前应用程序的路径。
如： 你的VB程序 XX.exe 放在 C:\VB 下，则App.Path就是"C:\VB"
你的数据库要放在这个下面才可以用 App.Path & " \data\学生信息管理数据库.mdb
即 "C:\VB\data\学生信息管理数据库.mdb"
2. 如何用vb连接access数据库(代码编写)
app.path是指程序的相对路径。可以防止你写绝对路径后，如你的电脑可能有G盘，而其他人的电脑里没有G盘，那你写的绝对路径就不可用，程序也就相对他来讲是处废品。app.path可获取到你正在运行的程序的路径，能存放你程序的路径，那他下面也就可以再存你的数据库（你可以在这目录下再新一个文件夹存数据库）
rs1.Open
sql,
cn
其中cn是连接对象，rs1是记录集，sql是查询语句
你都知道这三个变量的意思，这句话也应该不难理解。直接译出来
sql
=
"select
*
from
表名"
检索“表名”里的所有记录
rs1.close是关闭rs1.open语句的。
引号里的是字符串
加号是连接符，通加在不作加减运算时最好是用"&"代替。可防止出错。
如
a="123"+"456"
a的结果是"123456"
a="123"
&
"456"
a的结果还是"123456"
下面没有加引号是数值可以用作运算计算出结果。上面的是字符串不能运算出结果。
a=123+456
a的结果是579
a=123
&
456
a的结果还是123456
3. vb连接access数据库的代码这样写就行了吗
1、Adodc1.ConnectionString
=
"Provider=Microsoft.Jet.OLEDB.4.0;Data
Source="
&
App.Path
&
"\图书馆查询管理系统.mdb;Persist
Security
Info=False"
2、Adodc1.CursorLocation
=
adUseClient
3、Adodc1.CommandType
=
adCmdText
4、Adodc1.RecordSource
=
strSQL
5、Adodc1.Refresh
第一句：数据库链接对象，把Adodc与某一个文件链接起来，这其实是一个字符串。
第二句：设置或返回游标服务的位置
第三句：设置或返回一个或多个
CommandTypeEnum
值
第四句：这一句一般是用来设置SQL语句的，比如查询啊等等
第五句：刷新（因为你在上一句设置了SQL语句，所以要更新）
其中第二句和第三句你不必要理解，没什么用，一般都用这个值。
4. 怎样用VB代码连接ACCESS数据库不要使用SQL语言。
在新建VB工程之后先通过VB6的工程-引用菜单来引用这个外部组件
Mircosoft ActiveX Data Objects 2.5 Library
并把工程的启动对象设为Sub Main
模块代码：
Option Explicit
Public Conn As ADODB.Connection 'ADO的数据库连接对象
Public rs As ADODB.Recordset 'ADO的记录集对象
Public strDBFile As String
'# 不要忘了设置启动对象为Sub Main过程 #
Sub Main()
strDBFile = GetAppPath & "DB_Art.mdb" '这里设置你的ACCESS数据库文件名
Call ConnectDB(strDBFile)
frmMain.Show
End Sub
'# 获取当前相对路径 #
Public Function GetAppPath() As String
GetAppPath = App.Path & IIf(Len(App.Path) > 3, "\", "")
End Function
'# 数据库连接 #
Public Sub ConnectDB(ByVal strDBFile As String)
Set Conn = New ADODB.Connection
Conn.Open "PROVIDER=Microsoft.Jet.OLEDB.4.0;Data Source=" & strDBFile & ";"
End Sub
上面是个实例，自己看吧，不懂再问
5. 求VB登陆窗口连接ACCESS数据库的代码
1、DimobjCnAsNewConnection,objRsAsNewRecordset
objCn.ConnectionString="Provider=Microsoft.Jet.OLEDB.3.51;"&"DataSource="&App.Path&objCn.Open
2、dimobjCnAsConnection
SetobjCn=NewConnection
objCn.Open“DSN=实例2DSN”
3、ADOData控件创建连接
(5)access数据库连接vb代码扩展阅读
ACCESS数据库特性
1、access有强大的数据处理、统计分析能力，利用access的查询功能，可以方便地进行各类汇总、平均等统计。并可灵活设置统计的条件。
2、access用来开发软件，比如生产管理、销售管理、库存管理等各类企业管理软件，其最大的优点是：易学，非计算机专业的人员，也能学会。
3、在开发一些小型网站WEB应用程序时，用来存储数据。例如ASP+Access。这些应用程序都利用ASP技术在InternetInformationServices运行．比较复杂的WEB应用程序则使用PHP/MySQL或者ASP/MicrosoftSQLServer。
6. VB怎么连接访问Access数据库
使用Visual Basic作为前端开发语言，与SQL Server接口有几种常用的方法，即：
①数据访问对象/Jet
②为ODBC API编程
③使用SQL Server的Visual Basic库(VBSQL)为DB库的API编程
④RDO 远程数据对象(RemoteData Objects)
⑤ADO 数据对象(Active Data Objects)
1、数据访问对象/Jet
VB支持Data Access Objects(DAOs)的子集。DAO的方法虽然不是性能最好的管理客户机—服务器之间的对话方式，但它的确有许多优点。DAO/Jet是为了实现从VB访问Access数据库而开发的程序接口对象。使用DAOs访问SQL Server的过程如下：应用程序准备好语句并送至Jet，Jet引擎(MASJT200.DLL)优化查询，载入驱动程序管理器并与之通讯，驱动程序管理器(ODBC.DLL)通过调用驱动器(SQLSRVR.DLL)的函数，实现连接到数据源，翻译并向SQL Server提交SQL语句且返回结果。下面是一个用DAOs访问SQL Server的VB实例。
注释：Form Declarations
Dim mydb As Database
Dim mydynaset As Dynaset オ
Private Sub Form_Load()
Set mydb = OpenDatabase("", False, False, "ODBC; DSN=Myserver; WSID=LCL; DATABASE = sales")
Set mydynaset = mydb CreateDynaset("Select*from Customers") オ
End Sub ァ
上述例子是以非独占、非只读方式打开sales数据库，并检索Customers表中的所有字段。OpenDatabase函数的最后一个参数是ODBC连接字符串参数，它指明了Microsoft Access连接到SQL Server所需要知道的一些内容。其中“DSN”为数据源名，“WSID”为工作站名，“DATABASE”为所要访问的数据库名。
2、利用ODBC API编程
ODBC(Open Database Connectivity)的思想是访问异种数据库的一种可移植的方式。与数据资源对话的公用函数组装在一个称为驱动程序管理器(ODBC.DLL)的动态连接中。应用程序调用驱动程序管理器中的函数，而驱动程序管理器反过来通过驱动器(SQLSRVR.DLL)把它们送到服务器中。
下面的代码使用上面一些函数先登录到一个服务器数据库，并为随后的工作设置了语句句柄。
Global giHEnv As Long
Global giHDB As Long
Global giHStmt As Long
Dim myResult As integer
Dim myConnection As Srting
Dim myBuff As String*256
Dim myBufflen As Integer
If SQLAllocEnv(giHEnv)<>SQL_SUCCESS Then
MsgBox"Allocation couldn注释：t happen!"
End If
If SQLAllocConnect(giHEnv,giHDB)<>SQL_SUCCESS Then
MsgBox "SQL Server couldn注释：t connect!"
End If
myConnection="DSN=myServer;UID=LCL;PWD=;APP=ODBCTest;WSID=LCL;DATABASE=sales"
myResult=SQLDriverConnect(giHDB,Test,form1.hWnd,myConnection.len(myConnection),myBuff,256,myBufflen,SQL_DRIVER_COMPLETE_REQUIED)
myResult=SQLAllocStmt(giHDS,giHStmt)
myResult=SQLFreeStmt(giHStmt,SQL_COLSE)
rsSQL="Select * from Customers Where City = "Hunan""
myResult = SQLExecDirect(giHStmt,rsSQL,Len(rsSQL))
3、使用VBSQL对DB库API编程
DB库是SQL Server的本地API，SQL Server的Visual Basic库(VBSQL)为Visual Basic程序员提供API。从一定意义上说，VBSQL是连接Visual Basic程序到SQL Server的性能最好最直接的方式。VBSQL包含以下三个文件：
VBSQL.VBX： 包含库函数，具有访问重要的消息和处理错误的能力
7. vb连接access数据库代码详细解释
Public con As New Connection '定议Con
Public Con_String As String '定义连接字符串
Con_String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & "C:\Data.mdb;Persist Security Info=False" '这个是关健, 其中除了C:\data.mdb 外,其它的不用改. 用OLEDB 4.0 驱动去访问C:\data.mdb 文件.
con.Open Con_String ' 连接Access 文件