[求助]如何完全用VB代码实现数据库的连接，添加，更新等操作? - VB6论坛

编程论坛 → 开发语言 → 『 VB6论坛』 → [求助]如何完全用VB代码实现数据库的连接，添加，更新等操作?

标题：[求助]如何完全用VB代码实现数据库的连接，添加，更新等操作?

只看楼主

c_sharp_man

等　级：新手上路
帖　子：51
专家分：0
注　册：2005-9-28

楼主

问题点数：0 回复次数：7

[求助]如何完全用VB代码实现数据库的连接，添加，更新等操作?

谢了.

搜索更多相关主题的帖子: 数据库　代码　

2006-03-24 09:28

purana

来　自：广东-广州
等　级：版主
威　望：66
帖　子：6039
专家分：0
注　册：2005-6-17

第 2 楼

得分:0

Dim MyConStr As String
Dim UserCount As Integer
Dim Mycn As New ADODB.Connection
Dim Myrs As New ADODB.Recordset
MyConStr = "Provider=Microsoft.Jet.OLEDB.4.0;" _
& "Data Source=" & App.Path & "\StuAcc.mdb"
Mycn.Open MyConStr
Mycn.CursorLocation = adUseClient
Myrs.Open "Select * From User_Property", Mycn, adOpenKeyset, adLockPessimistic

添加可以用addnew方法..
更新用update方法..

我的msn: myfend@

2006-03-24 13:03

leon2

等　级：新手上路
威　望：7
帖　子：731
专家分：0
注　册：2005-3-18

第 3 楼

得分:0

帮加上一句提示: 执行2楼的代码之前，必须先在"工程"-"引用"中选中 Microsoft ActiveX Data Objects x.x (x.x 是版本号，最好选最新的版本)

2006-03-24 13:10

c_sharp_man

等　级：新手上路
帖　子：51
专家分：0
注　册：2005-9-28

第 4 楼

得分:0

连ACCESS也可以吗?

2006-03-24 13:57

zhphero

等　级：新手上路
帖　子：4
专家分：0
注　册：2005-10-7

第 5 楼

得分:0

当然。

2006-03-24 15:52

kfp_kaka

等　级：贵宾
威　望：13
帖　子：353
专家分：0
注　册：2006-1-12

第 6 楼

得分:0

Access和SQL都可以用这个方法的连接的，再补充一点
MyConStr = "Provider=Microsoft.Jet.OLEDB.4.0;" _
& "Data Source=" & App.Path & "\StuAcc.mdb"
这句代码要自己写的话可能有点困难，可以在窗体里添加一个ADODC控件，先用ADODC控件连接，然后把ADODC控件自动生成的驱动代码复制到这里来，在按上面语句改一改就方便很多了

爱一个人不一定要拥有她拥有一个人就一定要好好的爱她

2006-03-25 08:58

zhglbcheng

等　级：新手上路
帖　子：33
专家分：0
注　册：2006-3-21

第 7 楼

得分:0

用App.Path自动识别数据库路径往往容易出错.......

2006-03-27 12:09

purana

来　自：广东-广州
等　级：版主
威　望：66
帖　子：6039
专家分：0
注　册：2005-6-17

第 8 楼

得分:0