pictogram Auteur: Patrick Biker
Date: 18 mars 2006
Maj : 21 Mars 2015

Exemples évolués

Chaque exemple montre une utilisation pratique de la fonction du WLangage.

Quand plusieurs syntaxes sont possibles, chacune est illustrée indépendamment.

Revenir à la page des exemples évolués


L'exemple suivant permet d'envoyer un message Windows personnalisé du poste client vers le poste serveur et de récupérer ce message sur le poste serveur grâce à la fonction Evénement.



// Sur le poste client
hConnect est un entier
hConnect = NetConnecte("148.61.125.245", ServeurRPC , "GUEST", "")
...
// Coté client : envoi d'un message Windows au serveur
NetEnvoieMessage(hConnect, "MonMessage")
// Sur le poste serveur
Evénement("RéceptionMessage", "*.*", "MonMessage")
// Procédure RéceptionMessage
Procédure RéceptionMessage()
Trace("Message reçu")
...
NetEnvoieMessageClient(idServeur, "Reçu", 0, 0)