如何用VB代码给ACCESS文件设置数据库密码?

jhliuguiping 2004-09-02 09:58:40

如题,请高手赐教!万分感谢!

...全文

218 9 打赏收藏举报

写回复

用AI写文章

9 条回复

切换为时间正序

请发表友善的回复…

发表回复

cqm2099 2004-10-03

打赏
举报

去掉就行

Zerosir 2004-10-02

打赏
举报

Cn.Execute "Alter DataBase PassWord PassWord 4321 1234"
之中多了个PassWord ，去掉就可以了

wumylove1234 2004-09-04

打赏
举报

我晕.这样也行.

jhliuguiping 2004-09-03

打赏
举报

TO zichen66() :

我用你的代吗试用时,总报告"对象变量未设定",引用ADO对象还不够吗?还要引用什么对象呢?

zichen66 2004-09-03

打赏
举报

1234 是原密碼,4321是新設置的密碼

zichen66 2004-09-03

打赏
举报

dim Cn as adodb.connnection
cn.open "provider=MicroSoft.Jet.OLEDB.4.0;DataSource=D:\Temp.Mdb;Mode=Share Deny Read|Share Deny Write;Persist Security Info=False;Jet OLEDB:DataBase PassWord=1234"
Cn.Execute "Alter DataBase PassWord PassWord 4321 1234"

chenghua 2004-09-03

打赏
举报

我要用到给SQLServer
UP

RUKYO 2004-09-03

打赏
举报

http://www.china-askpro.com/msg5/qa56.shtml

RUKYO 2004-09-02

打赏
举报

http://www.china-askpro.com/msg40/qa21.shtml

'先引用Mcrsoft DAO 3.6(或2.5或3.51) Object Library和Mcrsoft Access 9.0 Object Library，在Form上加个Command1,粘贴以下代码：Private Sub Command1_Click()Dim wrkDefault As WorkspaceDim dbsNew As DatabaseDim tdfNew As Table...

引用Microsoft jet and Replication Object 2.6 LibraryAccess数据库压缩修复函数备份一举三得:代码归vbman2003所有Sub BackupMdb(sFile As String,dFile as string) sFile源文件,dFile目标文件 Dim miJRO As jro.JetEngine Set

VB之Adodc控件连接数据库(2019-03-26 16:04:17)标签：vbadocAccess 数据库如：With Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=E:\DB1.mdb;Persist Security Info=False".RecordSource = "select * f...

通过ODBC配置及VB脚本开发将IFIX数据写入到ACCESS数据库中作者：工控自动化老王关注同名V–X公//众//号：工控自动化老王获取更多技术文档及工控资源，交流、学习，另外老王承接PLC毕业设计，欢迎咨询！配置计算机ODBC （1）使用access新建一个accdb数据库，命名为ReportData，后面要用到；（2）计算机-----控制面板-----ODBC 数据源（32位）进入配置界面，需要注意一点，必须配置32位的ODBC，因为IFIX软件只能够识别32位的，配置界面如下图：（3）

数据库(包含打印，安装，报表)

1,217

社区成员

55,949

社区内容

发帖

与我相关

我的任务

社区管理员

加入社区

近7日
近30日
至今

加载中

查看更多榜单

社区公告

暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章