怎么用ASP页面程序操作ACCESS库增加表和字段
展开全部
<%
'增加数据表:create table 表名(字段名 type[(size)] [null|not null] [default eexpression_r_r] [primary key][,field2...])
' 字段类型type:counter;text(num);char(num);varchart(num);memo;short;long;single;double;date/time;logical;currency;oleobject
'Char(字符长度):文本类型|常用; Short:数字类型(整型|常用); text(num)文本类型; Long:数字类型(长整型); double:数字类型(双精度型);
'Counter:自动编号; date/time:时间/日期; currency:货币类型; memo:备注(常用); single:字类型(单精度型); oleobject:OLE 对象;
'删除数据表: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("abc.mdb") '假设为abc数据库.
'mytable为表名,myfield为字段名
'strsql = "create table mytable(id counter primary key,name char(20),url char(50),hits short)"
'objconn.execute(strsql) '创建数据表
'response.write "数据表创建成功!"
'strsql = "alter table mytable add column 444 oleobject"
'objconn.execute(strsql) '增加字段
'response.write "字段创建成功!"
'strsql = "alter table mytable drop column myfield"
'objconn.execute(strsql) '删除字段
'response.write "字段删除成功!"
'strsql = "drop table mytable"
'objconn.execute(strsql) '删除表
'response.write "数据表删除成功!"
%>
'增加数据表:create table 表名(字段名 type[(size)] [null|not null] [default eexpression_r_r] [primary key][,field2...])
' 字段类型type:counter;text(num);char(num);varchart(num);memo;short;long;single;double;date/time;logical;currency;oleobject
'Char(字符长度):文本类型|常用; Short:数字类型(整型|常用); text(num)文本类型; Long:数字类型(长整型); double:数字类型(双精度型);
'Counter:自动编号; date/time:时间/日期; currency:货币类型; memo:备注(常用); single:字类型(单精度型); oleobject:OLE 对象;
'删除数据表: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("abc.mdb") '假设为abc数据库.
'mytable为表名,myfield为字段名
'strsql = "create table mytable(id counter primary key,name char(20),url char(50),hits short)"
'objconn.execute(strsql) '创建数据表
'response.write "数据表创建成功!"
'strsql = "alter table mytable add column 444 oleobject"
'objconn.execute(strsql) '增加字段
'response.write "字段创建成功!"
'strsql = "alter table mytable drop column myfield"
'objconn.execute(strsql) '删除字段
'response.write "字段删除成功!"
'strsql = "drop table mytable"
'objconn.execute(strsql) '删除表
'response.write "数据表删除成功!"
%>
展开全部
<%
'增加数据表:create
table
表名(字段名
type[(size)]
[null|not
null]
[default
eexpression_r_r]
[primary
key][,field2...])
'
字段类型type:counter;text(num);char(num);varchart(num);memo;short;long;single;double;date/time;logical;currency;oleobject
'Char(字符长度):文本类型|常用;
Short:数字类型(整型|常用);
text(num)文本类型;
Long:数字类型(长整型);
double:数字类型(双精度型);
'Counter:自动编号;
date/time:时间/日期;
currency:货币类型;
memo:备注(常用);
single:字类型(单精度型);
oleobject:OLE
对象;
'删除数据表: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("abc.mdb")
'假设为abc数据库.
'mytable为表名,myfield为字段名
'strsql
=
"create
table
mytable(id
counter
primary
key,name
char(20),url
char(50),hits
short)"
'objconn.execute(strsql)
'创建数据表
'response.write
"数据表创建成功!"
'strsql
=
"alter
table
mytable
add
column
444
oleobject"
'objconn.execute(strsql)
'增加字段
'response.write
"字段创建成功!"
'strsql
=
"alter
table
mytable
drop
column
myfield"
'objconn.execute(strsql)
'删除字段
'response.write
"字段删除成功!"
'strsql
=
"drop
table
mytable"
'objconn.execute(strsql)
'删除表
'response.write
"数据表删除成功!"
%>
'增加数据表:create
table
表名(字段名
type[(size)]
[null|not
null]
[default
eexpression_r_r]
[primary
key][,field2...])
'
字段类型type:counter;text(num);char(num);varchart(num);memo;short;long;single;double;date/time;logical;currency;oleobject
'Char(字符长度):文本类型|常用;
Short:数字类型(整型|常用);
text(num)文本类型;
Long:数字类型(长整型);
double:数字类型(双精度型);
'Counter:自动编号;
date/time:时间/日期;
currency:货币类型;
memo:备注(常用);
single:字类型(单精度型);
oleobject:OLE
对象;
'删除数据表: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("abc.mdb")
'假设为abc数据库.
'mytable为表名,myfield为字段名
'strsql
=
"create
table
mytable(id
counter
primary
key,name
char(20),url
char(50),hits
short)"
'objconn.execute(strsql)
'创建数据表
'response.write
"数据表创建成功!"
'strsql
=
"alter
table
mytable
add
column
444
oleobject"
'objconn.execute(strsql)
'增加字段
'response.write
"字段创建成功!"
'strsql
=
"alter
table
mytable
drop
column
myfield"
'objconn.execute(strsql)
'删除字段
'response.write
"字段删除成功!"
'strsql
=
"drop
table
mytable"
'objconn.execute(strsql)
'删除表
'response.write
"数据表删除成功!"
%>
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
<%
'ASP+acc 表控制操作 saruri 272212557
'添加表
tablename = "AAA" '表名
sql="CREAT TABLE [" &tablename& "] (id integer identity(1,1) primary key,编号 varchar(10),日期 date, 时间 date)"
conn.execute(sql)
'删除表
"DROP TABLE [" & tablename & "]"
'在现有的表中增加字段:
'下面的你自己按格式套吧
Sql="altertable[表名]addcolumn[字段名]varchar(200)"
'修改字段类型:
Sql="altertable [表名] AlterCOLUMN [字段名] varchar(50)"
'删除字段
sql="altertable [表名] drop [字段名]"
'修改字段:
Sql="AlterTABLE [表名] AlterCOLUMN [字段名] 类型(大小) NULL"
%>
'ASP+acc 表控制操作 saruri 272212557
'添加表
tablename = "AAA" '表名
sql="CREAT TABLE [" &tablename& "] (id integer identity(1,1) primary key,编号 varchar(10),日期 date, 时间 date)"
conn.execute(sql)
'删除表
"DROP TABLE [" & tablename & "]"
'在现有的表中增加字段:
'下面的你自己按格式套吧
Sql="altertable[表名]addcolumn[字段名]varchar(200)"
'修改字段类型:
Sql="altertable [表名] AlterCOLUMN [字段名] varchar(50)"
'删除字段
sql="altertable [表名] drop [字段名]"
'修改字段:
Sql="AlterTABLE [表名] AlterCOLUMN [字段名] 类型(大小) NULL"
%>
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询