[..] Demande d'aide pour test valeur adresse IP

[hakim]

Bonjour,

je traduit un script .bat en AU3

Ce script comporte pas mal de partie, que j'ai réussi (non sans mal) à faire fonctionner en AU3.
-lancement d'application ( client VPN)
-boite de dialogue pour entrer : serveur de connexion + login/mot de passe.
-Mapping de lecteur réseau.


Seulement voila je ne sais pas par quelle bout commencer pour la partie "vérification de l'adresse IP:"

En theorie le mapping ne peux commencer que si la connexion vpn est établie.
la manière dont je compte m'y prendre est la suivante:
-tant que l'adresse ip n'est pas de type 192.168.2.*
-si ça correspond alors mapping des lecteurs réseaux

Cela m'agace, car au niveau algorithmique, je vois bien les étapes, mais je ne sais pas comment le traduire en langage Autoit !!

La partie qui pour moi me semble un peu plus ardue la voici en bat

Code : Tout sélectionner

:Boucle
ipconfig /all > text.txt
findstr "XXX.XXX.XXX" text.txt
if %errorlevel%==0 goto Start
goto Boucle
 

merci de me lire et pour votre aide.

[sylvanie]

Bonjour Hakim,

Personnellement j'utiliserai les macro @IPaddress1, ... , @IPaddress4 pour récupérer les addresses (si par contre les machines ciblespeuvent avoir plus de 4 interfaces, alors il faudra utiliser une redirection de ipcinfig).

Puis j'utiliserai la fonction Stringinstr pour localiser le début de l'adresse VPN :

Code : Tout sélectionner

$ip1=@IPAddress1
If StringInStr($ip1,"387.400.660.") Then
    ConsoleWrite("Adresse VPN détectée, on passe à la suite ..."&@CRLF)
EndIf
 

Pour adapter aux 4 ip potentielles, on peut faire un copier /coller et remplacer les indices.
Ou bien, passer par une boucle for, et faire de l'assignation de variable dynamique (n'ayons pas peur des mots, voici l'exemple : )

► Afficher le texte

Code : Tout sélectionner

For $ind = 1 To 4
    Assign("ip"&$ind,Execute("@IPAddress"&$ind))
    ConsoleWrite("ip"&$ind&" = "&Eval("ip"&$ind)&@CRLF)
    If StringInStr(Eval("ip"&$ind),"387.400.660.") Then
        ConsoleWrite("Adresse VPN détectée, on passe à la suite ..."&@CRLF)
    EndIf
Next
 

Bonne continuation

[edit] : remplacement des addresse IP par des bidons, et tant qu'à faire allons y dans le délir

[hakim]

Bonjour,

Merci !!!
je vais tester ça et jouer un peu avec, histoire de comprendre un peu plus en détail.

Ps:OOOOOoooops !!
je pensais avoir virer les adresses ip dans mon exemple je viens de modifier mon premier post, peux tu supprimer les adress ip de tes exemples, ça me géne un peu de les voir là.

[sylvanie]

A y est