-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathHTM+PDF.bat
40 lines (35 loc) · 2.96 KB
/
HTM+PDF.bat
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 on
chcp 65001
rem Инструкция:
rem Заполнить в СуперОкна7 поле КЛИЕНТ:
rem Клиент: ТРИ слова разделённые пробелами
rem Адрес: Строка от 2 до 44 символов
rem Телефон: 11 цифр, перед которыми стоит знак +
rem Нажать кнопку:
rem Печать > Просмотр > Сохранить > Выберите папку КП! > Файл HTM >
rem Имя файла будет использовано как примечание при создании папки
rem > Сохранить
rem Перетащите созданный файл HTM на файл HTM+PDF.bat находящийся в той же папке
if not "%~x1" == ".htm" if not "%~x2" == ".htm" (echo --- Затащите на этот файл мышкой, файлы HTM и PDF --- && pause && exit)
set "dp0=%~dp0"
@REM FOR /F "tokens=*" %%a IN ('type %dp0:~0,-1%:user.drive.id') DO set "gfid=%%a"
@REM pause
set "gfid=1Ty2o3zAJAvxZM6vZCi7JkSAGbizCZ9Q7"
IF "%~x1" == ".pdf" (start /wait "" "C:\Program Files\SumatraPDF\SumatraPDF.exe" -print-to "HP_M132nw" -print-settings "3x" %~nx1)
IF "%~x2" == ".pdf" (start /wait "" "C:\Program Files\SumatraPDF\SumatraPDF.exe" -print-to "HP_M132nw" -print-settings "3x" %~nx2)
echo --- Выполняется запрос doGet ---
FOR /F "tokens=*" %%a IN ('..\Шаблоны\script\curl.exe -G --data-urlencode "fileName1=%~nx1" --data-urlencode "fileName2=%~nx2" --data-urlencode "folderId=%gfid%" -L "https://script.google.com/macros/s/AKfycby4BQcVGGZeCRyMuHFAbaZKTOX-fVMraCYt7Me7XvthYpWR9YYI8T2RSSj1OKn8LVQR/exec"') DO set "response=%%a"
for /F "tokens=1,2 delims=;" %%a in ("%response%") do (
timeout 15 && start /wait "Скачивание сформированного договора" ..\Шаблоны\script\curl.exe -L "https://docs.google.com/document/d/%%b/export?exportFormat=pdf" -o Договор.pdf && echo --- Распечатка первой страницы договора ---
start /wait "" "C:\Program Files\SumatraPDF\SumatraPDF.exe" -print-to "HP_M132nw" -print-settings "1,3x" Договор.pdf
rem start /wait "" "C:\Program Files\SumatraPDF\SumatraPDF.exe" -page 1 -print-dialog -exit-when-done Договор.pdf
echo --- Переверните распечатанную страницу договора ---
pause
start /wait "" "C:\Program Files\SumatraPDF\SumatraPDF.exe" -print-to "HP_M132nw" -print-settings "2,3x" Договор.pdf
echo --- После закрытия этого окна запустите файл СКАНИРОВАТЬ.bat ---
echo -!- ЗВОНИ 203: ОКНА, ПОДПИСЬ В ДОГОВОР -!----------------------------------------------
timeout 20
rem start /wait "" "C:\Program Files\SumatraPDF\SumatraPDF.exe" -page 2 -print-dialog -exit-when-done Договор.pdf
move Договор.pdf "%%a"
explorer /select, "%%a\СКАНИРОВАТЬ.bat"
)