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.
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)
|