用线程更新数据库记录的问题，高手进，在线等(50)

L

lcmlhs

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2010-05-04

• #1

更新一个数据表table1adodataset1.openwhile not adodataset1.eofdo
begin
adodataset1.edit;
adodataset1.fieldbyname("字段1").asstring:=变量;
adodataset1.post;
adodataset2.next;
end;
上面不放到线程的时候正常，一放到线程类的onexecute方法里，就会报异常，什么原因啊

 

F

faunter

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2010-05-04

• #2

陪你等

 

M

muhx

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2010-05-07

• #3

Should use a Session in Thread.

 

L

liuls

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2010-05-08

• #4

要用到 CoInitialize()?

 

Q

qiuyan81

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2010-05-09

• #5

com组建在线程里面调用需要CoInitialize()

 

D

duxing

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2010-05-13

• #6

Result := False;
CoInitialize(Nil);
ADOQ := TADOQuery.Create(Nil);
ADOQ.ConnectionString := conString;
Try With ADOQdo
begin
Close;
SQL.Clear;
SQL.Add(SQLString);
Try ExecSQL;
Except SaveIniDate(SQLString);
Exit;
end;
Result := True;
end;
Finally ADOQ.Close;
FreeAndNil(ADOQ);
CoUninitialize;只是我写的调用 线程里面的 更新函数

 

刀

刀疤董

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2010-05-18

• #7

adodataset1.open;adodataset1.first;
///////是不是需要这行代码while not adodataset1.eofdo
begin
adodataset1.edit;
adodataset1.fieldbyname("字段1").asstring:=变量;
adodataset1.post;
adodataset2.next;
end;