如果在ACCESS中建立数据库,怎么连接到VB中呀???我的怎么出现数据类型不相符的 提示??
解决方案 »
- VB编译的EXE文件,第一次运行为什么360老报有木马?
- 请教:用Adodc绑定MSHFlexGrid,怎样实现数据更新!谢谢
- 多页面显示中的一点小问题
- windows_nt4_source_code.rar
- 请教高手,为何在设置了窗体总在前的基础上再弹出msgbox对话框死机.
- 请问水晶报表哪个版本可以使用api动态建立报表?key是?
- 在后台向一个网页发送鼠标操作,不影响我上网的其它操作
- 如何快速删除数据库中的相同记录,只保留一条??
- 这是不是vb的bug,大家帮帮我......
- 关于MIF图层转换为shp图层的问题
- 我想通过webbrowser控件实现本机可以记录用户登陆的用户名和密码(比如说bbs),用户下次再点击程序中的连接时,可直接进入!希望各位大
- 运行时移动控件的位置
然后我在DATA里设置DATASOURCE,结果就出现错误1我不明白!!好怪,VB的功能不会这么差吧
cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\test.mdb;Persist Security Info=False"如果此数据库有密码的话在后面加上";Jet OLEDB:Database Password=密码"
工程--->引用--->Microsoft ActiveX Data Object 2.x(版本号) Dim CN As New ADODB.Connection '定义数据库的连接
Dim Rs As New ADODB.Recordset CN.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\NWIND.MDB;Persist Security Info=False"
CN.Open Rs.CursorLocation = adUseClient
Rs.Open "select * from employees", CN, adOpenDynamic, adLockBatchOptimistic
Dim Rs As New ADODB.Recordset CN.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\NWIND.MDB;Persist Security Info=False"
CN.Open Rs.CursorLocation = adUseClient
Rs.Open "select * from employees", CN, adOpenDynamic, adLockBatchOptimistic