Z
zshan_haina1
Unregistered / Unconfirmed
GUEST, unregistred user!
使用D6开发的三层结构,当提交数据后,应用服务器就无法关闭?
部件
应用服务器端:database,session,query,updatesql.
客户端:SocketConnection,ClientDataSet.
客户端代码:
SocketConnection1.Open;
with ClientDataSet1do
begin
close;
open;
insert;
FieldByName('LOG_NO').asstring:='1111';
FieldByName('log_logtype').asstring:='1';
//上报
FieldByName('log_person').asstring:='user_pname';
FieldByName('log_type').asstring:='2';//电话线
FieldByName('log_date').asstring:=DateTimeToStr(now);
end;
clientdataset1.ApplyUpdates(-1);
clientdataset1.close;
SocketConnection1.close;
如果把clientdataset1.ApplyUpdates(-1);取消,SocketConnection1.close;就可以关闭应用服务器。
奇怪的是使用D5同样的部件和代码,就可以关闭应用服务器!!![]
部件
应用服务器端:database,session,query,updatesql.
客户端:SocketConnection,ClientDataSet.
客户端代码:
SocketConnection1.Open;
with ClientDataSet1do
begin
close;
open;
insert;
FieldByName('LOG_NO').asstring:='1111';
FieldByName('log_logtype').asstring:='1';
//上报
FieldByName('log_person').asstring:='user_pname';
FieldByName('log_type').asstring:='2';//电话线
FieldByName('log_date').asstring:=DateTimeToStr(now);
end;
clientdataset1.ApplyUpdates(-1);
clientdataset1.close;
SocketConnection1.close;
如果把clientdataset1.ApplyUpdates(-1);取消,SocketConnection1.close;就可以关闭应用服务器。
奇怪的是使用D5同样的部件和代码,就可以关闭应用服务器!!![]