当前位置:首页 » 数据仓库 » vb连接access数据库实例
扩展阅读
webinf下怎么引入js 2023-08-31 21:54:13
堡垒机怎么打开web 2023-08-31 21:54:11

vb连接access数据库实例

发布时间: 2023-06-11 17:10:44

‘壹’ 如何把Access与VB连接起来

在VB中,连接ACCESS数据库的方法主要有下面三种

a.Data Link文件

b.使用ODBC数据源名称

c.使用连接字符串

使用数据环境设计器创建数据库连接,首先添加环境引用。然后找到数据源进行连接。

Data 控件连接中,ODBC数据源的连接和使用字符串的连接 与直接使用ODBC数据源连接中,不同是,直接使用ODBC数据源设置好路径后,再用connection对象连接即可;Data控件则不用Connection 对象,有控件,设置好路径了,就直接连到啦。

数据环境设计器和ADO 对象,都用到了connection连接。不同的是,数据环境设计器中,connection连接途径是和data控件中字符串的连接步骤一致。

总结不同:ADO对象连接需要编写代码,其他的不用编写代码。

下面详细介绍每一种连接方法的详细步骤:

1.使用ADO connection对象

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

代码完成如下:



‘贰’ VB程序如何远程调用ACCESS数据库

第一步:你要知道那台电脑的计算机名或者ip地址;
第二步:共享数据库所在的文件夹,要将共享权限设置为能够读写的权限;
第三步:在你的电脑上运行一下那个共享路径:\\计算机名\
共享文件夹
,看能不能打开,如果能
打开,说明共享成功,才能调用代码连接,如果需要用户名和密码你要输入那台电脑的一组用户名和密码;
第四步:在第三步成功的情况下,调用以下代码:
dim
数据库路径
as
string
dim
数据库密码
as
string
数据库路径="\\计算机名\共享文件夹\数据库.mdb"
数据库密码=你的数据库密码(如果没设密码,就为空)
adodc1.ConnectionString="provider=Microsoft.Jet.OLEDB.4.0;Data
source
="
_
&
数据库路径0
&
";Jet
OLEDB:Database
Password="
&
数据库密码
adodc1.recordsource="select
*
from
user"
adodc1.Refresh

‘叁’ 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: 包含库函数,具有访问重要的消息和处理错误的能力

‘肆’ vb.net连接access数据库问题

1,使用ADO connection对象

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

代码完成如下:

<spanstyle="font-size:18px;">DimobjCnAsNewConnection,objRsAsNewRecordset
objCn.ConnectionString="Provider=Microsoft.Jet.OLEDB.3.51;"&"DataSource="&App.Path&"实例01.mdb"
objCn.Open
</span>


2,使用ODBC数据源

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

步骤如下:

1),打开电脑上的ODBC数据源

如下图所示:

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