vb连接数据库

来源：百度知道 编辑：UC知道 时间：2024/06/23 02:43:34
数据文件路径d:\数据.mdb

如表：

编号 客户号 姓名 年龄
001 33391 Smith 56
002 33391 Mary 46
003 8765 saly 34
004 7656 fizer 23

vb连接数据库，读取姓名为mary的年龄，赋值给age 读取003编号的客户号
并把fizer的年龄更改为33.
麻烦写下注释，谢谢。
我基础薄弱，两个都调试不成功，这样算了，帮我找个基础点的VB连接ACSS的实例教程，别让分数浪费了。

右击工具栏>部件>控件 中选择Microsoft ADO Data Control 6.0 (OLEDB)
添加Adodc控件。

加 按钮

Private Sub Command1_Click()

Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\数据.mdb;Persist Security Info=False"
Adodc1.RecordSource = "select 年龄 from 你的表名称 where 姓名 like 'Mary'"
Adodc1.Refresh
age=Adodc1.Recordset.Fields(0)

Adodc1.RecordSource = "select 客户号 from 你的表名称 where 编号=003" '要保证你的“编号”字段的存储类型是数字，不然就要用单引号把003括起来
Adodc1.Refresh
num=Adodc1.Recordset.Fields(0) '储存客户号

Adodc1.RecordSource = "select 年龄 from 你的表名称 where 姓名 like 'fizer'"
Adodc1.Refresh

Adodc1.Recordset.Update 0, 33

End Sub

=========================================
注意将以上代码中“你的表名称”改为你数据库中改表的真实名称，如果含有空格，或名字与SQL语言关键字相同 要加中括号。

我都在自己的机子上实验过的，不知道你那里怎么就不可以了。或许存储姓名 文本里面有空格？？我再把代码改一下。请再试试，并注意我下面写得“注意事项”

'引用M