Discussion :

[defluc]

Bonjour

Le code suivant

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
 
   Zquery.Sql.Clear;
   ZQuery.SQL.Add('INSERT INTO TableDiv (');
   ZQuery.SQL.Add('Div,Localite,Commune,DivCode,CadaLang) ');
   ZQuery.SQL.Add('Values (');
   ZQuery.SQL.Add(IntToStr(Division)+','+QuotedStr(Localite) +',');
   ZQuery.SQL.Add(QuotedStr(Commune) +','+ IntToStr(DivCode)+','+ IntToStr(CadaLang)+')');
   Zquery.ExecSQL;

est exécuté sans problème sur certaines machines alors que sur d'autres la dernière instruction provoque l'erreur "Connection lost do database".

La base de données est locale en Firebird 1.5.

L'erreur peut se produire sur des machines qui tournent sous le même OS que d'autres où elle ne se produit pas (Windows 2000 ou XP).

Mon idée est que cela vient donc d'une config différente de windows.

Quelqu'un aurait-il une piste ? (Charset ?)

Merci d'avance

[WolffN]

bonjour

vérifie voir que tous tes postes sont adresse IP fixe -> si DHCP au cours du renouvellement d'adresse la connection est perdue

[defluc]

Merci pour ta réponse mais cela a-t-il vraiment une importance puisque la base de données est en local ?

[WolffN]

je ne sais pas comment te connecte tu a la base ?

une autre hypothese, un firewall bloquerait les ports 3050 et 3060 ?

[defluc]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
 
If RegOpenKeyEx(HKEY_LOCAL_MACHINE, 'SOFTWARE\Firebird Project\Firebird Server\Instances', 0, KEY_READ, Key)
   <> ERROR_SUCCESS Then  //Le moteur Firebird n'est pas installé
      WinExec(PChar(ApplicPath+'bin\InstReg Install -z'),SW_HIDE);
 Try
 if Boolean(FindWindow('FB_Server','FireBird Server')) = False then //   FbGuardian n'est pas actif
  WinExec(PChar(ApplicPath+'bin\InstSvc install -superserver -guardian'),SW_HIDE);
 
ZConnection.DataBase:= ApplicPath + 'CadaCom.Fdb';
ZConnection.User := 'SYSDBA';
ZConnection.Password := 'masterkey';

[makowski]

pourquoi dans ce cas ne pas utiliser la version embeded ?