1个回答
展开全部
Private Sub Form_Load()
'数据库初始化
'连接数据库,App.Path 为当前目录,数据库.mdb为Access数据库,按实际更改,其余的不能更改
Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\数据库.mdb;Persist Security Info=False"
Adodc1.RecordSource = "表1" '表1 为数据库里的一个表,按实际更改
Adodc1.Refresh '刷新数据
Adodc1.Recordset.MoveNext
End Sub
一定行!你是用adodc来连数据库的吧
'数据库初始化
'连接数据库,App.Path 为当前目录,数据库.mdb为Access数据库,按实际更改,其余的不能更改
Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\数据库.mdb;Persist Security Info=False"
Adodc1.RecordSource = "表1" '表1 为数据库里的一个表,按实际更改
Adodc1.Refresh '刷新数据
Adodc1.Recordset.MoveNext
End Sub
一定行!你是用adodc来连数据库的吧
本回答由网友推荐
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
