社区
VB基础类
帖子详情
如何使用ADODB.connection实现与本地Access数据库的连接?
heartpartee
2005-01-23 10:14:47
如何使用ADODB.connection实现与本地Access数据库的连接?
我是这样写的:
With DB_Conn
.ConnectionString = "data source=fis"
.CursorLocation = adUseClient
.ConnectionTimeout = 60
.CommandTimeout = 120
.Open
End With
好像不行!
求教各位大侠!
...全文
635
6
打赏
收藏
如何使用ADODB.connection实现与本地Access数据库的连接?
如何使用ADODB.connection实现与本地Access数据库的连接? 我是这样写的: With DB_Conn .ConnectionString = "data source=fis" .CursorLocation = adUseClient .ConnectionTimeout = 60 .CommandTimeout = 120 .Open End With 好像不行! 求教各位大侠!
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
6 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
zhaojunliang
2005-01-23
打赏
举报
回复
up
heartpartee
2005-01-23
打赏
举报
回复
楼上的说得很对,我以前就是做Oracle的,然后照抄了原来的,佩服阿佩服阿!
daisy8675
2005-01-23
打赏
举报
回复
With DB_Conn
.ConnectionString = "data source=fis" //字符串错误,access是jet连接
.CursorLocation = adUseClient
.ConnectionTimeout = 60 //连接时间,这个一般用语sql
.CommandTimeout = 120 //命令时间,一般用语sql,本地acess不用考虑这么长的时间
.Open
End With
daisy8675
2005-01-23
打赏
举报
回复
Option Explicit
Private Rs As New ADODB.Recordset
Private Conn As New ADODB.Connection
Private Sub Form_Load()
Dim strConn As String
' 连接数据库的字符串
' 连接带密码的数据库,直接在连接符后面加上Jet OLEDB:DataBase Password='您的密码'
' 连接Access97数据库需要使用Jet.OLEDB.3.5,Access2K和以上数据库使用Jet.OLEDB.4.0
strConn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\test.mdb;Persist Security Info=False"
' 使用客户端数据游标
Conn.CursorLocation = adUseClient
' 打开Access的连接
Conn.Open strConn
' 如果RecordSet的状态不是关闭状态,则关闭Recordset
If Rs.State <> adStateClosed Then Rs.Close
' Recordser打开表People
Rs.Open "Select * from People", Conn, adOpenKeyset, adLockOptimistic
' 报告出 一共多少笔数据,测试是否存在数据
' MsgBox Rs.RecordCount
' 绑定进DataGrid
Set DataGrid1.DataSource = Rs
End Sub
你的strConn也就是连接字符可以用adodc控件去生成
heartpartee
2005-01-23
打赏
举报
回复
有错误,但是err.descrpition中显示不出来!
求教
cnlyh
2005-01-23
打赏
举报
回复
.ConnectString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=fis.mdb;Persist Security Info=False"
数据库
备份和回复源代码
access
数据库
备份和回复
access
数据库
是
Access
的,我
使用
BACKUP的SQL语句,系统提示“无效的SQL语句”难道Backup不支持
Access
?用filec
数据库
恢复: Dim conn As New
ado
db
.
Connection
Dim rec As New
ado
db
.Recordset 'SQLserver数据服务器名称;SQLuser数据服务器用户名称(一般为SA);SQLpaswd
数据库
用户密码 basename = "master" temstring = "driver={SQL Server};server=" & SQLsever & ";database=" & basename & ";uid=" & SQLuser & ";pwd=" & SQLpaswd & ";" restorefilename = "'" & Trim(Dir1.Path) & "'\'" & Trim(File1.FileName) & "'" 'Dir1.Path为
数据库
存放的目录;File1.FileName为
数据库
名称 conn.Open temstring conn.Execute ("restore database bikemag from disk='" & restorefilename & "'") conn.Close opy 函数,复制来
实现
备份
asp中各种
数据库
连接
代码
access
数据库
连接
用dsn
连接
并且没有用户名和密码: 用dsn
连接
并且有用户名和密码: 用实际的
数据库
绝对路径
连接
: 用实际的
数据库
相对路径
连接
:
VB+
Access
实例:
使用
ADO
连接
Access
数据库
VB+
Access
实例:
使用
ADO
连接
Access
数据库
。Private Sub Form_Load() Dim cn As New
ADO
DB
.
Connection
Dim rs As New
ADO
DB
.Recordset cn.Open "Provider=Microsoft.Jet.OLE
DB
.4.0;Data Source=" & App.Path & "\
db
_medicine.M
DB
" rs.Open "tb_kc", cn,
adO
penKeyset, adLockOptimistic '
adO
penKeyset打开键集类型游标。adLockOptimistic开放式锁定(逐个) — 提供者
使用
开放式锁定,只在调用Update 方法时才锁定记录 Set MSHFlexGrid1.DataSource = rs MSHFlexGrid1.ColWidth(0) = 0 '返回或设置指定带区中的列宽 rs.Close cn.Close Set rs = Nothing Set cn = Nothing End Sub
asp基础知识学习
通俗易懂,一看就明白。 <% set conn=Server.CreateObject("
ADO
DB
.
Connection
") conn.Provider="Microsoft.Jet.OLE
DB
.4.0" conn.Open "c:/webdata/northwind.m
db
" %>注意,在上面的例子中,您必须规定微软的
Access
数据库
驱动程序(Provider),以及此
数据库
在计算机上的物理路径。 创建一个 O
DB
C
数据库
连接
假设您拥有一个名为 "northwind" 的 O
DB
C
数据库
,您可以
使用
下面的 ASP 代码
连接
到此
数据库
: 例如 <% set conn=Server.CreateObject("
ADO
DB
.
Connection
") conn.Open "northwind" %>通过一个 O
DB
C
连接
,您可以
连接
到您的网络中任何计算机上的任何
数据库
,只要 O
DB
C
连接
是可用的。 到 MS
Access
数据库
的 O
DB
C
连接
下面为您讲解如何创建到一个 MS
Access
数据库
的
连接
:
VB访问
ACCESS
2007
数据库
acc
db
Public cn As
ADO
DB
.
Connection
Public rs As
ADO
DB
.Recordset Private Sub Form_Load() Set rs = New
ADO
DB
.Recordset Open
DB
rs.Open "select * from Large", cn, 1, 3 Do While Not rs.EOF Combo1.AddItem rs("Description") rs.MoveNext Loop End Sub
VB基础类
7,763
社区成员
197,609
社区内容
发帖
与我相关
我的任务
VB基础类
VB 基础类
复制链接
扫一扫
分享
社区描述
VB 基础类
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章