如何用DAO修改一个已经存在的数据库的结构(如添加和删除表)

muders 北京月矛科技有限公司 CTO/CIO/技术总监  2002-05-12 09:37:21
请问各位大虾在VB里如何用DAO修改一个已经存在的数据库的结构(如添加和删除表)?
...全文
11 点赞 收藏 3
写回复
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
ql_mf 2002-05-22
用SQL语句
create table table_name(col1 var_type,col2 var_type)
drop table table_name
回复
jdsbjcailei 2002-05-12
dim db as dao.database
dim Tdf as tabeldef
添加:
'创建相同的表
db.excute "select * into 新的表 from 老表"
'不同的表
set tdf=db.createtabledef("新表")'创建新表
with tdf
.fields.apppend .createfield("字段名",dbtext,6)'为表增加字段
end with
db.tabledefs.append tdf'追加表到数据库

删除:
for i=0 to db.tabledefs.count-1
if lcase(db.tables(i).name)=lcase("新表") then
db.tabledefs.delete db.tabledefs(i).name
exit for
end if
next i

'具体的DAO方法,参见msdn
回复
muders 2002-05-12
谁帮帮我?
回复
发动态
发帖子

1180

社区成员

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