用TQuery:
Query1.Close;
Query1.SQL.Clear;
Query1.SQL.Add(Insert Into MyTable Values(1,23,aa));
Query1.ExecSQL; 如果是Select 语句则把Query1.ExecSQL改为Query1.Open.
用TADOQuery同上.
用TADODataset(只能Select):
ADODataset1.Close;
ADODAtaset1.CommandText:=Select * from MyTable;
ADODataset1.Open;
for i:=0 to ds1.RecordCount-1 do begin
ShowMessage(ds1.FieldValues['name']);
ds1.Next ;
end;
用TADOCommand(不能Select):
ADOCommand1.CommandText:=Insert Into MyTable Values(1,23,aa);
ADOCommand1.Execute
如何在Delphi中动态创建表
用adoquery这个控件
先连接好数据库
adoquery1.close;
adoquery1.sql.clear;
adoquery1.sql.add('create table 表名( 学号 char(20),姓名 char(20),班级 char(20))');
adoquery1.execsql;
可以了.
|
请发表评论