Access数据库,mde文件用vb怎样访问?
感觉mdb不够安全,做成mde数据库并设置密码,可是怎样用程序连接mde那?请给段程序
感觉mdb不够安全,做成mde数据库并设置密码,可是怎样用程序连接mde那?请给段程序
解决方案 »
- VB6一启动都要创建一个新工程,每次都要关掉太麻烦。
- vb mscomm控件output发送数据出错的问题!急急急!!!!
- VB连接MySQL,中文乱码求助。
- 老问题 MSHFlexGrid 控件在那下
- 菜鸟求助:制作软键盘实现输入中文的功能!
- 神呢!救救我吧!
- 【CSDN】【请问没有小数位的大于20位的数用什么数据类型,不能有误差,因为要进行比较】
- 在VB中如何实现访问网上邻居上另一台电脑上的数据库
- 为什么只能读取数据,却不能写入数据!(VB+SQLSERVER)
- picturebox加载图片是总失真(如图),有什么解决办法吗?
- 百分比如何转换为小数?
- winsock传输怎样把接收的一个文件中最后用做标识的字符除去
引用MSADO2.0 Library,2.5Library
Option Explicit
Private conn As ADODB.Connection
Private rs As ADODB.Recordset
Private Sub Command1_Click()
Dim dbfilename As String
Dim strsql As String
Dim ConnectString As String
'define DB's constants
dbfilename = "C:\test\test.mdb"
strsql = "select * from CZ"
ConnectString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & dbfilename & ";Persist Security Info=False;" 'setting ADO's object
Set conn = New ADODB.Connection
conn.Open ConnectString
conn.CursorLocation = adUseClient
Set rs = New ADODB.Recordset
rs.Open strsql, conn, adOpenDynamic, adLockPessimistic
If rs.EOF Then
Exit Sub
End If
End Sub
我的数据库位于C:\test\test.mdb,表名叫CZ。
此时结果集rs中已经有了记录,希望能帮上你的忙。
conn.close
最后再加上
rs.Close
Set rs = Nothing
conn.Close
Set conn = Nothing
如果对mdb进行安全方面的控制时,会产生mde文件
还是要通过mdb来访问
在访问mdb时出现的mde文件,不是临时文件吗,可以通过mde访问吗,期待能解决.