使用ASP编写SQL语句可以直接添加 删除此表的行以及相应的列

本例主要讲述如何应用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)

%>

（编辑：银川站长网）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!