如果sql server没有启动，客户端如何取得错误信息？

[lizongqi]

三层结构
sqlserver+ado+socketconnection

如果sql server没有启动，客户端登陆的时候，很长时间没有反应，try..except捕捉不到错误。怎么才能将应用程序服务器连接sql server的错误传给客户端？或者如何在客户端处理这种错误？

谢谢了。

[eastliangliang]

有没有超时限制？应该返回一个“连接失败”的异常的。

[lizongqi]

我用单步执行应用程序服务器。发现运行应用程序服务器，并没有执行一下这段程序。不知道为什么
procedure TcrmServer.RemoteDataModuleCreate(Sender: TObject);
begin
try
adocnnMain.Connected:=false;
adocnnMain.Connected:=true;
except
on E:Exception do
Raise Exception.create(E.Message);

end;
end;

那什么时候才执行呢？或者怎么才能自己创建服务器对象呢？

[eastliangliang]

客户端调用CocrmServer.Create;时就应该创建服务器对象的。
可以从组件服务中看到是否已创建了对象。

[lizongqi]

如何判断超时？用ttimer?

[eastliangliang]

AODConnection自己有Timeout属性啊，不用Timer。

[lizongqi]

老兄,三层里面,adoconnection timeout传不到客户端阿

[eastliangliang]

procedure TcrmServer.RemoteDataModuleCreate(Sender: TObject);
begin
try
adocnnMain.Connected:=false;
adocnnMain.Connected:=true;//超时应该出现异常，会被捕获的。
except
on E:Exception do
Raise Exception.create(E.Message);

end;
end;

[lizongqi]

我是过了，c/s结构中timeout用try..excpet可以捕捉到错误
三层中，不行。

[eastliangliang]

你不是说没执行TcrmServer.RemoteDataModuleCreate吗？
如果执行了，在三层中，异常是可以返回到客户端的。
客户端创建对象时就应该执行的，至于为什么不执行，惭愧啊……：）

[lizongqi]

procedure TcrmServer.RemoteDataModuleCreate(Sender: TObject);
begin
try
adocnnMain.Connected:=false;
adocnnMain.Connected:=true;
except
on E:Exception do
Raise Exception.create(E.Message);

end;
end;

[lizongqi]

为何在应用程序服务器端也捕捉不到错误？？？？？？？？？？？？？？？？