Генерация ссылки и загрузка на FTP

[VoidVolker]

Code: Select all

S"  http://abc.ru/ABC=%MM%.%DD%.%YYYY%" EVAL-SUBST

Code: Select all

: NextMondayS  \ ( -- a u )
  Year@ Mon@ Day@                     \ Кладем на стек сегодняшнюю дату
  8
  Year@ Mon@ Day@ WEEK-DAY     \ Вычисляем номер дня недели - 1-7
  -                                                \ Вычисляем сколько осталось дней до конца недели и прибавляем единицу - поэтому 8, а не семь
  DAY+                                          \ Прибавляем полученное число дней к текущей дате
  S>D <#                                       \ y m dx dx  \ Начинаем конвертацию даты (буфер заполняется с конца)
    # # [CHAR] - HOLD                       \ y m dx dx  \ День, тире
    2DROP S>D # # [CHAR] - HOLD      \ y mx mx   \ Месяц, тире
    2DROP S>D # # # #                        \ yx yx        \ Год
  #>
;

[Snk-Serge]

Code: Select all

S"  http://abc.ru/ABC=%MM%.%DD%.%YYYY%" EVAL-SUBST

Code: Select all

: NextMondayS  \ ( -- a u )
  Year@ Mon@ Day@                     \ Кладем на стек сегодняшнюю дату
  8
  Year@ Mon@ Day@ WEEK-DAY     \ Вычисляем номер дня недели - 1-7
  -                                                \ Вычисляем сколько осталось дней до конца недели и прибавляем единицу - поэтому 8, а не семь
  DAY+                                          \ Прибавляем полученное число дней к текущей дате
  S>D <#                                       \ y m dx dx  \ Начинаем конвертацию даты (буфер заполняется с конца)
    # # [CHAR] - HOLD                       \ y m dx dx  \ День, тире
    2DROP S>D # # [CHAR] - HOLD      \ y mx mx   \ Месяц, тире
    2DROP S>D # # # #                        \ yx yx        \ Год
  #>
;

Спасибо!

[Snk-Serge]

Добрый день!
Есть 2 скрипта, первый (это немного измененный скрипт с первой страницы и он работает как надо, все скачивает):

Code: Select all

#( download
Time: 0 4 * * 7 *
SingleInstance
: NextMondayS
  Year@ Mon@ Day@ 8 Year@ Mon@ Day@ WEEK-DAY - DAY+
  S>D <#
    # # [CHAR] - HOLD
    2DROP S>D # # [CHAR] - HOLD
    2DROP S>D # # # #
  #>
;
Action:
S" http://site.ru/trololo.php?login=111&pass=222&date=" NextMondayS S+ HTTP-GET IF
  2DROP ." Can't download file from server. Code: " HTTP-RESULT .  CR
ELSE
  S" C:\TEMP\xml1.xml" FWRITE
THEN
)#

Второй скрипт (сделан по образцу первого, но с другой ссылкой):

Code: Select all

#( download_2
Time: 0 5 * * 7 *
SingleInstance
: NextMondayS
  Year@ Mon@ Day@ 8 Year@ Mon@ Day@ WEEK-DAY - DAY+
  S>D <#
    # # [CHAR] - HOLD
    2DROP S>D # # [CHAR] - HOLD
    2DROP S>D # # # #
  #>
;
Action:
S" https://site123.ru/data/page.php?login=123&pass=12345&date=" NextMondayS S+ HTTP-GET IF
  2DROP ." Can't download file from server. Code: " HTTP-RESULT .  CR
ELSE
  S" C:\TEMP\xml2.xml" FWRITE
THEN
)#

Второй скрипт ничего не загружает. Хотя, обе ссылки отлично работают через браузер и скачивают файлы, а через второй скрипт ни в какую. Оба скрипта находятся в одной cron.tab файле. На мой взгляд различие между скриптами только в ссылках.
В каком направлении искать причину не срабатывания второго скрипта?

[Morituruz]

Дело видимо в том, что HTTPS это совсем другое дело, чем просто HTTP, и HTTP-GET не умеет такое.

[Snk-Serge]

Дело видимо в том, что HTTPS это совсем другое дело, чем просто HTTP, и HTTP-GET не умеет такое.

А возможно ли сделать подобный скрипт для https?

[Morituruz]

Возможно, если само скачивание выполнять специальной программой типа curl или wget, в зависимости от того, с чем вы лучше знакомы.

И ещё:
1. для оформления кода используйте тэг code.
2. Нет необходимости в каждой задаче указывать это:

Code: Select all

: NextMondayS
 Year@ Mon@ Day@ 8 Year@ Mon@ Day@ WEEK-DAY - DAY+
 S>D <#
 # # [CHAR] - HOLD
 2DROP S>D # # [CHAR] - HOLD
 2DROP S>D # # # #
 #>
;

Вот этот вот синтаксис

Code: Select all

: some_word bla bla bla ;

создаёт новое слово. Оно становится доступным всем задачам, расположенным в кронтабе ниже этой.

[Snk-Serge]

Возможно, если само скачивание выполнять специальной программой типа curl или wget, в зависимости от того, с чем вы лучше знакомы.

И ещё:
1. для оформления кода используйте тэг code.
2. Нет необходимости в каждой задаче указывать это:

Code: Select all

: NextMondayS
 Year@ Mon@ Day@ 8 Year@ Mon@ Day@ WEEK-DAY - DAY+
 S>D <#
 # # [CHAR] - HOLD
 2DROP S>D # # [CHAR] - HOLD
 2DROP S>D # # # #
 #>
;

Вот этот вот синтаксис

Code: Select all

: some_word bla bla bla ;

создаёт новое слово. Оно становится доступным всем задачам, расположенным в кронтабе ниже этой.

Ясно, больше знаком с wget. Только как его вставить в синтаксис nnCron? Так правильно:

Code: Select all

S" wget https://login:password@https.example.com/data=" NextMondayS S+ IF

?

[VoidVolker]

Ясно, больше знаком с wget. Только как его вставить в синтаксис nnCron?

Code: Select all

START-APP: C:\path\wget.exe  <commands> https://login:password@https.example.com/data=%NextMondayS%