can not find isam

tshow 2004-01-06 02:25:33
Option Explicit
Private varCONN As New ADODB.Connection
Private varCMD As New ADODB.Command
Private varRS As New ADODB.Recordset

Private Sub Comm8_Click()
Unload Me
End Sub

Private Sub Form_Load()
varCONN.Provider = "Microsoft.Jet.OLEDB.4.0"
varCONN.CursorLocation = adUseClient
varCONN.Mode = adModeReadWrite

varCONN.ConnectionString = "user id=admin;datasource=f:\temp1\pro5\stud.mdb"
varCONN.Open

End Sub

here is all code!very easy ,but how to deal?
just like: http://search.csdn.net/expert/topic/51/5105/2003/6/4/1873378.htm
...全文
27 点赞 收藏 7
写回复
7 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
tshow 2004-01-08
嘻嘻,龙卷风啊,我的代码就是用的adodb库啊
回复
online 2004-01-07
强烈建议使用adodb对象
adodc的问题比较多

回复
tshow 2004-01-07
接着讨论,呵呵,后来的也有分!另外加不违规吧?
问题是这样的:
用Adodc可以先连通,然后代码也可以通过了!
如果先开一个工程,同样的代码还是报错。在里面再用adodc控件连一下,以后就可以了

百思不得其解,为什么?
应该说这段代码不长,不复杂,但问题就在这里,以前没遇到过。郁闷!

回复
online 2004-01-06
试一下

Public Const DB_PWS = ""
Public Const DB_USERID = ""
Public Const DB_PWS = ""
Public DbFileName As String
Public conn As ADODB.Connection

Set conn = New ADODB.Connection

If Right(App.Path, 1) = "\" Then
apppath = App.Path
Else
apppath = App.Path & "\"
End If

DbFileName = apppath & "article.mdb"
ConnectString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & _
DbFileName & ";Persist Security Info=False;"

On Error Resume Next
With conn
.CursorLocation = adUseClient
.Open ConnectString, DB_USERID, DB_PWS
End With
回复
tshow 2004-01-06
天啊,没人性啊,居然就突然可以了!!
不得其解!现在想让问题重现都不行啊!!
给这个兄弟100分,后来的没有了!!
郁闷的一天!
回复
SoHo_Andy 2004-01-06
Dim cn As New ADODB.Connection
Private Sub Form_Load()
If cn.State = 1 Then
cn.Close
End If
cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\db1.mdb"
End Sub

试试这样会不会出错,如果还是出错,则需要安装数据库驱动
安装MDACTYPE
回复
tshow 2004-01-06
刚不能输中文,就是同那个找不到可插入isam的问题,以前遇到过,当时解决了,可现在也不知道当时是如何解决的,用的win2000 pro,office2000,mdactype.exe的2.7,2.6,2.5都有,注册标里---/jet/4.0/isam format/中有3.X,2.x,现在问题处在那里,我愈整愈糊涂了,各位高人指路,在线等!!!分不是问题,我有4000多分!!!!!!!!!
回复
相关推荐
发帖
VB基础类
创建于2007-09-28

7490

社区成员

VB 基础类
申请成为版主
帖子事件
创建了帖子
2004-01-06 02:25
社区公告
暂无公告