sSourcePage est une chaîne ANSI sIPPublic est une chaîne ANSI
SI HTTPRequête("http://checkip.dyndns.org")=Vrai ALORS sSourcePage = HTTPDonneRésultat() sIPPublic=sSourcePage[[Position(sSourcePage,": ")+2 A Position(sSourcePage,"</body>")-1]] FIN MoiMême=sIPPublic |