13,822
社区成员
发帖
与我相关
我的任务
分享
TADOQuery * pado=new TADOQuery(NULL);
pado->Connection=this->ADOConnection1 ;
//建立两个表测试:
pado->SQL->Add("if OBJECT_ID('A') is not null drop table A;\
if OBJECT_ID('B') is not null drop table B;\
create table A ( a1 INT PRIMARY KEY, a2 varchar(2));\
CREATE TABLE B ( b1 INT PRIMARY KEY, b2 varchar(2));\
INSERT INTO A SELECT 1,'<' UNION ALL SELECT 2,'√' union all SELECT 3,'>'");
pado->ExecSQL();
pado->Close();
pado->SQL->Clear();
pado->SQL->Add("insert into B (b1,b2) select a1,:a2 from A where a1=2");
pado->Parameters->ParamByName("a2")->Value="√";
pado->ExecSQL();