我想问一下,我做的软件用的是vb里自带的access数据库,我用odbc去连接时连不上说无法分配连接句柄,为什么呀高手能不能告诉我怎么去连接呀?在线等待!
解决方案 »
- 菜鸟问:WinSock控件怎样绑定IP和端口?
- 请教listview的问题
- 急!请问怎么改变dtpicker控件输入时的背景色(高分求)
- 请教Excel.Application相关开发,在那里可以查到帮助?
- 如何改变系统默认的拖放图标
- EXCLE和ORACLE
- 怎样从一个字段读取数据,放到三个TextBox控件中
- :) 一个简单的MSHFlexGrid控件的问题. 在线结帐...
- 如何用DAO进行用户登陆的姓名与密码的验证?
- 谁有更新的API函数浏览器?发给我一个,谢谢
- Microsoft.Jet.OLEDB.4.0应该怎样添加啊???我怎么找不到啊???我用的是vb6.0,请网友告诉我该怎样添加,谢谢!!!!
- ADO可以读EXCEL文件,可否读txt文本文件?
Standard Security:"Driver={Microsoft Access Driver (*.mdb)};Dbq=C:\mydatabase.mdb;Uid=Admin;Pwd=;" Workgroup:"Driver={Microsoft Access Driver (*.mdb)};Dbq=C:\mydatabase.mdb;SystemDB=C:\mydatabase.mdw;" Exclusive:"Driver={Microsoft Access Driver (*.mdb)};Dbq=C:\mydatabase.mdb;Exclusive=1;Uid=admin;Pwd="
Option Explicit
Public conn As New ADODB.Connection
Public rs As New ADODB.RecordsetPrivate Sub Form_Load()
Dim strconn As String
strconn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\test.mdb;Persist Security Info=False;Jet OLEDB:DataBase Password='123'"
conn.CursorLocation = adUseClient
conn.Open strconn
Public cn As New ADODB.Connection
Public rs As New ADODB.Recordsetcn.open ""
rs.open "select * from tablename" , cn