Ado 的问题？？？出问题了请找一下问题？？？ (12分)

裴小锴 · 2002-11-29

Aquery:=TadoQuery.Create(nil);
Aquery.Connection :=ADOConnection1;
with Aquery do
begin
close;
sql.Add('create table "mz"');
sql.Add('(d_s_mzdm char(3), ');
sql.Add('d_s_mzmc char(20))');
end;
Aquery.ExecSQL;
Aquery.Close;

xj_liyq · 2002-11-29

到底提示信息是什么？
Aquery:=TadoQuery.Create(nil);
把nil 换成Application

王公子 · 2002-11-29

with Aquery do
begin
close;
sql.clear;
sql.Add('create table mz');
sql.Add('(d_s_mzdm char(3), ');
sql.Add('d_s_mzmc char(20))');
end;

雪中漫步 · 2002-11-29

我试过你的代码了，没有出错，而且表也生成了啊
你的代码只是不太严谨，如果你Tadoquery.create(nil),则最后一定要free掉
建议用Tadoquery.create(self);
还有sql.add前 sql.clear;

裴小锴 · 2002-11-29

我是在一个procedure 中进行操作的不知道你们是在什么样的环境中用的？？/

vefar · 2002-11-29

把你的错误提示贴出来吧，SQL SERVER 中没有出错。

雪中漫步 · 2002-11-29

我把你的代码原封不动的考下来，在一个按钮里实现的

裴小锴 · 2002-11-29

self 是什么？？/呀

wm1010 · 2002-11-29

self就是指AQuery呀! 如下:
Aquery:=TadoQuery.Create(Self);
Aquery.Connection :=ADOConnection1;
with Aquery do
begin
close;
sql.Clear;
sql.Add('create table mz (d_s_mzdm char(3),d_s_mzmc char(20))');
ExecSQL;
Close;
end;

裴小锴 · 2002-11-29

程序中可以用么？？？

TheMayDay · 2002-11-30

笨蛋，把代码改成如下就一切OK了.
Aquery:=TadoQuery.Create(nil);
Aquery.Connection :=ADOConnection1;
with Aquery do
begin
close;
sql.Add('create table mz');
sql.Add('(d_s_mzdm char(3), ');
sql.Add('d_s_mzmc char(20))');
end;
Aquery.ExecSQL;
Aquery.Close;

Ado 的问题？？？出问题了请找一下问题？？？ (12分)

裴小锴

Unregistered / Unconfirmed

xj_liyq

Unregistered / Unconfirmed

王公子

Unregistered / Unconfirmed

雪中漫步

Unregistered / Unconfirmed

裴小锴

Unregistered / Unconfirmed

vefar

Unregistered / Unconfirmed

雪中漫步

Unregistered / Unconfirmed

裴小锴

Unregistered / Unconfirmed

wm1010

Unregistered / Unconfirmed

裴小锴

Unregistered / Unconfirmed

TheMayDay

Unregistered / Unconfirmed

Similar threads