如何打开MDB文件
我需要打开一个压缩文件下的MDB文件,并且在网上下载了ASSESS(是一个压缩的文件,解压后就有ASSESS界面,但在程序里找不到),但MDB文件打开后仍是乱码。该怎么操...
我需要打开一个压缩文件下的MDB文件,并且在网上下载了ASSESS(是一个压缩的文件,解压后就有ASSESS界面,但在程序里找不到),但MDB文件打开后仍是乱码。该怎么操作?请详细的解说每一步,本人电脑知识不太好。
展开
展开全部
在此本人使用ADO对象访问ACCESS数据库,但ADO对象在使用前你先要进行添加,启动VB6后,单击菜单“工程-引用”,打开引用对话框,选择“Microsoft
ActiveX
Data
Objects
2.0
Library”,将其勾选,(以2.0版本为例,实际可以选择系统中的最高版本如本人的就是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+SQL/Delphi+SQL开发数据库管理系统的程序员。
别忘了采纳我的回答,谢谢!
ActiveX
Data
Objects
2.0
Library”,将其勾选,(以2.0版本为例,实际可以选择系统中的最高版本如本人的就是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+SQL/Delphi+SQL开发数据库管理系统的程序员。
别忘了采纳我的回答,谢谢!
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
mdb是一种数据库文件,一般需要安装access才能查看和编辑,有了这款工具就免去了安装这个组件的麻烦了,软件支持mdb文件的查看、编辑、查询、搜索等操作,还支持使用快捷键操作,导入数据库后还可以将其导出保存为csv表格格式。
MDB Viewer Plus汉化版:网页链接
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐于2017-11-26
展开全部
MDB是数据库文件,用Microsoft Access 可以打开的,不过既然你没有安装Microsoft 办公套件,只安装了WPS 的话,可能打开不了吧,你可以使用专业的数据库浏览器打开这个文件也是可以的,目前最专业强大的莫过于站长们经常使用到的 辅臣数据库浏览器 了,是杭州辅臣信息技术研究所开发的绿色软件,不需安装,直接运行,没有任何时间、功能限制,完全免费使用,小小软件,只有43K,功能却非常强大,可直接连接数据库进行查询,能浏览常用数据库文件(*.mdb,*.xls) ,下载地址:
http://dl-sh-ocn-1.pchome.net/09/rh/DatabaseBrowser.zip
http://dl-sh-ocn-1.pchome.net/09/rh/DatabaseBrowser.zip
本回答被网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询
广告 您可能关注的内容 |