如何动态增添数据库的字段?????

京霾 天道创想 软件工程师  2002-03-21 01:03:04
一个学生档案数据库,如何动态增加学生学习的课程?
请各位高手不吝赐教.
...全文
11 点赞 收藏 4
写回复
4 条回复
切换为时间正序
请发表友善的回复…
发表回复
京霾 2002-03-21
谢谢你们。
回复
hireling 2002-03-21
补充:
如果上面有关 DAO 部分发生“未定义”错误,则尝试

把set 去掉或者 flds=tbl.Fields 前加 set。

很长时间没用了,有点生疏,希望能帮到你,见谅~
回复
hireling 2002-03-21
使用 SQL :
ALTER TABLE tablename ADD COLUMN fieldname INTEGER
ALTER TABLE tablename ADD COLUMN fieldname TEXT(10)

使用DAO
Dim tbls as TableDefs
Dim tbl as TableDef
dim flds as Fields
dim fld1 as Field
dim fld2 as Field

set tbl=tbls("Example")

flds=tbl.Fields
fld1=tbl.CreateField("Field1",dbText,10)
fld2 =tbl.CreateField("Field2",dbinteger)

flds.Append(fld1)
flds.Append(fld2)

删除类同增加。
回复
网络咖啡 2002-03-21
使用SQL,好象是alert吧,记得不是很清楚了
回复
发动态
发帖子

1180

社区成员

VB 数据库(包含打印,安装,报表)
申请成为版主
社区公告
暂无公告