UpsTcp.ConvertirNomEnAdresseTcpIp


Fonction Optimiser(PasDEffetDeBord) ConvertirNomEnAdresseTcpIp(Nom : Caractere, Ip1 : Entier=? Sortie, Ip2 : Entier=? Sortie, Ip3 : Entier=? Sortie, Ip4 : Entier=? Sortie) Retourner Booleen;

Description

La fonction ConvertirNomEnAdresseTcpIp permet de convertir un nom logique en l'adresse Internet qui lui est associée. La liste des associations est définie dans le fichier host.

Si le nom logique n'est associé à aucune adresse Internet, le résultat est Faux. Sinon le résultat est Vrai et les paramètres Ip1, Ip2, Ip3 et Ip4 sont renseignés par l'adresse trouvée.

Exemple


Principal

/*******/

Variable

/******/

	I1 : Entier;

	I2 : Entier;

	I3 : Entier;

	I4 : Entier;



Debut

Si ConvertirNomEnAdresseTcpIp("Andromede", Ip1, Ip2, Ip3, Ip4) Alors

	Ecran.Ecrire(Caractere(Ip1)+"."+ Caractere(Ip2)+"."+Caractere(Ip3)+"."+Caractere(Ip4));

Fin Si

/* Ecrit l'adresse Tcp-Ip de l'ordinateur 'Andromede'. */

Fin Principal

Voir aussi

ConvertirAdresseTcpIpEnNom pour réaliser la conversion inverse.

Traduction


-	-	-	-	-	-	-	-	-