//给你个sql的例子 adoquery1.close; adoquery1.sql.clear; adoquery1.sql.add( ‘create table employee_tbl (id char(9) not null,name varchar(40) not null, city varchar(40) not null);’); adoquery1.ExecSQL; 你只要在add()中写代码就行了。
试试这个create table [;DATABASE = d:\test.employee_tbl](id char(9) not null,name varchar(40) not null, city varchar(40) not null)
table1.Close; table1.Active:=false; table1.Exclusive:=true; table1.TableName:='d:\zz\sds'; table1.TableType:=ttFOXPRO; with table1.FieldDefs do begin clear; with addfielddef do begin name:='bh'; datatype:=FTSTRING; size:=10; end; with addfielddef do begin name:='bh1'; datatype:=FTinteger; // size:=6; end; with addfielddef do begin name:='bh2'; datatype:=FTboolean; end; end; table1.CreateTable; end; 在D6中建表,有些字段长度是不能改变的
adoquery1.close;
adoquery1.sql.clear;
adoquery1.sql.add( ‘create table employee_tbl (id char(9) not null,name varchar(40) not null, city varchar(40) not null);’);
adoquery1.ExecSQL;
你只要在add()中写代码就行了。
table1.Active:=false;
table1.Exclusive:=true;
table1.TableName:='d:\zz\sds';
table1.TableType:=ttFOXPRO;
with table1.FieldDefs do
begin
clear;
with addfielddef do
begin
name:='bh';
datatype:=FTSTRING;
size:=10;
end;
with addfielddef do
begin
name:='bh1';
datatype:=FTinteger;
// size:=6;
end;
with addfielddef do
begin
name:='bh2';
datatype:=FTboolean;
end;
end;
table1.CreateTable;
end;
在D6中建表,有些字段长度是不能改变的