Foxtable(狐表)用户栏目专家坐堂 → [求助]


  共有2469人关注过本帖平板打印复制链接

主题:[求助]

美女呀,离线,留言给我吧!
Artemis
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:79 积分:900 威望:0 精华:0 注册:2018/2/22 21:28:00
[求助]  发帖心情 Post By:2020/12/29 14:08:00 [只看该作者]

 专家,你好。请问以下问题:
在项目文件目录下设置了一个ip.txt文件,里面是:E:\1.mdb
我在项目事件BeforeConnectOuterDataSource,写了代码
Dim ipFile As String = e.ProjectPath & "ip.txt"
If Filesys.FileExists(ipFile) Then
 Dim
ip As String = FileSys.ReadAllText(ipFile)
 e.ConnectionString = e.ConnectionString.Replace("
c:\2.mdb",ip)
End
If

当1.mdb没有设置密码时,可以连接上。但是设置密码后,就连接不上了。
后来我写成
Dim ipFile As String = e.ProjectPath & "ip.txt"
If Filesys.FileExists(ipFile) Then
 Dim
ip As String = FileSys.ReadAllText(ipFile)
 e.ConnectionString = e.ConnectionString.Replace("
c:\2.mdb","Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & ip & ";Persist Security Info=true;Jet OLEDB:Database Password=111111")
End
If

还是没用,请问如何解决。谢谢。

 回到顶部
总数 13 1 2 下一页