Вставка даты и времени в пустое поле редактора PDF файла

[SilentJim]

Здравствуйте, прошу о помощи написать скрипт:о
Мне нужно, в редакторе PDF файла вставлять текущую дату и время "19.07.2014 17:52:25" в таком формате не могу подобрать код для копирования текущей даты и времени и его последующей вставки в редактор. Просто очень много работы 6000~ листов и в каждый лист нужно вставить дату и параметр затухания кабеля...
Начало есть но с буфером обмена и датой я застрял на месте

Code: [Select]

LCLICK(158,317)  // Выделение даты
WAITMS(500)
LCLICK(1223,189)  // Выделение даты 2
WAITMS(50)
// Удаление даты
#include "1.cms"
KEYPRESS(#DELETE)  // Удаление даты конец
Пример в прикрепленном файле , буду очень признателен за помощь!1

[Oraven]

Вот скрипт, выводит дату в нужном тебе формате в буфер обмена и вставляет по Ctrl+V

Code: (clickermann) [Select]

$th = $_time_h
$tm = $_time_m
$ts = $_time_s
$dd = $_date_d
$dm = $_date_m
$dy = $_date_y

IF(STRLEN($th)<2)
   $th = STRCONCAT ("0", $th)
END_IF
IF(STRLEN($tm)<2)
   $tm = STRCONCAT ("0", $tm)
END_IF
IF(STRLEN($ts)<2)
   $ts = STRCONCAT ("0", $ts)
END_IF
IF(STRLEN($dd)<2)
   $dd = STRCONCAT ("0", $dd)
END_IF
IF(STRLEN($dm)<2)
   $dm = STRCONCAT ("0", $dm)
END_IF
IF(STRLEN($dy)<2)
   $dy = STRCONCAT ("0", $dy)
END_IF

TOCLIP(STRCONCAT($dd,".",$dm,".",$dy, " ", $th,":",$tm,":",$ts))
WAITMS(20)

KEYDOWN (#CTRL) // Ctrl+V
WAITMS (50)
KEYDOWN (#V)
WAITMS (50)
KEYUP (#V)
KEYUP (#CTRL)

[SilentJim]

Огромное спасибо, очень облегчили мне задачу!
Проверю скрипт на практике в понедельник, еще раз спасибо:3

[SilentJim]

Все идеально спасибо, но у меня есть еще вопрос Дата у меня есть как можно сделать так, чтобы минута начиналась с 1 и после каждого файла прибавлялось по 1 - 2 минуты?
Вот что у меня получилось

Code: [Select]

LCLICK(158,317)  // Выделение даты
WAITMS(500)
LCLICK(1223,189)  // Выделение даты 2
WAITMS(50)
// Удаление даты
#include "1.cms"
KEYPRESS(#DELETE)  // Удаление даты конец

#include "date.cms"
#include "date.cms"
DBLCLICK(1188,270)  // Редактирование шрифта на Arial
LCLICK(1182,624)
LCLICK(1155,288)    // Редактирование шрифта 7 пт
KEYPRESS(#BACKSPACE)
KEYPRESS(#BACKSPACE)
KEYPRESS(#7)
LCLICK(1136,329)  // Редактирование координаты по X
DBLCLICK(1136,329)
KEYPRESS(#BACKSPACE)
KEYPRESS(#8)
KEYPRESS(#2)
KEYPRESS(190)
KEYPRESS(#7)
KEYPRESS(#6)
LCLICK(1123,348)  // Редактирование координаты по Y
DBLCLICK(1123,348)
KEYPRESS(#BACKSPACE)
KEYPRESS(#6)
KEYPRESS(#3)
KEYPRESS(#3)
KEYPRESS(190)
KEYPRESS(#2)
KEYPRESS(#8)    // Конец редактирования нижней даты

LCLICK(273,709)  // 16777215


LCLICK(173,213)     // Выделение даты
WAITMS(500)
LCLICK(1223,189)  // Выделение даты 2
WAITMS(50)       // Удаление даты
#include "1.cms"
KEYPRESS(#DELETE)       // Удаление даты конец

LCLICK(160,130)  // LOL FAIL :D

DBLCLICK(1188,270)    // Редактирование шрифта на Arial
LCLICK(1182,624)
LCLICK(1155,288)    // Редактирование шрифта 7 пт
KEYPRESS(#BACKSPACE)
KEYPRESS(#BACKSPACE)
KEYPRESS(#9)
LCLICK(1136,329)  // Редактирование координаты по X
DBLCLICK(1136,329)
KEYPRESS(#BACKSPACE)
KEYPRESS(#9)
KEYPRESS(#2)
KEYPRESS(0xBE)
KEYPRESS(#1)
KEYPRESS(#9)
LCLICK(1123,348)  // Редактирование координаты по Y
DBLCLICK(1123,348)
KEYPRESS(#BACKSPACE)
KEYPRESS(#7)
KEYPRESS(#1)
KEYPRESS(#2)
KEYPRESS(0xBE)
KEYPRESS(#0)
KEYPRESS(#7)    // Конец редактирования нижней даты
WAITMS(50)
LCLICK(237,680)  // КОНИ
WAITMS(50)

#include "zatuh1.cms"
WAITMS(50)
#include "zatuh2.cms"
WAITMS(50)
#include "zatuh3.cms"
WAITMS(50)
#include "zatuh4.cms"
WAITMS(50)
#include "metr.cms"
LCLICK(498,65)  // Переход на следующую стр


[Oraven]

Code: (clickermann) [Select]

$th = $_time_h
INC($tm,1) // прибавление минут каждый цикл
$ts = RND(0,59) // случайная секунда
$dd = $_date_d
$dm = $_date_m
$dy = $_date_y

IF(STRLEN($th)<2)
   $th = STRCONCAT ("0", $th)
END_IF
IF(STRLEN($tm)<2)
   $tm = STRCONCAT ("0", $tm)
END_IF
IF(STRLEN($ts)<2)
   $ts = STRCONCAT ("0", $ts)
END_IF
IF(STRLEN($dd)<2)
   $dd = STRCONCAT ("0", $dd)
END_IF
IF(STRLEN($dm)<2)
   $dm = STRCONCAT ("0", $dm)
END_IF
IF(STRLEN($dy)<2)
   $dy = STRCONCAT ("0", $dy)
END_IF

TOCLIP(STRCONCAT($dd,".",$dm,".",$dy, " ", $th,":",$tm,":",$ts))
WAITMS(20)

KEYDOWN (#CTRL) // Ctrl+V
WAITMS (50)
KEYDOWN (#V)
WAITMS (50)
KEYUP (#V)
KEYUP (#CTRL)

[SilentJim]

Пишет ошибка интерпретации INC($tm,1) О_о

[Oraven]

Думай, у меня ошибок нет.

[SilentJim]

Хорошо, Спасибо тебе =)

[LV_Vic]

Доброго времени суток!
У меня была похожая задача. Но сначала сам "нажмакал" ниже следующие, потом заглянул сюда. %)
//======== как вариант ======
IF($_date_m < 10)
   $DM=StrConcat("0",$_date_m)
ELSE
   $DM=$_date_m
END_IF

IF($_date_d < 10)
   $DD=StrConcat("0",$_date_d)
ELSE
   $DD=$_date_d
END_IF

IF($_time_h < 10)
   $TH=StrConcat("0",$_time_h)
ELSE
   $TH=$_time_h
END_IF

IF($_time_m < 10)
   $TM=StrConcat("0",$_time_m)
ELSE
   $TM=$_time_m
END_IF

$DTF = StrConcat($_date_y,"_",$DM,"_",$DD,"_",$TH,"_",$_time_m)
PRINT($DTF)