我以前曾经提过jet的问题,现在还要请教各位,当我安装了MDAC_TYP.EXE后,我换成JET4.O后,运行时报错“找不到可安装的ISAM",用udl文件测试时可以链接,没有问题。
解决方案 »
- 写程序代码的过程中,如何避免将来运行时,资源不足的情况发生?
- 一个共用的子窗体(被其它的Form打开),如何取得其父窗体并调用父窗体的一个函数?
- 关于data 和ADO控件的问题?
- 请教:有个几十M的文本文件,每天有几十万次写入,怎么样才能快点(文件大小影响写入速度吗?)??另外,怎么样才能快速将一个几十K的文本文件,快
- 等 着 要,希腊字母
- 如何使一个无边框的平面窗体通过拖曳窗体的四边界来改变窗体的大小,另外如何改变边框的颜色?
- 请问:怎样把 PictureBox 中的图像读写到一维数组中?又怎样把一维数组恢复成图像?
- 关于listview控件的问题!!紧急!!
- 有一定难度请,关注!!!
- 一个程序调用的问题
- 如何得到已经失去数据源的水晶报表的表结构,100分
- 把mshflexgrid中显示的数据--预览,打印
你的MDAC_TYPE是什么版本,建议安装最新的2.8
http://download.microsoft.com/download/dasdk/Install/2.60.6526.3/WIN98Me/EN-US/MDAC_TYP.EXE
Public Function getConnString() As String
sConn = "Provider = Microsoft.Jet.OLEDB.4.0;Datasource = " & App.path & "\Database\data.mdb;Persist Security Info = False"
getConnString = sConn
End Function后面通过一下代码调用:
Dim oConn As ADODB.Connection
Dim oRs As ADODB.Recordset
Set oConn = New ADODB.Connection
Set oRs = New ADODB.Recordset
setLog SqlLog, "Common.getRecord", ssql
oConn.Open getConnString
oRs.CursorLocation = 3
oRs.CursorType = 3
oRs.Open ssql, oConn
Set getRecord = oRs
Set oRs = Nothing
Set oConn = Nothing
在执行到 oConn.Open getConnString
时报错
oConn.Provider = "Microsoft.Jet.OLEDB.4.0;"
oConn.ConnectionString = App.Path & "\NWIND.MDB"
oConn.Open个人习惯,不喜欢长字符串:)
改成:
sConn = "Provider = Microsoft.Jet.OLEDB.4.0;Datasource = " & iif(right(App.path,1)="\",app.path,app.path & "\") & "Database\data.mdb;Persist Security Info = False"
根据你的提议我做了修改,还是不行,isam的驱动应该是比较低的版本的问题,在JET40中应该已经包含,为什么还会出现这样的问题呢?我找一台比较干净的环境试试,大家一起交流。
oRs.CursorType = 3