Private Sub DataEnvironment_Initialize()
Dim strConn As String
strConn = "Provider=Microsoft.Jet.OLEDB.4.0;Password=;Data Source="
strConn = strConn & App.Path & "\txl.mdb" & ";Persist Security Info =Ture"
Con.ConnectionString = strConn
End Sub一个数据库环境初始化中的代码~~~运行后说不符合OLE DB的规定~~~但用以下的代码覆盖后就正常了~~~Private Sub DataEnvironment_Initialize()
Dim strConn As String
strConn = "Provider =microsoft.jet.oledb.4.0;Password=;Data Source="
strConn = strConn & App.Path & "\txl.mdb" & ";Persist Security Info=True"
Con.ConnectionString = strConn
End Sub没发现什么不同啊~~~请指教~~~谢谢~~~
Dim strConn As String
strConn = "Provider=Microsoft.Jet.OLEDB.4.0;Password=;Data Source="
strConn = strConn & App.Path & "\txl.mdb" & ";Persist Security Info =Ture"
Con.ConnectionString = strConn
End Sub一个数据库环境初始化中的代码~~~运行后说不符合OLE DB的规定~~~但用以下的代码覆盖后就正常了~~~Private Sub DataEnvironment_Initialize()
Dim strConn As String
strConn = "Provider =microsoft.jet.oledb.4.0;Password=;Data Source="
strConn = strConn & App.Path & "\txl.mdb" & ";Persist Security Info=True"
Con.ConnectionString = strConn
End Sub没发现什么不同啊~~~请指教~~~谢谢~~~
解决方案 »
- 100分:VB6与DLL函数 数组传递的问题
- 连接sql 2000 错误!bde error $220B 网上说是“Could not find language driver” 请问是什么回事?该怎么解决?
- VB通过DDE连接AUTOCAD?
- 用data控件 每次用到data1.recordset都会提示加载DLL错误。为什么?
- VB编写控件
- ActiveReport报表如何动态分页(实现套打)?
- 怎么获得输入法状态?
- 如何获取鼠标滚轮的值,比如前滚或后滚,它滚了多少行?
- 紧急!关于工具栏的图标问题!高分回报!!在线等待!
- 4、 如何设置flexgrid的某一行为选择行,并且此行的背景为高亮。通过设置flexgrid.row可以设置选择行,但此行不会高亮,如何使之高亮?
- 小问题,在线等立时结帖
- word强制留痕的vba代码是什么
Ture 和 True的区别