数据库操作的例子！

[twtetgso]

哪位高手能给一个数据库操作的例子，不用太复杂，只要包含查找，插入，删除等操作既可。本人想学习，从网上找的例程太复杂，看不懂。谢谢！！（给高分）
[e-mail]

[Fanks]

Dim Cn As New Connection,Rs As New Recordset
Cn..ConnectionString ="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\AAA.mdb" '连接字符串
Cn.Open '打开数据库
Rs.Open "Select * from 表 Where 字段1='值'",Cn,adOpenKeyset,adLockOptimistic '打开字段1为某条件的记录
Rs.Close '关闭记录集
Cn.Excute "Delete From 表 Where 条件" '删除符合条件的记录
Cn.Excute "Insert Into 表 Values('值1','值2'...)" '插入记录，引用符视字段类型而定
这些都是最基础的操作，只要举一反三就会有所提高。

[Fanks]

注意，上面以C:\AAA.mdb为例，工程内要引用ADo2.5才行。

[powpow]

http://go8.163.com/dbcontrols/ 19种打开数据库的方法