用asp增加、删除access数据表和字段

关注

原创最新推荐文章于 2026-03-14 01:15:03 发布 1.9k 阅读 AI 写同款· GEO 优化 ›

五个小时学会Asp连接access添加，删除，修改 ASP基础实例教程之五个小时学会Asp连接access添加，删除，修改（第一个小时） 1：首先建立一个access数据库保存为 xhnew.mdb 表名为aa 字段如下： id 自动排序 name 文本 content 文本 xhtime 日期默认值 now() title 文本2:打开DW 建立文件conn.asp文件代码如下： CODE: <% set conn=server.create 阅读详情

本例主要讲述如何应用Create、Drop和Alter语句增加、删除ACCESS数据表和字段，代码及注释如下：
<%
'增加、删除数据表和字段
'增加数据表：Create Table 表名(字段名 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 字段名 type[(size)][not null]
'删除字段：Alter Table 表名 Drop Column 字段名
Dim objConn,strsql
Set objConn = Server.CreateObject("ADODB.Connection")
objConn.open "Driver={Microsoft Access Driver (*.mdb)};Dbq=" & Server.MapPath("zzksycn.mdb")
'mytable为表名，myfield为字段名
strsql = "Create table mytable(id counter primary key,name char(20),url char(50),hits short)"
objConn.execute(strsql)
strsql = "Alter table mytable add column myfield text(50)"
objConn.execute(strsql)
strsql = "Alter table mytable drop column myfield"
objConn.execute(strsql)
strsql = "Drop table mytable"
objConn.execute(strsql)
%>