Перейти из форума на сайт.

НовостиФайловые архивы
ПоискАктивные темыТоп лист
ПравилаКто в on-line?
Вход Забыли пароль? Первый раз на этом сайте? Регистрация
Компьютерный форум Ru.Board » Операционные системы » Microsoft Windows » Задачи на bat-файлах 7

Модерирует : KLASS, IFkO

vu1tur (25-01-2010 12:41): лимит страниц, продолжение: http://forum.ru-board.com/topic.cgi?forum=62&topic=19668  Версия для печати • ПодписатьсяДобавить в закладки
На первую страницук этому сообщениюк последнему сообщению

   

smirnvlad

Full Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору


Код:
 
@echo off
setlocal enabledelayedexpansion
 
for /f "tokens=1" %%i in (url.txt) do set "url=%%i" & call :NEXT
::
::
goto:eof
 
:NEXT
  set "url=%url:*://=%"
  call :cut_url_after_slash
  curl --user-agent "Mozilla/4.0 (compatible; MSIE 5.01; Windows NT 5.0)" --include --output log.txt %url%  
goto:eof
 
:cut_url_after_slash
  set "surl=%url:/=%"
  if "%surl%"=="%url%" goto:eof
  set "cnt=0"
:cut_url_after_slash_cycle
  set "char=!url:~%cnt%,1!"
  if "%char%"=="/" set "url=!url:~0,%cnt%!" && goto:eof
  set /a "cnt=%cnt%+1"
  goto:cut_url_after_slash_cycle
 


Всего записей: 417 | Зарегистр. 31-03-2009 | Отправлено: 07:41 01-08-2009
   

На первую страницук этому сообщениюк последнему сообщению

Компьютерный форум Ru.Board » Операционные системы » Microsoft Windows » Задачи на bat-файлах 7
vu1tur (25-01-2010 12:41): лимит страниц, продолжение: http://forum.ru-board.com/topic.cgi?forum=62&topic=19668


Реклама на форуме Ru.Board.

Powered by Ikonboard "v2.1.7b" © 2000 Ikonboard.com
Modified by Ru.B0ard
© Ru.B0ard 2000-2024

BitCoin: 1NGG1chHtUvrtEqjeerQCKDMUi6S6CG4iC

Рейтинг.ru