VB-Mdb数据库操作

唉,自己平时乱整理的。
1.建立数据表
CREATE TABLE 数据表名 (字段名1 数据类型(长度), 字段名2 数据类型(长度),……)举例：create table student(xh text(9), xm text(8) , cj single(4), nl integer(2)) 建立含有xh、xm、cj、nl 4个字段的student表2.添加字段
ALTER TABLE 数据表名 ADD COLUMN 字段名 数据类型(长度)举例：alter table student add column xb text(2) '在学生表中添加性别字段3.删除字段
ALTER TABLE 数据表名 DROP COLUMN 字段名举例： alter table student drop column nl '将学生表中的年龄字段删除4.数据查询
SELECT 字段名表 FROM 子句 WHERE 子句 GROUP BY 子句HAVING 子句 ORDER BY 子句 INTO 子句举例：select xh, xm from student where xb="男" order by xh 从学生表中查询性别为男的学生，显示其学号和姓名并使结果按学号升序排列。5.添加记录
INSERT INTO 数据表名（字段名1，字段名2……） VALUES（数据1，数据2……）举例：insert into student (xh, xm, xb) values("015200101", "王小二", "男")6.删除记录
DELETE FROM 数据表名 WHERE 条件表达式举例：delete from student where xb="男" 7.更新记录
UPDATE 数据表名 SET 新数据值 WHERE 条件表达式举例：update student set cj=cj+5 where xb="女"2.------------------------------------------------------------------------------------------------
要能正确引用ADO数据对象，应在VB 6.0集成开发环境中选择“工程”菜单，再点击“引用”菜单项，在弹出的“引用”对话框中选中“Microsoft ActiveX Data Objects 2.1 Library”选项来添加ADO数据对象类型库。3.------------------------------------------------------------------------------------------------
① DAO数据对象　　要能正确引用DAO数据对象来建立与数据库的连接，应先在VB集成开发环境中选择“工程”菜单，再点击“引用”菜单项，在弹出的“引用”对话框选择“Microsoft DAO 3.51 Object Library”选项来添加DAO数据对象类型库。5.------------------------------------------------------------------------------------------------
'RS.AbsolutePosition'当前游标
'RS.RecordCount '表记录数
.RS.Fields.Count '表字段多少6.打开加密的数据庫------------------------------------------------------------------------
Set Conn = New ADODB.Connection
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & App.Path & "/Sjk.mdb;Jet OLEDB:Database password=269796455;"
Set RS = New ADODB.Recordset
RS.Open "select * from 单词_新概念英语  where 课目='1-001' order by 序", Conn, 1, 19.添加记录到数据庫------------------------------------------------------------------------
RS.AddNew
RS.Fields!用户名 = Combo1.Text
RS.Fields!密码 = Text2.Text
RS.Update10.修改数据库记录------------------------------------------------------------------------
RS.Fields!用户名 = Combo1.Text
RS.Fields!密码 = Text2.Text
RS.Update11.动态加载VB控件(不用在原窗体预先添加)------------------------------------------------------------------------
Set text2 = Controls.Add("vb.textbox", "text2", P1(2))
text2.Visible = True12.添加表字段名到下拉列表中------------------------------------------------------------------------
For I = 1 To RS.Fields.Count
Form1.P1_2_Combo1(3).AddItem RS.Fields(I - 1).Name
Next I
15.打开10条记录
RS.Open "select top 10 * from 单词_新概念英语 order by 序", Conn, 1, 216.关于rs.open sql,conn,1,1的问题 
后面带1，1和不带1，1 
带参数和不带参数有何区别吗。不带1,1会出错 
前一个1是游标类型，第二个是锁定类型，在ADODB.inc(好像是这个文件名)定义了一堆常量，其中就有这两个，但是必须要包含那个文件才可以使用，所以就都使用数值了 
第一个: 
1,前向游标：即读取数据记录只能从前向后读，不能返回，并且不能反映读取同时其它用户对数据库的更新 
2，静态游标，可向前和向后，但是不能反映其它用户的更新 
3，动态游标，功能最强，当然也最耗资源 
第二个 
1，只读锁定，只能读不可以写的锁定数数据库 
2，悲观锁定，从打开数据库开始锁定数据库，即锁定时其它用户无法更新数据库 
3，乐观锁定，只在更新的瞬间锁定数据库 
4，批量乐观锁定，在更新完一批以后提交到数据库时才锁定，如果有很多用户同时在更新数据库，则有可能更新到同一条记录 
悲观锁定最不容易发生冲突，但是锁定时间太长，各有各的用途，实际应用时选择1，1 好像是只读 
1，2 好像是擦入 
1，3 好像是删除rs.open sql,conn,1,1 
前一个1是游标类型，表明是键集游标，其他用户对记录说做的修改将反映到记录集中，但其他用户增加或删除记录不会反映到记录集中。 
后一个1是锁定类型，说明是只读类型。17.复制表
Conn.Execute "Select * Into 单词_自定义_sgzhxfsg2 from 单词_自定义_sgzhxfsg"
只复制表结构
Conn.Execute "Select * Into 单词_自定义_sgzhxfsg2 from 单词_自定义_sgzhxfsg where 1=0"
恭城论坛http://bbs.gcnew.com/?fromuid=1239