ASP创建数据库，新建数据表、字段(2010-09-19 11:58:00)
在已有数据库中创建表 <% set conn=server.CreateObject("adodb.connection") sql="provider=microsoft.jet.oledb.4.0;data source="&server.MapPath("BOOK.mdb") conn.open sql Conn.Execute("create table bbb(id AUTOINCREMENT(1,1),p_id text(100),ee money,ff datetime default date(),gg guid,hh single default 50,ii double,jj smallint,kk long,ll image,mm memo,oo yesno not null,pp TINYINT,qq numeric(18,4),aa binary,bb bit,cc smallint,id int)") %> 将a表另外复制一个b表（只复制结构，不含数据） <% Set rs= Server.CreateObject("ADODB.Recordset") sql="select * into b from a where 1=0" rs.open sql,conn,1,1 rs.update rs.close set rs=nothing %> 将a表另外复制一个b表（包括制结构和数据） <% Set rs= Server.CreateObject("ADODB.Recordset") sql="select * into b from a rs.open sql,conn,1,1 rs.update rs.close set rs=nothing %> 新建数据库并新建表 <% '首先建立一个数据库文件 set conn=server.createobject("adox.catalog") conn.create "provider=microsoft.jet.oledb.4.0;"&"data source="&server.mappath("lifeda1.mdb") %> <% '向该数据库中建立相应表格 set rs=server.createobject("adox.table") '该表格名称 rs.name="aaaa" '该表格字段(字段类型见相关附录) rs.columns.append "id" ,3 rs.columns.append "liuyan",203 rs.columns.append "dt",7 conn.tables.append rs set rs=nothing %> 字段类型备注： 203 备注 7 日期/时间 128 二进制 11 布尔 6 货币 133 日期 134 时间 135 日期时间 5 双精度 4 单精度 3 数字 204 二进制 202 字符串 定义“自动编号”的语法为： CREATE TABLE board(ProblemID AUTOINCREMENT) 另一种示例： sql="create table mytable (m_id integer identity(1,1) primary key,m_class varchar(50) not null default 'AAA',m_int integer not null,m_numeric NUMERIC(6,2),m_money money not null default 0.00,m_memo text,m_date date default date(),m_boolean bit default yes,m_blob OLEObject,m_double double,m_float real)" '说明 'm_id integer identity(1,1) primary key自动编号字段并制作主键 'm_class varchar(50) not null default 'AAA'文本型，长度50，非空，默认值：AAA 'm_int integer not null数字，长整型，非空 'm_numeric NUMERIC(6,2)数字,小数，精度6，数值范围2 'm_money money not null default 0.00货币，必添字段（非空）,默认0 'm_memo text备注 'm_date date default date()日期/时间，默认当前日期（年月日） '表中的各种数据类型基本都有了 ASP创建数据库，新建数据表、字段(2010-09-19 11:58:00)
在已有数据库中创建表 <% set conn=server.CreateObject("adodb.connection") sql="provider=microsoft.jet.oledb.4.0;data source="&server.MapPath("BOOK.mdb") conn.open sql Conn.Execute("create table bbb(id AUTOINCREMENT(1,1),p_id text(100),ee money,ff datetime default date(),gg guid,hh single default 50,ii double,jj smallint,kk long,ll image,mm memo,oo yesno not null,pp TINYINT,qq numeric(18,4),aa binary,bb bit,cc smallint,id int)") %> 将a表另外复制一个b表（只复制结构，不含数据） <% Set rs= Server.CreateObject("ADODB.Recordset") sql="select * into b from a where 1=0" rs.open sql,conn,1,1 rs.update rs.close set rs=nothing %> 将a表另外复制一个b表（包括制结构和数据） <% Set rs= Server.CreateObject("ADODB.Recordset") sql="select * into b from a rs.open sql,conn,1,1 rs.update rs.close set rs=nothing %> 新建数据库并新建表 <% '首先建立一个数据库文件 set conn=server.createobject("adox.catalog") conn.create "provider=microsoft.jet.oledb.4.0;"&"data source="&server.mappath("lifeda1.mdb") %> <% '向该数据库中建立相应表格 set rs=server.createobject("adox.table") '该表格名称 rs.name="aaaa" '该表格字段(字段类型见相关附录) rs.columns.append "id" ,3 rs.columns.append "liuyan",203 rs.columns.append "dt",7 conn.tables.append rs set rs=nothing %> 字段类型备注： 203 备注 7 日期/时间 128 二进制 11 布尔 6 货币 133 日期 134 时间 135 日期时间 5 双精度 4 单精度 3 数字 204 二进制 202 字符串 定义“自动编号”的语法为： CREATE TABLE board(ProblemID AUTOINCREMENT) 另一种示例： sql="create table mytable (m_id integer identity(1,1) primary key,m_class varchar(50) not null default 'AAA',m_int integer not null,m_numeric NUMERIC(6,2),m_money money not null default 0.00,m_memo text,m_date date default date(),m_boolean bit default yes,m_blob OLEObject,m_double double,m_float real)" '说明 'm_id integer identity(1,1) primary key自动编号字段并制作主键 'm_class varchar(50) not null default 'AAA'文本型，长度50，非空，默认值：AAA 'm_int integer not null数字，长整型，非空 'm_numeric NUMERIC(6,2)数字,小数，精度6，数值范围2 'm_money money not null default 0.00货币，必添字段（非空）,默认0 'm_memo text备注 'm_date date default date()日期/时间，默认当前日期（年月日） '表中的各种数据类型基本都有了 ASP创建数据库，新建数据表、字段(2010-09-19 11:58:00)
在已有数据库中创建表 <% set conn=server.CreateObject("adodb.connection") sql="provider=microsoft.jet.oledb.4.0;data source="&server.MapPath("BOOK.mdb") conn.open sql Conn.Execute("create table bbb(id AUTOINCREMENT(1,1),p_id text(100),ee money,ff datetime default date(),gg guid,hh single default 50,ii double,jj smallint,kk long,ll image,mm memo,oo yesno not null,pp TINYINT,qq numeric(18,4),aa binary,bb bit,cc smallint,id int)") %> 将a表另外复制一个b表（只复制结构，不含数据） <% Set rs= Server.CreateObject("ADODB.Recordset") sql="select * into b from a where 1=0" rs.open sql,conn,1,1 rs.update rs.close set rs=nothing %> 将a表另外复制一个b表（包括制结构和数据） <% Set rs= Server.CreateObject("ADODB.Recordset") sql="select * into b from a rs.open sql,conn,1,1 rs.update rs.close set rs=nothing %> 新建数据库并新建表 <% '首先建立一个数据库文件 set conn=server.createobject("adox.catalog") conn.create "provider=microsoft.jet.oledb.4.0;"&"data source="&server.mappath("lifeda1.mdb") %> <% '向该数据库中建立相应表格 set rs=server.createobject("adox.table") '该表格名称 rs.name="aaaa" '该表格字段(字段类型见相关附录) rs.columns.append "id" ,3 rs.columns.append "liuyan",203 rs.columns.append "dt",7 conn.tables.append rs set rs=nothing %> 字段类型备注： 203 备注 7 日期/时间 128 二进制 11 布尔 6 货币 133 日期 134 时间 135 日期时间 5 双精度 4 单精度 3 数字 204 二进制 202 字符串 定义“自动编号”的语法为： CREATE TABLE board(ProblemID AUTOINCREMENT) 另一种示例： sql="create table mytable (m_id integer identity(1,1) primary key,m_class varchar(50) not null default 'AAA',m_int integer not null,m_numeric NUMERIC(6,2),m_money money not null default 0.00,m_memo text,m_date date default date(),m_boolean bit default yes,m_blob OLEObject,m_double double,m_float real)" '说明 'm_id integer identity(1,1) primary key自动编号字段并制作主键 'm_class varchar(50) not null default 'AAA'文本型，长度50，非空，默认值：AAA 'm_int integer not null数字，长整型，非空 'm_numeric NUMERIC(6,2)数字,小数，精度6，数值范围2 'm_money money not null default 0.00货币，必添字段（非空）,默认0 'm_memo text备注 'm_date date default date()日期/时间，默认当前日期（年月日） '表中的各种数据类型基本都有了 ASP创建数据库，新建数据表、字段(2010-09-19 11:58:00)
在已有数据库中创建表 <% set conn=server.CreateObject("adodb.connection") sql="provider=microsoft.jet.oledb.4.0;data source="&server.MapPath("BOOK.mdb") conn.open sql Conn.Execute("create table bbb(id AUTOINCREMENT(1,1),p_id text(100),ee money,ff datetime default date(),gg guid,hh single default 50,ii double,jj smallint,kk long,ll image,mm memo,oo yesno not null,pp TINYINT,qq numeric(18,4),aa binary,bb bit,cc smallint,id int)") %> 将a表另外复制一个b表（只复制结构，不含数据） <% Set rs= Server.CreateObject("ADODB.Recordset") sql="select * into b from a where 1=0" rs.open sql,conn,1,1 rs.update rs.close set rs=nothing %> 将a表另外复制一个b表（包括制结构和数据） <% Set rs= Server.CreateObject("ADODB.Recordset") sql="select * into b from a rs.open sql,conn,1,1 rs.update rs.close set rs=nothing %> 新建数据库并新建表 <% '首先建立一个数据库文件 set conn=server.createobject("adox.catalog") conn.create "provider=microsoft.jet.oledb.4.0;"&"data source="&server.mappath("lifeda1.mdb") %> <% '向该数据库中建立相应表格 set rs=server.createobject("adox.table") '该表格名称 rs.name="aaaa" '该表格字段(字段类型见相关附录) rs.columns.append "id" ,3 rs.columns.append "liuyan",203 rs.columns.append "dt",7 conn.tables.append rs set rs=nothing %> 字段类型备注： 203 备注 7 日期/时间 128 二进制 11 布尔 6 货币 133 日期 134 时间 135 日期时间 5 双精度 4 单精度 3 数字 204 二进制 202 字符串 定义“自动编号”的语法为： CREATE TABLE board(ProblemID AUTOINCREMENT) 另一种示例： sql="create table mytable (m_id integer identity(1,1) primary key,m_class varchar(50) not null default 'AAA',m_int integer not null,m_numeric NUMERIC(6,2),m_money money not null default 0.00,m_memo text,m_date date default date(),m_boolean bit default yes,m_blob OLEObject,m_double double,m_float real)" '说明 'm_id integer identity(1,1) primary key自动编号字段并制作主键 'm_class varchar(50) not null default 'AAA'文本型，长度50，非空，默认值：AAA 'm_int integer not null数字，长整型，非空 'm_numeric NUMERIC(6,2)数字,小数，精度6，数值范围2 'm_money money not null default 0.00货币，必添字段（非空）,默认0 'm_memo text备注 'm_date date default date()日期/时间，默认当前日期（年月日） '表中的各种数据类型基本都有了 ASP创建数据库，新建数据表、字段(2010-09-19 11:58:00)
在已有数据库中创建表 <% set conn=server.CreateObject("adodb.connection") sql="provider=microsoft.jet.oledb.4.0;data source="&server.MapPath("BOOK.mdb") conn.open sql Conn.Execute("create table bbb(id AUTOINCREMENT(1,1),p_id text(100),ee money,ff datetime default date(),gg guid,hh single default 50,ii double,jj smallint,kk long,ll image,mm memo,oo yesno not null,pp TINYINT,qq numeric(18,4),aa binary,bb bit,cc smallint,id int)") %> 将a表另外复制一个b表（只复制结构，不含数据） <% Set rs= Server.CreateObject("ADODB.Recordset") sql="select * into b from a where 1=0" rs.open sql,conn,1,1 rs.update rs.close set rs=nothing %> 将a表另外复制一个b表（包括制结构和数据） <% Set rs= Server.CreateObject("ADODB.Recordset") sql="select * into b from a rs.open sql,conn,1,1 rs.update rs.close set rs=nothing %> 新建数据库并新建表 <% '首先建立一个数据库文件 set conn=server.createobject("adox.catalog") conn.create "provider=microsoft.jet.oledb.4.0;"&"data source="&server.mappath("lifeda1.mdb") %> <% '向该数据库中建立相应表格 set rs=server.createobject("adox.table") '该表格名称 rs.name="aaaa" '该表格字段(字段类型见相关附录) rs.columns.append "id" ,3 rs.columns.append "liuyan",203 rs.columns.append "dt",7 conn.tables.append rs set rs=nothing %> 字段类型备注： 203 备注 7 日期/时间 128 二进制 11 布尔 6 货币 133 日期 134 时间 135 日期时间 5 双精度 4 单精度 3 数字 204 二进制 202 字符串 定义“自动编号”的语法为： CREATE TABLE board(ProblemID AUTOINCREMENT) 另一种示例： sql="create table mytable (m_id integer identity(1,1) primary key,m_class varchar(50) not null default 'AAA',m_int integer not null,m_numeric NUMERIC(6,2),m_money money not null default 0.00,m_memo text,m_date date default date(),m_boolean bit default yes,m_blob OLEObject,m_double double,m_float real)" '说明 'm_id integer identity(1,1) primary key自动编号字段并制作主键 'm_class varchar(50) not null default 'AAA'文本型，长度50，非空，默认值：AAA 'm_int integer not null数字，长整型，非空 'm_numeric NUMERIC(6,2)数字,小数，精度6，数值范围2 'm_money money not null default 0.00货币，必添字段（非空）,默认0 'm_memo text备注 'm_date date default date()日期/时间，默认当前日期（年月日） '表中的各种数据类型基本都有了 ASP创建数据库，新建数据表、字段(2010-09-19 11:58:00)
在已有数据库中创建表 <% set conn=server.CreateObject("adodb.connection") sql="provider=microsoft.jet.oledb.4.0;data source="&server.MapPath("BOOK.mdb") conn.open sql Conn.Execute("create table bbb(id AUTOINCREMENT(1,1),p_id text(100),ee money,ff datetime default date(),gg guid,hh single default 50,ii double,jj smallint,kk long,ll image,mm memo,oo yesno not null,pp TINYINT,qq numeric(18,4),aa binary,bb bit,cc smallint,id int)") %> 将a表另外复制一个b表（只复制结构，不含数据） <% Set rs= Server.CreateObject("ADODB.Recordset") sql="select * into b from a where 1=0" rs.open sql,conn,1,1 rs.update rs.close set rs=nothing %> 将a表另外复制一个b表（包括制结构和数据） <% Set rs= Server.CreateObject("ADODB.Recordset") sql="select * into b from a rs.open sql,conn,1,1 rs.update rs.close set rs=nothing %> 新建数据库并新建表 <% '首先建立一个数据库文件 set conn=server.createobject("adox.catalog") conn.create "provider=microsoft.jet.oledb.4.0;"&"data source="&server.mappath("lifeda1.mdb") %> <% '向该数据库中建立相应表格 set rs=server.createobject("adox.table") '该表格名称 rs.name="aaaa" '该表格字段(字段类型见相关附录) rs.columns.append "id" ,3 rs.columns.append "liuyan",203 rs.columns.append "dt",7 conn.tables.append rs set rs=nothing %> 字段类型备注： 203 备注 7 日期/时间 128 二进制 11 布尔 6 货币 133 日期 134 时间 135 日期时间 5 双精度 4 单精度 3 数字 204 二进制 202 字符串 定义“自动编号”的语法为： CREATE TABLE board(ProblemID AUTOINCREMENT) 另一种示例： sql="create table mytable (m_id integer identity(1,1) primary key,m_class varchar(50) not null default 'AAA',m_int integer not null,m_numeric NUMERIC(6,2),m_money money not null default 0.00,m_memo text,m_date date default date(),m_boolean bit default yes,m_blob OLEObject,m_double double,m_float real)" '说明 'm_id integer identity(1,1) primary key自动编号字段并制作主键 'm_class varchar(50) not null default 'AAA'文本型，长度50，非空，默认值：AAA 'm_int integer not null数字，长整型，非空 'm_numeric NUMERIC(6,2)数字,小数，精度6，数值范围2 'm_money money not null default 0.00货币，必添字段（非空）,默认0 'm_memo text备注 'm_date date default date()日期/时间，默认当前日期（年月日） '表中的各种数据类型基本都有了 |
|
|
