vb.net访问mdb vbnet adodb

vb.net2008中怎样调用资源文件中的MDB数据库

在此本人使用ADO对象访问ACCESS数据库，但ADO对象在使用前你先要进行添加，启动VB6后，单击菜单“工程-引用”，打开引用对话框，选择“Microsoft ActiveX Data Objects 2.0 Library”，将其勾选，（以2.0版本为例，实际可以选择系统中vb.net访问mdb的最高版本如本人的就是2.6版本），然后在当前目录下建立一个名为“学生”的ACCESS数据库，其中表名为“表”,字段共有：学号，姓名，年龄，性别四个字段，接下来就是设计界面了(自己设计)

现在介绍如何使用代码访问ACCESS数据库：

在代码窗口中编写一个返回字符型的函数

Function Connection() As String

'数据库的连接设置配置

Connection = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" App.Path + "\学生.mdb"

End Function

该函数用于连接数据库用

Private Form_Load()

Dim cnn As New ADODB.Connection

Dim Rst As New ADODB.Recordset

cnn.Open Connection

Set Rst = New ADODB.Recordset

Rst.Open "select * from 表", cnn, adOpenKeyset, adLockOptimistic

End Sub

注：

Dim cnn As New ADODB.Connection创建一个ADO数据库连接对象

Dim Rst As New ADODB.Recordset为创建一个ADO数据库记录对象

select * from 表 是SQL查询语言，这里为数据源，意思就是打开数据库“学生”中的表“表”

下面是将数据库表中的字段值显示出来的一个过程

Sub View()

Dim i As Integer

For i = 0 To 2

Text1(i) = Rst.Fields(i)'text1为控件数组

Next

If (Rst.Fields(3) = True) Then

Text1(3) = "男"

Else

Text1(3) = "女"

End If

End Sub

要访问ACCESS数据库就这样可以实现，访问SQL也差不多，稍有不同，回答完毕，如还有问题请继续和vb.net访问mdb我联系，本人是专使用VB+SQL/Delphi+SQL开发数据库管理系统的程序员。

vb.net 写入mdb数据库

1、首先vb.net访问mdb，vb.net访问mdb你得做一个oledbconnection对象vb.net访问mdb，这个对象有个连接字符串的属性，你需要设置

2、做一个oledbcommand对象，这个对象有个操作字符串（SQL语句）需要设置

3、打开oledbconnection对象

4、执行oledbcommand对象

5、关闭oledbconnection对象

程序结束，希望对你有帮助

vb.net连接access数据库问题

1vb.net访问mdb，使用ADO connection对象

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

代码完成如下vb.net访问mdb：

        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数据源

首先，打开电脑上vb.net访问mdb的ODBC数据源，建立关系。

步骤如下vb.net访问mdb：

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.net中如何查询MDB数据库的数据

以下是完整模块

Imports

System.Data

Imports

System.IO

Imports

System.Data.OleDb

Module

Module1

Public

cn

As

New

OleDb.OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data

Source="

Application.StartupPath

"\mdb数据库名字.mdb")

'定义连接

Public

DataBaseRST

As

Integer

'用来返回数据库执行结果

Public

Function

DataModify(ByVal

str

As

String)

As

Boolean

'进行数据库修改操作

Dim

cmdinsert

As

New

OleDbCommand

Try

cmdinsert.CommandText

=

str

cmdinsert.Connection

=

cn

If

cn.State

=

ConnectionState.Closed

Then

cn.Open()

DataBaseRST

=

cmdinsert.ExecuteNonQuery()

'用来返回执行的结果

cn.Close()

Return

True

Catch

ex

As

Exception

MessageBox.Show(Err.Description,

"Error",

MessageBoxButtons.OK,

MessageBoxIcon.Error)

Return

False

End

Try

End

Function

Public

Function

Search(ByVal

str

As

String,

ByVal

DGV

As

DataGridView)

As

Boolean

'查询

str---查询命令，DGV---DataGridView，用来显示数据的控件

Dim

tb

As

New

DataTable

Try

Dim

ap

As

New

OleDb.OleDbDataAdapter(str,

cn)

ap.Fill(tb)

DGV.DataSource

=

tb

Return

True

Catch

ex

As

Exception

MessageBox.Show(Err.Description,

"Error",

MessageBoxButtons.OK,

MessageBoxIcon.Error)

Return

False

End

Try

End

Function

End

Module

'以下是调用方法

DataModify("

insert

into

aa

values

('1','2')")'-------这里是数据库更新操作

Search("select

bb

from

aa",DataGridView1)'-----------这里是数据表查询操作

vb中怎么读取mdb中所有数据

VB读取Mdb数据库一个表的数据可使用ADO数据对象或ADO数据控件实现。

通过选择“工程”菜单中的“引用...”来为 ADO 对象库添加一个引用，然后在“引用...”对话框中选择 Microsoft ActiveX Data Objects 2.0 Library

点上图确定。工程就引用了ADO。

运行代码示例：

Private Sub Command1_Click()

  Dim cn As New ADODB.Connection '定义数据库的连接

  Dim rs As New ADODB.Recordset '声明一个 Recordset 对象变量

  Dim sql As String

  sql = "select * from jishijilu"

cn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" App.Path "\wd.mdb;Persist Security Info=False"

  cn.Open

  rs.CursorLocation = adUseClient

  rs.Open sql, cn, adOpenDynamic, adLockOptimistic

  Set DataGrid1.DataSource = rs

End Sub

怎么样在VB中打开.mdb数据库

1.首先在控件箱中添加“ADODC”和“DBGRID”2个控件.方法：右键点击控件箱，在弹出的菜单中左键单击“部件”，在部件选项卡中选择“Microsoft ADO Date Control 6.0(OLEDB)”和“Microsoft DataGrid Control 6.0(OLEDB)”复选框，然后“确定”。这样ADODC 和DATAGRID 控件就添加在控件箱中了。 2.然后在窗体上放置放置一个adodc控件，单击控件，在属性窗口点击“connectionstring”属性右侧的带…的按钮，选择“使用字符串（C）”选项，点击“生成”按钮，在弹出的“数据库链接属性”的“提供程序”选项卡中选择“Microsoft Jet 4.0 OLE DB Provider”，点击“下一步”，在“链接”选项卡中选择你的数据库，单击“测试链接”按钮，成功后单击“确定”按钮，则创建ADO Data控件的链接就成功了。在ADODC属性窗口点击“recordsource”右侧带…的按钮，选择“命令类型”为“2-adcmdtable”，设置一个表或存储过程名位记录源。在“表或存储过程名称”的下拉列表中选择你要显示的表，单击确定按钮。ADODC控件的属性设置完成。 3.在窗体上放置一个datagrid控件，单击控件，在属性窗口点击datasource，在右侧下拉菜单中选择adodc1，如果你的窗体上有多个数据源，这里下拉菜单中就会有多个选择。 4.右键单击datagrid控件，然后选择“检索字段（retrieve fields）命令，就会用数据源的记录集自动填充该控件。单击“属性”。使用“属性页”选项卡设置该控件的适当属性。 5.F5，这里就可以查看和修改了。 还有另外一种办法 在vb菜单栏点击“外接程序”，选择“可视化数据管理器”，在弹出的“可视化数据管理器”窗口visadata中选择“文件”“打开数据库”选择“microsoft access”命令打开你的数据库。你的数据库的大部分信息就会在新弹出的“数据库窗口”中显示了。窗口中有什么功能，自己去摸索吧，我还没完全搞清楚，只能给你讲这么多了。 打字真累啊！！

vb.net访问mdb的介绍就聊到这里吧，感谢你花时间阅读本站内容，更多关于vbnet adodb、vb.net访问mdb的信息别忘了在本站进行查找喔。