[решено] Автоскачка AVPTool

[tarakan1983]

как написать bat файл, чтобы он качал каждый день с адреса http://devbuilds.kaspersky-labs.com/devbuilds/AVPTool/ утилиту касперского?

[Sarus]

Я качаю при помощи утилиты Wget вот так:
@Echo off
Echo.
Echo Download AVPTool, pease wait...
Echo.
Set $Host=ftp://devbuilds.kaspersky-labs.com
Set $Fl=index.txt
Set $SRC=devbuilds/AVPTool
Set $DST=D:\Downloads\Prog's\AVPTool
If Exist "%$DST%\%$Fl%" Del "%$DST%\%$Fl%"
If Exist "%$DST%\*.exe" Del "%$DST%\*.exe"
Wget -c -t 0 %$Host%/%$SRC%/%$Fl% -P "%$DST%"
For /F "Tokens=5 Delims=/" %%i In ('FindStr /IC:"RU" "%$DST%\%$Fl%"') Do (
Wget -c -t 0 %$Host%/%$SRC%/%%i -P "%$DST%")


ЗЫ исправил, теперь скачивает самый последний AVPTool

[amel27]

вариант через CURL (http://curl.haxx.se/download.html):

Set URL=http://devbuilds.kaspersky-labs.com/devbuilds/AVPTool
For /F "Tokens=4 Delims==/" %%i In ('curl -s -L "%URL%"^|Find "url="') Do (
curl -f -# -O ^"%URL%/%%i)

[Sarus]

вариант при помощи ftp.exe:
@Echo off
Title Download AVPTool, pease wait...
Set $Host=devbuilds.kaspersky-labs.com
Set $User=anonymous
Set $Pass=
Set $FL=index.txt
Set $SRC=devbuilds/AVPTool
Set $DST=D:\Temp\FTP\GetFtp
Set $FFtp=%~dpn0.cfg
If Exist "%DST%"\*.exe Del "%DST%"\*.exe
Echo.%$User%>"%$FFtp%"
Echo.%$Pass%>>"%$FFtp%"
Echo cd %$SRC%>>"%$FFtp%"
Echo get %$FL%>>"%$FFtp%"
Echo prompt
Echo bye>>"%$FFtp%"
cd "%DST%"
FTP -s:"%$FFtp%" %$Host%
Echo.%$User%>"%$FFtp%"
Echo.%$Pass%>>"%$FFtp%"
Echo cd %$SRC%>>"%$FFtp%"
Echo binary>>"%$FFtp%"
For /F %%i In ('FindStr /BIC:"s" "%$DST%\%$Fl%"') Do Echo get %%i>>"%$FFtp%"
Echo prompt
Echo bye>>"%$FFtp%"
cd "%DST%"
FTP -s:"%$FFtp%" %$Host%
If Exist "%$DST%"\%$FL% Del "%$DST%"\%$FL%
If Exist "%$DST%"\*.cfg Del "%$DST%"\*.cfg

ЗЫ основан на этом (http://forum.oszone.net/post-1134693-4.html) батнике

[tarakan1983]

Почему сначала все было нормально, а теперь не качает. Вот что в cmd

prompt
D:\updater10
Связь с str.geo.kaspersky.com.
220 FTP server ready.
Пользователь (str.geo.kaspersky.com:(none)):
331 Guest login ok, send your e-mail address as password.

230 User logged in.
ftp> cd devbuilds/AVPTool
250 CWD command successful.
ftp> get index.txt 200 PORT command successful.
150 Opening ASCII mode data connection.
226 Transfer complete.
ftp: 39 байт получено за 0,00 (сек) со скоростью 39000,00 (КБ/сек).
ftp> bye 221 Goodbye.
prompt
D:\updater10 Связь с str.geo.kaspersky.com.
220 FTP server ready.
Пользователь (str.geo.kaspersky.com:(none)):
331 Guest login ok, send your e-mail address as password.

230 User logged in.
ftp> cd devbuilds/AVPTool
250 CWD command successful.
ftp> binary
200 Type set to I.
ftp> bye
221 Goodbye.

[Sarus]

tarakan1983, исправил
поменял с
For /F "Tokens=5 Delims=/" %%i In ('FindStr /IC:"RU" "%$DST%\%$FL%"')
на
For /F %%i In ('FindStr /BIC:"s" "%$DST%\%$Fl%"')
Просто содержание файла index.txt поменялось.