Discussion :

[buzz68180]

Bonjour,

J'ai un client qui rencontre régulièrement des problèmes de connexion (micro coupure), cela bloque l'utilisateur en cas de redémarrage de l'application car en mode C/S , connaissez vous un moyen de déconnecté le poste client dans ce cas de figure ?

Merci pour les infos...

[frenchsting]

Il y a déjà eu un topic là-dessus dans le forum. La question est plutot de savoir pourquoi le poste se déconnecte (état des câbles et des prises, surcharge du réseau, ...).

[miripesage]

Bonjour, peut-être ceci :

Code :

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

1
2
HClient.Machine = "NomDuPoste" ou "Adresse IP du poste"
HDéconnecteClient("MaConnexion")

[buzz68180]

oui, le problème ce que HDéconnecteClient déconnecte Tout les clients

[miripesage]

non, tu peux déconnecter le client en question avec soit :

Code :

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

1
2
HClient.Machine="IP"//ou
HClient.Login="login"

[buzz68180]

Ok, ca marche merci , voici le code pour info aux autres membres :

Code :

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

1
2
3
4
5
6
7
8
9
10
 
 
// Déconnexion des utilisateurs de la base de données
i est un entier =TableSelect(TABLE_Connexions)
HClient.Base = gConnexionBase..BaseDeDonnées
HClient.Login = TABLE_Connexions.Login[i]
HDéconnecteClient(gConnexionBase, "Attention : Déconnexion imminente"+RC+"de l'utilisateur : "+HClient.Login,15)
SI PAS HEnvoieMessageVersClient(gConnexionBase, "Attention : Déconnexion imminente",500) ALORS
	Info("Erreur d'envoi du message")
FIN