动态修改表结构

注意如果类型转换要考虑类型是否支持转换,比如你把aa转为integer类型必然失败!

创建表、增加/删除字段等操作。

列举注册表相应的odbc键值,得到的键值

创建表  
CREATE   TABLE   employee
(
emp_id   integer
CONSTRAINT   p1_constraint   PRIMARY   KEY   NONCLUSTERED,
fname   CHAR(20)   NOT   NULL,
minitial   CHAR(1)   NULL,
lname   VARCHAR(30)   NOT   NULL,
job_id   SMALLINT   NOT   NULL
DEFAULT   1
REFERENCES   jobs(job_id)   NOT   FOR   REPLICATION
）

增加字段
Alter   table   employee   add   newid   char(5)   null
删除字段
Alter   table   employee   drop   newid  

只要把这些语名嵌入DELPHI中即可,然后调用Query的ExecSql
例:with   Query1   do
begin
    close;
    Sql.Clear;
    Sql.Add( 'Alter   table   employee   add   newid   char(5)   null ');//增加字段
    ExecSql;
end;

ADO
    ADOConnection.GetProcedureNames();
    ADOConnection.GetProcedureNames();
    ADOConnection.GetFieldNames();


    使用TFieldList和TParamList的FieldDescs得到
    字段和过程的参数定义信息.

TADOTable.GetIndexNames();
TADOTable.IndexDefs;

Paradox：
TDatabase.GetTableNames()获取TableName
TDatabase.GetFieldNames()获取指定Table的的字段列表
然后可以用TTable.Field.Size获取指定字段的大小
......................DataType取数据类型
SQL   Server有：
sp_databases       ///数据库
sp_tables             ///返回表
sp_Columns           ///表的列信息，包含类型、大小等等
其它的请参看存储过程

用于MSSQL的SQL语句。可以获的某个数据库下的很多信息。（表为用户表）
包括（表名，字段名，字段类型，字段长度，是否为空，缺省值，是否主键（字段），是否ID（字段））

SELECT   b.name   AS   tablename,   a.name   AS   fieldname,a.xtype,   a.length,   a.isnullable,
(SELECT   c.text
                  FROM   syscomments   c
                  WHERE   a.cdefault   =   c.id)   AS   'DEFAULTSTR ',
                    (SELECT   column_name
                  FROM   INFORMATION_SCHEMA.KEY_COLUMN_USAGE   k
                  WHERE   EXISTS
                                      (SELECT   s.id
                                    FROM   sysobjects   s
                                    WHERE   s.xtype   =   'pk '   AND   s.name   =   k.constraint_name)   AND
                              table_name   =   b.name   AND   column_name   =   a.name)   AS   keystr,
                    (SELECT   c.name
                  FROM   syscolumns   c,   sysobjects   o
                  WHERE   NOT   c.autoval   IS   NULL   AND   o.id   =   c.id   AND   c.name   =   a.name   AND
                              o.name   =   b.name)   AS   idstr
FROM   syscolumns   a,   sysobjects   b
WHERE   a.id   =   b.id   AND   b.type   =   'u '   AND   a.xtype   =   a.xusertype   AND
            b.name   NOT   BETWEEN   'sysmer '   AND   'sysmerz '   AND   b.name   NOT   BETWEEN
            'MSmerge_ '   AND   'MSmerge_z '

SQL   Server
alter   table   yourtable   alter   column   yourcolumn   yourtype(length)

Oracle
alter   table   yourtable   modify   column   yourcolumn   yourtype(length)

Access表结构修改方法

我们用实例来学习一下在修改Access表结构，在ACCESS里，备注类型用Memo表示，所以改变字段的数据类型为备注的SQL为：

我们用实例来学习一下在修改Access表结构，在ACCESS里，备注类型用Memo表示，所以改变字段的数据类型为备注的SQL为：

如果user表有外键，而且你要修改的字段就是外键的话，你就不能再做修改。

Examda提示:下面给出修改为其它类型的SQL(表为tb，字段为ALTER TABLE tb ALTER COLUMN aa Byte 数字[字节]。

ALTER TABLE tb ALTER COLUMN aa Long 数字[长整型]。

ALTER TABLE tb ALTER COLUMN aa Short 数字[整型]。

ALTER TABLE tb ALTER COLUMN aa Single 数字[单精度]。

ALTER TABLE tb ALTER COLUMN aa Double 数字[双精度]。

ALTER TABLE tb ALTER COLUMN aa Currency 货币。

ALTER TABLE tb ALTER COLUMN aa Char 文本。

ALTER TABLE tb ALTER COLUMN aa Text(n) 文本，其中n表示字段大小。

ALTER TABLE tb ALTER COLUMN aa Binary 二进制。

ALTER TABLE tb ALTER COLUMN aa Counter 自动编号。

ALTER TABLE tb ALTER COLUMN aa Memo 备注。

ALTER TABLE tb ALTER COLUMN aa Time 日期/时间。

字符串的话，使用varchar,后面可以带括号来表示长度。

SQL语句实现SQL Server及ACCESS复制表结构或表结构及内容到新的表

更多 0

SQL语句实现，SQL Server 2000 及ACCESS复制旧表OldTable的结构，或结构及内容到新的表NewTable

两个都试过了，下面的代码在这两个数据库中（SQL Server 2000 及ACCESS）都是可以通过的。

--复制表结构为新的表
select * into NewTable from OldTable where 1=2

--复制表结构及内容到新的表
select * into newtable from oldtable

如果您只需要旧表的或以前表的某一些字段，或汇总后的内容合成一个字段的话，可以这样

--复制表结构内的某些字段为新的表
select title,type,price,notes ok into NewTable2 from titles where 1=2

--复制表结构及内容到新的表，可以选择字段
select title,type,price,pub_id-price ok into NewTable2 from titles

您也可以这样,先复制表结构（可以选一些字段为新的表），再插入内容

--复制表结构内的某些字段为新的表
select title y1,type y2,price y3 into yongfa365 from titles where 1=2

--向新的表里添加数据
insert into yongfa365 (y1,y2,y3) select title,type,price from titles

其实，通过以上的例子大家可以看到，无论是复制表结构还是内容，还是汇总的结果都可以到一个新的表里，为什么呢，这时我想起了，可以把(select * from table)当成一个表，那这个问题就有答案了：既然可以把选择结果当成一个表，那这个表就可以保存下来了，直接保存成一个真正的表，供以后使用了。 您可以把上面的黄色字体去掉，代码还是一样可以运行的。

column1 datatype [not null] [not null primary key], column2 datatype [not null],...）
  说明： 
  datatype --是资料的格式，详见表。
  nut null --可不可以允许资料有空的（尚未有资料填入）。
  primary key --是本表的主键。
  2、更改表格 
  alter table table_name add column column_name datatype 
  说明：增加一个栏位（没有删除某个栏位的语法。)
  lter table table_name add primary key (column_name)
  说明：更改表得的定义把某个栏位设为主键。
  alter table table_name drop primary key (column_name)
  说明：把主键的定义删除。
  3、建立索引 
  create index index_name on table_name (column_name)
  说明：对某个表格的栏位建立索引以增加查询时的速度。
  4、删除 
  drop table_name
  drop index_name
  二、资料形态 datatypes
  smallint
  16 位元的整数。
  interger
  32 位元的整数。
  decimal(p,s)
  p 精确值和 s 大小的十进位整数，精确值p是指全部有几个数(digits)大小值，s是指小数后有几位数。如果没有特别指定，则系统会设为 p=5; s=0 。 
  float
  32位元的实数。
  double
  64位元的实数。
  char(n)
  n 长度的字串，n不能超过 254。
  varchar(n)
  长度不固定且其最大长度为 n 的字串，n不能超过 4000。
  graphic(n)
  和 char(n) 一样，不过其单位是两个字元 double-bytes， n不能超过127。这个形态是为支援两个字元长度的字体，例如中文字。
  vargraphic(n)
  可变长度且其最大长度为 n 的双字元字串，n不能超过 2000。
  date
  包含了 年份、月份、日期。
  time
  包含了 小时、分钟、秒。
  timestamp
  包含了 年、月、日、时、分、秒、千分之一秒。
  三、资料操作 dml（data manipulation language)
  资料定义好之后接下来的就是资料的操作。资料的操作不外乎增加资料（insert)、查询资料（query）、更改资料（update) 、删除资料（delete）四种模式，以下分 别介绍他们的语法：
  1、增加资料：
  insert into table_name (column1,column2,...) values ( value1,value2, ...)
  说明：
  1.若没有指定column 系统则会按表格内的栏位顺序填入资料。
  2.栏位的资料形态和所填入的资料必须吻合。
  3.table_name 也可以是景观 view_name。
  insert into table_name (column1,column2,...) select columnx,columny,... from another_table
  说明：也可以经过一个子查询（subquery）把别的表格的资料填入。
  2、查询资料：
  基本查询
  select column1,columns2,... from table_name
  说明：把table_name 的特定栏位资料全部列出来
  select * from table_name where column1 = xxx [and column2 > yyy] [or column3 <> zzz]
  说明：
  1.'*'表示全部的栏位都列出来。
  2.where 之后是接条件式，把符合条件的资料列出来。
  select column1,column2 from table_name order by column2 [desc]
  说明：order by 是指定以某个栏位做排序，[desc]是指从大到小排列，若没有指明，则是从小到大排列
  组合查询
  组合查询是指所查询得资料来源并不只有单一的表格，而是联合一个以上的表格才能够得到结果的。
  select * from table1,table2 where table1.colum1=table2.column1
  说明：
  1.查询两个表格中其中 column1 值相同的资料。
  2.当然两个表格相互比较的栏位，其资料形态必须相同。
  3.一个复杂的查询其动用到的表格可能会很多个。
  整合性的查询：
  select count (*) from table_name where column_name = xxx
  说明：
  查询符合条件的资料共有几笔。
  select sum(column1) from table_name
  说明：
  1.计算出总和，所选的栏位必须是可数的数字形态。
  2.除此以外还有 avg() 是计算平均、max()、min()计算最大最小值的整合性查询。
  select column1,avg(column2) from table_name group by column1 having avg(column2) > xxx
  说明：
  1.group by: 以column1 为一组计算 column2 的平均值必须和 avg、sum等整合性查询的关键字一起使用。 
  2.having : 必须和 group by 一起使用作为整合性的限制。
  复合性的查询
  select * from table_name1 where exists ( select * from table_name2 where conditions )
  说明：
  1.where 的 conditions 可以是另外一个的 query。
  2.exists 在此是指存在与否。
  select * from table_name1 where column1 in ( select column1 from table_name2 where conditions )
  说明： 
  1. in 后面接的是一个集合，表示column1 存在集合里面。
  2. select 出来的资料形态必须符合 column1。 
  其他查询
  select * from table_name1 where column1 like 'x%' 
  说明：like 必须和后面的'x%' 相呼应表示以 x为开头的字串。
  select * from table_name1 where column1 in ('xxx','yyy',..)
  说明：in 后面接的是一个集合，表示column1 存在集合里面。
  select * from table_name1 where column1 between xx and yy
  说明：between 表示 column1 的值介于 xx 和 yy 之间。 
  3、更改资料：
  update table_name set column1='xxx' where conditoins
  说明：
  1.更改某个栏位设定其值为'xxx'。
  2.conditions 是所要符合的条件、若没有 where 则整个 table 的那个栏位都会全部被更改。
  4、删除资料：
  delete from table_name where conditions
  说明：删除符合条件的资料。
  说明：关于where条件后面如果包含有日期的比较，不同数据库有不同的表达式。具体如下：
  (1)如果是access数据库，则为：where mydate>#2000-01-01# 
  (2)如果是oracle数据库，则为：where mydate>cast('2000-01-01' as date) 或：where mydate>to_date('2000-01-01','yyyy-mm-dd')
  在delphi中写成：
  thedate='2000-01-01';
  query1.sql.add('select * from abc where mydate>cast('+''''+thedate+''''+' as date)'); 
  如果比较日期时间型，则为：
  where mydatetime>to_date('2000-01-01 10:00:01','yyyy-mm-dd hh24:mi:ss')