for i:=1 to 3do
begin
s1=inttostr(i);
s:='alter table 表 add '+s1+' nvarchar(10)';
adoquery1.sql.add(s);
end;
adoquery1.exesql;
在用sql做后台数据库没有问题
在用access时提示我语法错误
我想在access中添加类似的功能该怎么添加呢?
begin
s1=inttostr(i);
s:='alter table 表 add '+s1+' nvarchar(10)';
adoquery1.sql.add(s);
end;
adoquery1.exesql;
在用sql做后台数据库没有问题
在用access时提示我语法错误
我想在access中添加类似的功能该怎么添加呢?
adoquery1.Close;
adoquery1.SQL.Clear;
adoquery1.SQL.Add('alter table b add idMytest int identity(1,1)');
adoquery1.ExecSQL;for i:=1 to 3 do
begin
s1=inttostr(i);
s:='alter table 表 add '+s1+' nvarchar(10)'; //有问题
adoquery1.sql.add(s);
end;
adoquery1.SQL.SaveToFile('C:/123.txt');
看看123.txt,就知道问题出在哪里了
close
clear
add
ExecSQL
begin
s1=inttostr(i);
s:='alter table 表 add '+s1+' nvarchar(10)';
adoquery1.close
adoquery1.sql.clear;
adoquery1.sql.add(s);
adoquery1.exesql;
end;
begin
s1=inttostr(i);
s:='alter table 表 add '+s1+' nvarchar(10)';
adoquery1.close
adoquery1.sql.clear;
adoquery1.sql.add(s);
adoquery1.exesql; //这一句不要写到end;下面去了:
end;