Discussion :

[PeterMac62]

Bonjour à tous,

suite à une migration de serveurs, l'utilitaire pour supprimer des fichiers ne semblent plus fonctionnels malgré que je n'ai pas de message d'erreur ,et la suppression semble OK.

Si quelqu'un peut jeter un coup oeil......

c'est un fichier .bat tout simple qui appelle un autre bat qui contient les variables.
On se connecte sur un serveur, on le télécharge, et après téléchargement, on le supprime....enfin, normalement

Code bat :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
@ECHO OFF
SETLOCAL
call local.bat
echo FTP: %ftp%
 
REM List files on ftp
curl.exe --list-only --ftp-ssl --insecure --tlsv1 --disable-epsv -u %user-pwd% %ftp% -olist.txt
IF %ERRORLEVEL% NEQ 0 GOTO error
 
for /F "tokens=*" %%A in (list.txt) do (
	if "%%A" NEQ "." (
		if "%%A" NEQ ".." (
			ECHO Download file %%A....
			curl.exe -O --ftp-ssl --insecure --tlsv1 --disable-epsv -u %user-pwd% %ftp%/%%A
			IF %ERRORLEVEL% NEQ 0 GOTO error
			if "%delete%" EQU "true" (
				ECHO Delete file %%A
				curl.exe --ftp-ssl --insecure --tlsv1 --disable-epsv "-DELE %%A" -u %user-pwd% %ftp% 1>nul
				IF %ERRORLEVEL% NEQ 0 ECHO Warning: cannot delete file
			)
			gpg.exe --import Clef_Robotik.key
			IF %ERRORLEVEL% NEQ 0 GOTO error
			gpg.exe --import %public-key%
			IF %ERRORLEVEL% NEQ 0 GOTO error
			gpg.exe --allow-secret-key-import --import %private-key%
			IF %ERRORLEVEL% NEQ 0 GOTO error
			gpg.exe --output "%output%/%%A" --decrypt "%%A"
			IF %ERRORLEVEL% NEQ 0 GOTO error
			DEL /F %%A
		)
	)
)
 
ECHO OK
GOTO end
 
:error
	ECHO An error has occurred
:end
	pause