j'ai une application Delphi qui travaille avec une base MySQL.
La connexion s'effectue via ADODB.
En local tout fonctionne parfaitement.
Si je travaille su la base située sur le serveur Internet j'obtiens de façon aléatoire le message Server Has gone away
La contrainte que m'impose l'hébergeur est d'ouvrir ma connexion à chaque requete et de refermer ensuite.
Voici mon code avant de passer la requete
une fois l'information récupérée je fais
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11 // par précaution si la laison est restée ouverte While DM_ADOConnection.Connected Do Begin DM_ADOConnection.Close; Application.ProcessMessages; Sleep(3); End; DM_ADOConnection.Open; While Not DM_ADOConnection.Connected Do Begin Application.ProcessMessages; Sleep(3); End;
De ce que j'ai lu sur les forum ce message est lié soit à la taille des informations rapportées par la requete ou au fait que je fais une transactions SQL sur une connexion fermée.
Code : Sélectionner tout - Visualiser dans une fenêtre à part DM_ADOConnection.Close;
Vu que je ramène à chaque fois une seule ligne d'information avec une dizaine de champs je ne pense pas que ce soit le premier cas.
Je voudrais savoir si quelqu'un a déjà rencontré ce problème
Partager