新客网WWW.XKER.COM:致力做中国最专业的网络学院!
学院: 操作系统 - 网络应用 - 服务器 - 网络安全 - 工具软件 - 办公软件 - Web开发 - 数据库 - 网页设计 - 图形图像 - 媒体动画 - 硬件学堂 - 存储频道 - QQ专区
您的位置:首页 > 软件开发 > Web开发 > Asp教程 > 正文:ASP代码直接增加、删除ACCESS表和字段

ASP代码直接增加、删除ACCESS表和字段

新客网 XKER.COM 2007-10-19 来源: 收藏本文

本例主要讲述如何应用Create、Drop和Alter语句增加、删除ACCESS表和字段,代码如下:

<%
''''''''''''''''''''''''''''''''''''
'    增加、删除表和字段
'     ├Create Table 表名(field1 type[(size)] [null|not null] [default eExpression] [primary key][,field2...])
'             type:counter;text(num);char(num),varchart(num);memo;short;long;single;double;date/time;logical;currency;oleobject
'     ├Drop Table 表名
'     ├Alter Table 表名 Add Column field type[(size)][not null]
'     ├Alter Table 表名 Drop Column field
''''''''''''''''''''''''''''''''''''
Dim objConn,strsql
Set objConn = Server.CreateObject("ADODB.Connection")
objConn.open "Driver={Microsoft Access Driver (*.mdb)};Dbq=" & Server.MapPath("webjxcom.mdb")
strsql = "Create table mzwucom(id counter primary key,name char(20),url char(50),hits short)"
objConn.execute(strsql)
strsql = "Alter table mzwucom add column field1 text(20)"
objConn.execute(strsql)
strsql = "Alter table mzwucom add column field2 text(20)"
objConn.execute(strsql)
strsql = "Alter table mzwucom drop column field2"
objConn.execute(strsql)
strsql = "drop table mzwucom"
objConn.execute(strsql)
%>

收藏】 【评论】 【推荐】 【投稿】 【打印】 【关闭
发表评论
要记得去论坛讨论,点击注册新会员匿名评论
评论内容:不能超过250字,需审核后才会公布,请自觉遵守互联网相关政策法规。
阅读排行
随机推荐
实用信息推荐