strPath = App.Path
Set db = New ADODB.Connection
db.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source" & strPath & "\shangji.mdb; Persist Security Info=False"
db.Open
Set rst = New ADODB.Recordset
rst.Open "delete * from jiqi where 机器名 = '" & Text5.Text & " ' ", db, adOpenStatic, adLockBatchOptimistic
Set rst2 = New ADODB.Recordset
rst2.Open "select * from jiqi ", db, adOpenStatic, adLockBatchOptimistic
Set MSHFlexGrid1.DataSource = rst2想通过app。path自动获取当前路径,然后连接到目录下的shangji。mdb数据库,可是总是运行到db.Open出错:”找不到可安装的isam“,不知道是什么意思?
解决方案 »
- 一个SQL语句的写法
- 急用啊,以下c语言接口如何转成VB,我的有错吗
- 调用DLL说找不到动态链接库高手指点一下,在线等
- 求救:一个shape类型的圆,怎么画出圆心的运动轨迹?
- 关于时间的一个问题
- 碰到难题,再次发贴,望大侠们指教!!(两贴合计100分)
- 用tcp/ip实现远程操作计算的思想是什么?
- 在VB中如何调用一个定义在Vbs文件中的函数?
- 如何用VB打开、修改、存储.BIN类型的文件
- 100分:如何让flex控件固定行列的内容合并,但数据区不合并?
- 在VsFlexGrid中如何实现这样的功能 没分了 见谅
- 高分求助:VS2003的VB.NET,使用MSFrexGrid控件的BUG如何解决
少了个等号
不过我觉得你的APP.PATH 还应该判断一下是否是根目录,如果是根目录,那么APP.PATH = "D:\"
再连接\shangji.mdb 还是能出错,