access加密后 VB程序打不开 - VB6论坛

编程论坛 → 开发语言 → VB6论坛 → access加密后 VB程序打不开

全能ASP/PHP/ASP.NET主机，支持月付	专业 MSSQL 数据库空间，支持月付	专业 MySQL 数据库空间，支持月付	赛孚耐:软件保护加密专家
身份认证令牌USB KEY

共有 712 人关注过本帖

标题：access加密后 VB程序打不开

收藏订阅推荐打印

zghnzhy333

等级：新手上路
帖子：8
积分：184
注册：2007-12-8

楼主

access加密后 VB程序打不开

我的 access加密后，VB程序打不开，该加段代码myapp = IIf(Right(App.Path, 1) = "\", App.Path, App.Path & "\")
pt = "168168"
Adodc1.C & "Data Source=" & myapp & "db1.mdb;Persist Security Info=False;Jet OLEDB:Database Password=" & pt & ""
请问这段代码应该加到程序的哪里？

搜索更多相关主题的帖子: VB程序 access App Path myapp

2007-12-8 11:48

purana

来自：广东-广州
等级：版主
威望：66
帖子：6040
积分：61390
注册：2005-6-17

第 2 楼

.C是什么东西?.
看不懂.

我的msn: myfend@hotmail.com

2007-12-8 11:51

等级：注册会员
帖子：68
积分：812
注册：2007-11-24

第 3 楼

Form_Load或按钮事件中，没见到你代码，不能定。

2007-12-8 11:54

zghnzhy333

等级：新手上路
帖子：8
积分：184
注册：2007-12-8

第 4 楼

我也不知道。C是什么意思，这段代码是别人给我的，要不该怎么改正？

2007-12-8 16:17

simpson

等级：高级会员
威望：6
帖子：795
积分：8088
注册：2006-11-16

第 5 楼

Adodc1.Connectionstring

全国最大的VS.NET Java专业电子书免费分享

2007-12-8 17:16

zghnzhy333

等级：新手上路
帖子：8
积分：184
注册：2007-12-8

第 6 楼

Me.Caption = "系统登录" & "---" & xtname
myapp = IIf(Right(App.Path, 1) = "\", App.Path, App.Path & "\")
pt = "168168"   `数据库密码168168
Adodc1.C & "Data Source=" & myapp & "txl.mdb;Persist Security Info=False;Jet OLEDB:Database Password=" & pt & ""

我在form-load中加如这段代码    还是提示异常错误
大侠们  给指点指点啊

2007-12-9 01:37

zghnzhy333

等级：新手上路
帖子：8
积分：184
注册：2007-12-8

第 7 楼

myapp = IIf(Right(App.Path, 1) = "\", App.Path, App.Path & "\")
pt = "168168"
Adodc1.C & "Data Source=" & myapp & "txl.mdb;Persist Security Info=False;Jet OLEDB:Database Password=" & pt & ""
好晕
我复制到这上面就会少一段代码
郁闷

2007-12-9 01:42

zghnzhy333

等级：新手上路
帖子：8
积分：184
注册：2007-12-8

第 8 楼

Adodc1.C & "Data Source=" & myapp & "txl.mdb;Persist Security Info=False;Jet OLEDB:Database Password=" & pt & ""
奇怪
怎么还会少呢

2007-12-9 01:43

zghnzhy333

等级：新手上路
帖子：8
积分：184
注册：2007-12-8

第 9 楼

& "Data Source=" & myapp & "txl.mdb;Persist Security Info=False;Jet OLEDB:Database Password=" & pt & ""
好晕
什么东西
老丢！

2007-12-9 01:44

zghnzhy333

等级：新手上路
帖子：8
积分：184
注册：2007-12-8

第 10 楼

onnectionString = " Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source=" & myapp & "txl.mdb;Persist Security Info=False;Jet OLEDB:Database Password=" & pt & ""

好晕
什么东西
老丢！

肯定是屏蔽掉了

2007-12-9 01:45