Bat lancé dans un autre :( [Résolu]

Signaler
Messages postés
3103
Date d'inscription
samedi 14 février 2009
Statut
Contributeur sécurité
Dernière intervention
11 juillet 2021
-
Messages postés
13618
Date d'inscription
lundi 2 mars 2009
Statut
Contributeur
Dernière intervention
26 juillet 2021
-
Bonjour les z'amis,

J'ai un soucis sur un batch, j'ai bidouillé un truc pour afficher ma clé wi-fi qui fonctionne très bien et me créé bien un txt en plus ! ok

setlocal enabledelayedexpansion

for /F "tokens=2 delims=:" %%a in ('netsh wlan show profile') do (
set wifi_pwd=
for /F "tokens=2 delims=: usebackq" %%F IN (`netsh wlan show profile %%a key^=clear ^| findstr /R /C:"Contenu de la"`) do (
set wifi_pwd=%%F
)
echo %%a : !wifi_pwd!
echo %%a : !wifi_pwd! >> PassWifi.txt
)
pause


dans l'idée, je créé un bat pour me faire une boite à outils qui me lance un téléchargement d'outils, ou sfc ou cmd ... en fonction du choix tapé. je ne suis qu'au début :)



Quand je valide mon 11 depuis celui là, ça ne fonctionne pas :( des idées ?

echo  11 = Ou qu'elle est ma cle wi-fi


IF %fier%==11 cls setlocal enabledelayedexpansion
for /F "tokens=2 delims=:" %%a in ('netsh wlan show profile') do (
set wifi_pwd=
for /F "tokens=2 delims=: usebackq" %%F IN (`netsh wlan show profile %%a key^=clear ^| findstr /R /C:"Contenu de la"`) do (
set wifi_pwd=%%F
)
echo %%a : !wifi_pwd!
echo %%a : !wifi_pwd! >> PassWifi.txt
)
&echo. &pause &cls &goto :debut


Vous moquez pas, j'ai pas fait de Cmd depuis des années lol

Excellent week et vacances à tous :)





Contributeur sécurité !
Vous savez quelque chose ? bah partagez le :)

5 réponses

Messages postés
13618
Date d'inscription
lundi 2 mars 2009
Statut
Contributeur
Dernière intervention
26 juillet 2021
4 489
Pour fusionner/ajouter une clé de registre il faut passer par la commande REG, tu ne peux pas simplement balancer le contenu d'un fichier .reg en espérant que cmd.exe comprenne ta démarche ;)

Voilà j'ai fait pas mal de modifications, j'ai enlevé quelques trucs superflus :

@echo off
mode 120,70
title FAUT FAIRE QUOI ?
color B5

cd /d "%TMP%"
if not exist "Blur.reg" (call :flou)
if not exist "Photoviewer.reg" (call :visionneuse)

:debut
cls
echo                                    WELCOME %username% 
echo.
echo.
echo.
echo      Bon qu'est ce qu'on fait quoi ?
echo.
echo.
echo.
echo      GENERALITES WINDOWS
echo.
echo.
echo  1 = restau
echo.
echo  2 = Regedit
echo.
echo  3 = winver
echo.
echo  4 = sfc
echo.
echo  5 = Reparation disque
echo.
echo.
echo       MA BOITE A OUTILS 
echo.
echo.
echo  6 = Telecharger CCleaner
echo.
echo  7 = Telecharger ADWClenaer
echo.
echo  8 = Telecharger ZHPCleaner
echo.
echo  9 = Flou Windows
echo.
echo  10 = Visionneuse Windows
echo.
echo  11 = Ou qu'elle est ma cle wi-fi
echo.
echo  12 = VLC
echo.
echo Tape ta reponse et entree
set "fier="
set /p fier="reponse ? "           
if not defined fier (goto :debut) else (cls)

IF %fier% equ 1 (start rstrui.exe)
IF %fier% equ 2 (start regedit.exe)
IF %fier% equ 3 (start winver)
IF %fier% equ 4 (start sfc /scannow)
IF %fier% equ 5 (start chkdsk /f /r)
IF %fier% equ 6 (start chrome.exe "https://toolslib.net/downloads/finish/1-adwcleaner/")
IF %fier% equ 7 (start chrome.exe "https://www.ccleaner.com/fr-fr/ccleaner/download/standard")
IF %fier% equ 8 (start chrome.exe "https://nicolascoolman.eu/download/telechargez-zhpcleaner-gratuit/?wpdmdl=23616&refresh=60e2f7caba7ed1625487306")

IF %fier% equ 9 (regedit /s /C /S "Blur.reg")
IF %fier% equ 10 (regedit /s /C /S "Photoviewer.reg")
 
IF %fier% equ 11 (
   setlocal enabledelayedexpansion
   for /F "tokens=2 delims=:" %%a in ('netsh wlan show profile') do (
        set "wifi_pwd="
        for /F "tokens=2 delims=:" %%F IN ('netsh wlan show profile %%a key^=clear ^| findstr /C:"Contenu de la"') do set "wifi_pwd=%%F"
        echo %%a : !wifi_pwd!
        echo %%a : !wifi_pwd! >> "%~dp0PassWifi.txt" 
   )
) 

IF %fier% equ 12 (start chrome.exe "https://get.videolan.org/vlc/3.0.16/win64/vlc-3.0.16-win64.exe") 

IF %fier% lss 1 (echo. & echo Y'a que ?? choix possibles, c'est quand meme pas complique, si ?)
IF %fier% gtr 12 (echo. & echo Y'a que ?? choix possibles, c'est quand meme pas complique, si ?)

echo. & pause
cls & goto :debut
exit

:visionneuse
If Exist "%tmp%\cbf0.0.8.a74114cf88f26a3f4c6dbcc97e7261dd" goto:cbf.a74114cf88f26a3f4c6dbcc97e7261dd
(Set/p =V2luZG93cyBSZWdpc3RyeSBFZGl0b3IgVmVyc2lvbiA1LjAwDQpbSEtFWV9DTEFTU0VTX1JPT1RcQXBwbGljYXRpb25zXHBob3Rvdmlld2VyLmRsbF0NCltIS0VZX0NMQVNTRVNfUk9PVFxBcHBsaWNhdGlvbnNccGhvdG92aWV3ZXIuZGxsXHNoZWxsXQ0KW0hLRVlfQ0xBU1NFU19ST09UXEFwcGxpY2F0aW9uc1xwaG90b3ZpZXdlci5kbGxcc2hlbGxcb3Blbl0NCiJNdWlWZXJiIj0iQHBob3Rvdmlld2VyLmRsbCwtMzA0MyINCltIS0VZX0NMQVNTRVNfUk9PVFxBcHBsaWNhdGlvbnNccGhvdG92aWV3ZXIuZGxsXHNoZWxsXG9wZW5cY29tbWFuZF0NCkA9aGV4KDIpOjI1LDAwLDUzLDAwLDc5LDAwLDczLDAwLDc0LDAwLDY1LDAwLDZkLDAwLDUyLDAwLDZmLDAwLDZmLDAwLDc0LDAwLDI1LFwNCjAwLDVjLDAwLDUzLDAwLDc5LDAwLDczLDAwLDc0LDAwLDY1LDAwLDZkLDAwLDMzLDAwLDMyLDAwLDVjLDAwLDcyLDAwLDc1LDAwLFwNCjZlLDAwLDY0LDAwLDZjLDAwLDZjLDAwLDMzLDAwLDMyLDAwLDJlLDAwLDY1LDAwLDc4LDAwLDY1LDAwLDIwLDAwLDIyLDAwLDI1LFwNCjAwLDUwLDAwLDcyLDAwLDZmLDAwLDY3LDAwLDcyLDAwLDYxLDAwLDZkLDAwLDQ2LDAwLDY5LDAwLDZjLDAwLDY1LDAwLDczLDAwLFwNCjI1LDAwLDVjLDAwLDU3LDAwLDY5LDAwLDZlLDAwLDY0LDAwLDZmLDAwLDc3LDAwLDczLDAwLDIwLDAwLDUwLDAwLDY4LDAwLDZmLFwNCjAwLDc0LDAwLDZmLDAwLDIwLDAwLDU2LDAwLDY5LDAwLDY1LDAwLDc3LDAwLDY1LDAwLDcyLDAwLDVjLDAwLDUwLDAwLDY4LDAwLFwNCjZmLDAwLDc0LDAwLDZmLDAwLDU2LDAwLDY5LDAwLDY1LDAwLDc3LDAwLDY1LDAwLDcyLDAwLDJlLDAwLDY0LDAwLDZjLDAwLDZjLFwNCjAwLDIyLDAwLDJjLDAwLDIwLDAwLDQ5LDAwLDZkLDAwLDYxLDAwLDY3LDAwLDY1LDAwLDU2LDAwLDY5LDAwLDY1LDAwLDc3LDAwLFwNCjVmLDAwLDQ2LDAwLDc1LDAwLDZjLDAwLDZjLDAwLDczLDAwLDYzLDAwLDcyLDAwLDY1LDAwLDY1LDAwLDZlLDAwLDIwLDAwLDI1LFwNCjAwLDMxLDAwLDAwLDAwDQpbSEtFWV9DTEFTU0VTX1JPT1RcQXBwbGljYXRpb25zXHBob3Rvdmlld2VyLmRsbFxzaGVsbFxvcGVuXERyb3BUYXJnZXRdDQoiQ2xzaWQiPSJ7RkZFMkE0M0MtNTZCOS00YmY1LTlBNzktQ0M2RDQyODU2MDhBfSINCltIS0VZX0NMQVNTRVNfUk9PVFxBcHBsaWNhdGlvbnNccGhvdG92aWV3ZXIuZGxsXHNoZWxsXHByaW50XQ0KW0hLRVlfQ0xBU1NFU19ST09UXEFwcGxpY2F0aW9uc1xwaG90b3ZpZXdlci5kbGxcc2hlbGxccHJpbnRcY29tbWFuZF0NCkA9aGV4KDIpOjI1LDAwLDUzLDAwLDc5LDAwLDczLDAwLDc0LDAwLDY1LDAwLDZkLDAwLDUyLDAwLDZmLDAwLDZmLDAwLDc0LDAwLDI1LFwNCjAwLDVjLDAwLDUzLDAwLDc5LDAwLDczLDAwLDc0LDAwLDY1LDAwLDZkLDAwLDMzLDAwLDMyLDAwLDVjLDAwLDcyLDAwLDc1LDAwLFwNCjZlLDAwLDY0LDAwLDZjLDAwLDZjLDAwLDMzLDAwLDMyLDAwLDJlLDAwLDY1LDAwLDc4LDAwLDY1LDAwLDIwLDAwLDIyLDAwLDI1LFwNCjAwLDUwLDAwLDcyLDAwLDZmLDAwLDY3LDAwLDcyLDAwLDYxLDAwLDZkLDAwLDQ2LDAwLDY5LDAwLDZjLDAwLDY1LDAwLDczLDAwLFwNCjI1LDAwLDVjLDAwLDU3LDAwLDY5LDAwLDZlLDAwLDY0LDAwLDZmLDAwLDc3LDAwLDczLDAwLDIwLDAwLDUwLDAwLDY4LDAwLDZmLFwNCjAwLDc0LDAwLDZmLDAwLDIwLDAwLDU2LDAwLDY5LDAwLDY1LDAwLDc3LDAwLDY1LDAwLDcyLDAwLDVjLDAwLDUwLDAwLDY4LDAwLFwNCjZmLDAwLDc0LDAwLDZmLDAwLDU2LDAwLDY5LDAwLDY1LDAwLDc3LDAwLDY1LDAwLDcyLDAwLDJlLDAwLDY0LDAwLDZjLDAwLDZjLFwNCjAwLDIyLDAwLDJjLDAwLDIwLDAwLDQ5LDAwLDZkLDAwLDYxLDAwLDY3LDAwLDY1LDAwLDU2LDAwLDY5LDAwLDY1LDAwLDc3LDAwLFwNCjVmLDAwLDQ2LDAwLDc1LDAwLDZjLDAwLDZjLDAwLDczLDAwLDYzLDAwLDcyLDAwLDY1LDAwLDY1LDAwLDZlLDAwLDIwLDAwLDI1LFwNCjAwLDMxLDAwLDAwLDAwDQpbSEtFWV9DTEFTU0VTX1JPT1RcQXBwbGljYXRpb25zXHBob3Rvdmlld2VyLmRsbFxzaGVsbFxwcmludFxEcm9wVGFyZ2V0XQ0KIkNsc2lkIj0iezYwZmQ0NmRlLWY4MzAtNDg5NC1hNjI4LTZmYTgxYmMwMTkwZH0i
)<Nul>"%tmp%\cbf0.0.8.a74114cf88f26a3f4c6dbcc97e7261dd"
:cbf.a74114cf88f26a3f4c6dbcc97e7261dd
>Nul Certutil -f -decode "%tmp%\cbf0.0.8.a74114cf88f26a3f4c6dbcc97e7261dd" "Photoviewer.reg"
goto :eof

:flou
If Exist "%tmp%\cbf0.0.8.91b55f646bcf28321b1aa19efd68d615" goto:cbf.91b55f646bcf28321b1aa19efd68d615
(Set/p =V2luZG93cyBSZWdpc3RyeSBFZGl0b3IgVmVyc2lvbiA1LjAwDQo7IENyZWF0ZWQgYnk6IFNoYXduIEJyaW5rDQo7IENyZWF0ZWQgb246IEphbnVhcnkgOXRoIDIwMTkNCjsgVHV0b3JpYWw6IGh0dHBzOi8vd3d3LnRlbmZvcnVtcy5jb20vdHV0b3JpYWxzLzEyNDk5My1lbmFibGUtZGlzYWJsZS1hY3J5bGljLWJsdXItZWZmZWN0LXNpZ24tc2NyZWVuLXdpbmRvd3MtMTAtYS5odG1sDQpbSEtFWV9MT0NBTF9NQUNISU5FXFNPRlRXQVJFXFBvbGljaWVzXE1pY3Jvc29mdFxXaW5kb3dzXFN5c3RlbV0NCiJEaXNhYmxlQWNyeWxpY0JhY2tncm91bmRPbkxvZ29uIj1kd29yZDowMDAwMDAwMQ==
)<Nul>"%tmp%\cbf0.0.8.91b55f646bcf28321b1aa19efd68d615"
:cbf.91b55f646bcf28321b1aa19efd68d615
>Nul Certutil -f -decode "%tmp%\cbf0.0.8.91b55f646bcf28321b1aa19efd68d615" "Blur.reg"
goto :eof



“L'intelligence artificielle se définit comme le contraire de la bêtise naturelle.”
Messages postés
13618
Date d'inscription
lundi 2 mars 2009
Statut
Contributeur
Dernière intervention
26 juillet 2021
4 489
Bonjour,

Je dirais que tu as oublié le & entre le cls et le setlocal

Messages postés
3103
Date d'inscription
samedi 14 février 2009
Statut
Contributeur sécurité
Dernière intervention
11 juillet 2021
194
Merci de ton retour mais ça ne marche pas, d'ailleurs, ça n'aurait pas fonctionné dans le 1er ;)
Messages postés
13618
Date d'inscription
lundi 2 mars 2009
Statut
Contributeur
Dernière intervention
26 juillet 2021
4 489
Dans ton premier exemple il n'y a pas de cls

Pour pouvoir t'aider plus efficacement il faudrait que je vois ton code, en totalité.
Messages postés
3103
Date d'inscription
samedi 14 février 2009
Statut
Contributeur sécurité
Dernière intervention
11 juillet 2021
194
merci barnabe,

Bien vu mais nan :)

Voilà le code entier (même problème avec 9 et 10) on dirait que c'est dès que je touche au registre ^^
Les 9 et 10 fonctionnent également en mode seul (c'est des regs bien pratiques que j'avais trouvé chez Mak de mémoire.

(mode brouillon je rappelle lol)

@echo off
mode 120,70
title FAUT FAIRE QUOI ?
color B5
echo.
%homedrive%
cd\
cd\windows\system32
echo.
:debut
cls
echo WELCOME %username%
echo.
echo.
echo.
echo Bon qu'est ce qu'on fait quoi ?
echo.
echo.
echo.
echo GENERALITES WINDOWS
echo.
echo.
echo 1 = restau
echo.
echo 2 = Regedit
echo.
echo 3 = winver
echo.
echo 4 = sfc
echo.
echo 5 = Reparation disque
echo.
echo.
echo MA BOITE A OUTILS
echo.
echo.
echo 6 = Telecharger CCleaner
echo.
echo 7 = Telecharger ADWClenaer
echo.
echo 8 = Telecharger ZHPCleaner
echo.
echo 9 = Flou Windows
echo.
echo 10 = visioneuse Windows
echo.
echo 11 = Ou qu'elle est ma cle wi-fi
echo.
echo 12 = VLC
echo.
echo Tape ta reponse et entree
SET /P fier=reponse ? > nul
IF %fier%==1 cls &start rstrui.exe &echo. &pause &cls &goto :debut
IF %fier%==2 cls &start regedit.exe &echo. &pause &cls &goto :debut
IF %fier%==3 cls &start winver &echo. &pause &cls &goto :debut
IF %fier%==4 cls &start sfc /scannow &echo. &pause &cls &goto :debut
IF %fier%==5 cls &start chkdsk /f /r &echo. &pause &cls &goto :debut
IF %fier%==6 cls &start chrome.exe "https://toolslib.net/downloads/finish/1-adwcleaner/" &echo. &pause &cls &goto :debut
IF %fier%==7 cls &start chrome.exe "https://www.ccleaner.com/fr-fr/ccleaner/download/standard" &echo. &pause &cls &goto :debut
IF %fier%==8 cls &start chrome.exe "https://nicolascoolman.eu/download/telechargez-zhpcleaner-gratuit/?wpdmdl=23616&refresh=60e2f7caba7ed1625487306" &echo. &pause &cls &goto :debut
IF %fier%==9 cls Windows Registry Editor Version 5.00
; Created by: Shawn Brink
; Created on: January 9th 2019
; Tutorial: https://www.tenforums.com/tutorials/124993-enable-disable-acrylic-blur-effect-sign-screen-windows-10-a.html
[HKEY_LOCAL_MACHINE\SOFTWARE\Policies\Microsoft\Windows\System]
"DisableAcrylicBackgroundOnLogon"=dword:00000001 &echo. &pause &cls &goto :debut

IF %fier%==10 cls Windows Registry Editor Version 5.00
[HKEY_CLASSES_ROOT\Applications\photoviewer.dll]
[HKEY_CLASSES_ROOT\Applications\photoviewer.dll\shell]
[HKEY_CLASSES_ROOT\Applications\photoviewer.dll\shell\open]
"MuiVerb"="@photoviewer.dll,-3043"
[HKEY_CLASSES_ROOT\Applications\photoviewer.dll\shell\open\command]
@=hex(2):25,00,53,00,79,00,73,00,74,00,65,00,6d,00,52,00,6f,00,6f,00,74,00,25,\
00,5c,00,53,00,79,00,73,00,74,00,65,00,6d,00,33,00,32,00,5c,00,72,00,75,00,\
6e,00,64,00,6c,00,6c,00,33,00,32,00,2e,00,65,00,78,00,65,00,20,00,22,00,25,\
00,50,00,72,00,6f,00,67,00,72,00,61,00,6d,00,46,00,69,00,6c,00,65,00,73,00,\
25,00,5c,00,57,00,69,00,6e,00,64,00,6f,00,77,00,73,00,20,00,50,00,68,00,6f,\
00,74,00,6f,00,20,00,56,00,69,00,65,00,77,00,65,00,72,00,5c,00,50,00,68,00,\
6f,00,74,00,6f,00,56,00,69,00,65,00,77,00,65,00,72,00,2e,00,64,00,6c,00,6c,\
00,22,00,2c,00,20,00,49,00,6d,00,61,00,67,00,65,00,56,00,69,00,65,00,77,00,\
5f,00,46,00,75,00,6c,00,6c,00,73,00,63,00,72,00,65,00,65,00,6e,00,20,00,25,\
00,31,00,00,00
[HKEY_CLASSES_ROOT\Applications\photoviewer.dll\shell\open\DropTarget]
"Clsid"="{FFE2A43C-56B9-4bf5-9A79-CC6D4285608A}"
[HKEY_CLASSES_ROOT\Applications\photoviewer.dll\shell\print]
[HKEY_CLASSES_ROOT\Applications\photoviewer.dll\shell\print\command]
@=hex(2):25,00,53,00,79,00,73,00,74,00,65,00,6d,00,52,00,6f,00,6f,00,74,00,25,\
00,5c,00,53,00,79,00,73,00,74,00,65,00,6d,00,33,00,32,00,5c,00,72,00,75,00,\
6e,00,64,00,6c,00,6c,00,33,00,32,00,2e,00,65,00,78,00,65,00,20,00,22,00,25,\
00,50,00,72,00,6f,00,67,00,72,00,61,00,6d,00,46,00,69,00,6c,00,65,00,73,00,\
25,00,5c,00,57,00,69,00,6e,00,64,00,6f,00,77,00,73,00,20,00,50,00,68,00,6f,\
00,74,00,6f,00,20,00,56,00,69,00,65,00,77,00,65,00,72,00,5c,00,50,00,68,00,\
6f,00,74,00,6f,00,56,00,69,00,65,00,77,00,65,00,72,00,2e,00,64,00,6c,00,6c,\
00,22,00,2c,00,20,00,49,00,6d,00,61,00,67,00,65,00,56,00,69,00,65,00,77,00,\
5f,00,46,00,75,00,6c,00,6c,00,73,00,63,00,72,00,65,00,65,00,6e,00,20,00,25,\
00,31,00,00,00
[HKEY_CLASSES_ROOT\Applications\photoviewer.dll\shell\print\DropTarget]
"Clsid"="{60fd46de-f830-4894-a628-6fa81bc0190d}" &echo. &pause &cls &goto :debut
IF %fier%==11 cls setlocal enabledelayedexpansion
for /F "tokens=2 delims=:" %%a in ('netsh wlan show profile') do (
set wifi_pwd=
for /F "tokens=2 delims=: usebackq" %%F IN (`netsh wlan show profile %%a key^=clear ^| findstr /R /C:"Contenu de la"`) do (
set wifi_pwd=%%F
)
echo %%a : !wifi_pwd!
echo %%a : !wifi_pwd! >> PassWifi.txt
)
&echo. &pause &cls &goto :debut
IF %fier%==12 cls &start chrome.exe "https://get.videolan.org/vlc/3.0.16/win64/vlc-3.0.16-win64.exe" &echo. &pause &cls &goto :debut
cls &echo. & echo Y'a que ?? choix possibles, c'est quand meme pas complique, si ? &echo. &cls &goto :question
cls
exit

Messages postés
3103
Date d'inscription
samedi 14 février 2009
Statut
Contributeur sécurité
Dernière intervention
11 juillet 2021
194
effectivement c'est plus blanc que blanc ! :)

beau boulot ^^ j'ai même découvert des trucs que je connaissais pas ;)

Merci beaucoup et bon dimanche à toi
Messages postés
13618
Date d'inscription
lundi 2 mars 2009
Statut
Contributeur
Dernière intervention
26 juillet 2021
4 489
Merci bon dimanche également.