我的access数据库无法在vb6中载入，是怎么回事？

[zhaoxinghan]

选recordsource的时候提示无法识别的数据，是不是vb6不支持office2k的access啊 ？

[zhaoxinghan]

顶一下，求解答。

[饮水需思源]

将代码中的jet3.51改成jet4.0
将data控件改成ADO控件

[lihonggen0]

不可识别的数据库格式，是因为你是ACCESS2000或者以上的数据库

微软解决办法：
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/vbcon98/html/vbconIntrnscDataCtrlAndAccess2000.asp

其它解决办法：
办法一：建议你安装VBSP5

办法二：你可以把数据库转化为ACCESS97

办法三：用ADODC控件连接ACCESS2000数据库

办法四：用ADO连接字符串连接数据库

[zhaoxinghan]

谢谢，问题已经解决，用的是将access2000的数据库转换成了access的早期版本格式。

[ryuginka]

hehe

[zhaoxinghan]

又有问题了，现在能载入了，可是和text控键绑定的时候提示本对象不支持dataformat属性，这个怎么办啊？

[zifeng911]

将DataFormat属性设置为空或者通用，就可以了
如果已经设置了，重新加以个TEXT
只要设置Text1.DataSource、text1.DataField应该就OK了

[lujianyu1189]

不用要控件用ADO吧这是代码
dim conn as new adodb.connection
dim rs as new adodb.recordset
conn.open"Provider=microsoft.jet.oledb.4.0;Persist Security Info=False;Data Source=(app.path+"\data.mdb")"'当前路径中的data.mdb
rs.open "select * from table",conn.3,3
set mshflexgrid.datasouce=rs
增加时:
rs.open"insert into table values('"+text1.text+"'..........)"
修改时：
rs.open"update table set XXX='"+text1.text+"'"
删除时：
rs.open "delete * from table where XXXX='"+text1.text+"'"

[zhaoxinghan]

text属性设置成通用也不行，问题照旧。
楼上的解答准备明天试试看，呵呵。谢谢了。