Batch Index du Forum
S’enregistrerRechercherFAQMembresGroupesConnexion
Répondre au sujet Page 1 sur 1
Comment exploiter un fichier texte pour extraire des infos ?
Auteur Message
Répondre en citant
Message Comment exploiter un fichier texte pour extraire des infos ? 
Salut tout le monde !
J'ai crée ce script batch wrapped par un powershell pour extraire des infos à partir d'un fichier texte téléchargé depuis internet
Quand je veux exploiter ce fichier texte pour y extraire par exemple les variables Country, Provider et IP
Alors j'obtiens seulement le country, le provider et l'ip non ? pour quoi je ne sais pas peut-être un mauvais token ou autre ?
Merci
Code:

@echo off
Title My External IP by Hackoo 2015
mode con cols=50 lines=4 & color 0A
set OuputFile=%Temp%\myexternalip.txt
set PSFile=%Temp%\tmp.ps1
(
echo $wc = new-object System.Net.WebClient
echo $wc.DownloadString("http://myexternalip.com/raw"^)
echo $wc.DownloadString("http://ip-api.com/csv/"^) ^> %OuputFile%
)>%PSFile%
cmd /c PowerShell.exe -ExecutionPolicy bypass -noprofile -file %PSFile%
Del %PSFile%
pause
cls
FOR /F "delims=, tokens=2,11,13" %%a in ('Type %OuputFile%') do (set Country=%%a & set Provider=%%b & set IP=%%c)
echo Country  --^> %Country%
echo Provider  --^> %Provider%
echo IP Adress --^> %IP%
pause
if exist %OuputFile% Start %OuputFile%





______________________________________________________
Mes Contributions en Téléchargement
Message Publicité 
PublicitéSupprimer les publicités ?


Répondre en citant
Message Comment exploiter un fichier texte pour extraire des infos ? 
Un token n'est pas bon, l'ip est le token 14 et non le 13.

EDIT: je viens de faire une version avec l'IPV4 et l'IPV6

Code:
@echo off
Title My External IP by Hackoo 2015
mode con cols=50 lines=7 & color 0A
set OuputFile=%Temp%\myexternalip.txt
set PSFile=%Temp%\tmp.ps1
(
echo $wc = new-object System.Net.WebClient
echo $wc.DownloadString("http://ip-api.com/csv/"^) + ',' + $wc.DownloadString("http://myexternalip.com/raw"^) ^> %OuputFile%
)>%PSFile%
cmd /c PowerShell.exe -ExecutionPolicy bypass -noprofile -file %PSFile%
Del %PSFile%
:: pause
cls
FOR /F "delims=, tokens=2,11,14,15" %%a in ('Type %OuputFile%') do (set Country=%%a & set Provider=%%b & set IPV4=%%c & set IPV6=%%d)
echo ----------------------------
echo Country  --^> %Country%
echo Provider  --^> %Provider%
echo IPV4 --^> %IPV4%
echo IPV6 --^> %IPV6%
echo ----------------------------
pause
if exist %OuputFile% Start %OuputFile%





______________________________________________________
Partager permet le savoir. Le savoir permet de partager de nouveau savoirs.
Répondre en citant
Message Comment exploiter un fichier texte pour extraire des infos ? 
XD ça me rapelle que j'avais fait avec sacha la même chose sauf avec du VBS Laughing

Code:

@echo off
title=IP2Localisation MAPS - By Skywalker ^& Sacha

call :make

for /f %%a in ('cscript.exe getcount.vbs "http://myexternalip.com/raw"') do (
set "IP=%%a"
set pass1=TRUE
)

:new

if not %pass1%==TRUE (echo. &echo. &set /p "IP=Tapez une IP : ") else (set pass1=FALSE)

call :make

for /f "tokens=1-20 delims=," %%a in ('cscript.exe getcount.vbs http://ip-api.com/csv/%IP%') do (
cls
echo IP PUBLIQUE : %IP%
echo STATUT      : %%a
echo PAYS        : %%b
echo PAYS MIN    : %%c
echo REGION      : %%e
echo VILLE       : %%f
echo LATITUDE    : %%g
echo LONGITUDE   : %%h
echo TIMEZONE    : %%i
echo ISP         : %%j
echo FAI         : %%k
echo AS NAME     : %%l
if not %IP%==%%m echo IP LOCALE   : %%m

set LA=%%g
set LO=%%h
set "VI=%%b-%%f"

)

start https://www.google.fr/maps/place/%VI%
::start https://www.google.fr/maps/@%LA%,%LO%,11z
::start https://www.google.fr/maps/@%LA%,%LO%,11z/data=!3m1!1e3 <- Pour l'affichage des fotos satellite

if exist GetCount.vbs del GetCount.vbs &goto new

:make
If not exist Getcount.vbs ((
echo Dim o
echo Var1=Wscript.Arguments(0^)
echo Set o = CreateObject("MSXML2.XMLHTTP"^)
echo o.open "GET", var1, False
echo o.send
echo wscript.echo o.responseText
)>GetCount.vbs
)
goto :eof





______________________________________________________
Visiter le site web du posteur
Message Comment exploiter un fichier texte pour extraire des infos ? 


Montrer les messages depuis:
Répondre au sujet Page 1 sur 1
  



Index | créer un forum | Forum gratuit d’entraide | Annuaire des forums gratuits | Signaler une violation | Conditions générales d'utilisation
Copyright 2008 - 2016 // Batch