<%''''''''''''''''''''''''''''''''''''' 增加、删除表和字段' ├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,strsqlSet 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)%>
