I'm trying to connect from one computer to another in a Ethernet LAN,
using the following code. The OS for all computer is Win2000Pro, the
client/server SGDB Firebird 1.0:

if (CName = 'SERVIDOR') then
DataMod.dbCVEmpresa.DatabaseName:= 'C:\CvEmp\DBCVEMP.gdb'
else if Length(Trim(CName)) > 1 then
DataMod.dbCVEmpresa.DatabaseName:= 'G:\CvEmp\DBCVEMP.gdb';

try
DataMod.dbCVEmpresa.Connected:= True;
except
try
DataMod.dbCVEmpresa.DatabaseName:= 'Server:C:\CvEmp\DBCVEMP.gdb';
DataMod.dbCVEmpresa.Connected:= True;
except
Application.Terminate;
end;
end;

Works ONLY on the Server.
The software FB1.0 is installed in all machines.

Thanks

Moacir