[ Обновленные темы · Новые сообщения · Участники · Правила форума · Поиск · RSS ]
  • Страница 1 из 2
  • 1
  • 2
  • »
Модератор форума: Andrey_A, simup, ХарВик, chip642  
InsertPlus.vbs - Скрипт-библиотека различных вставок
Andrey_AДата: Пятница, 06.04.2012, 16:41 | Сообщение № 1
Генералиссимус

На сайте с: 26.01.2012
Город: Сочи, Хоста
Сообщений: 7186
Награды: 143
Репутация: 125
Аверин Андрей
InsertPlus.vbs - Скрипт-библиотека различных вставок
Используется скрипт Functions.vbs - Скрипт с различными Функциями, которые можно использовать в других скриптах
Используется скрипт FunctionsDialog.vbs - Скрипт с различными Функциями для вызова диалога Открытия/Сохранения файла (WinAPI) и выбора папки

' Автор: Аверин Андрей
' Версия: 13.5 (05.04.2012 - 22.04.2023)

скачать Доступно только для пользователей



 
Andrey_AДата: Понедельник, 03.09.2012, 20:15 | Сообщение № 2
Генералиссимус

На сайте с: 26.01.2012
Город: Сочи, Хоста
Сообщений: 7186
Награды: 143
Репутация: 125
Аверин Андрей
Примеры использования:

Code
"Линии с переходом" Icon("%a\AkelPadImage.dll",742)
{
-"========" Call("Scripts::Main", 1, "InsertPlus.vbs", `"36" "=" "76" "" "\n"`) Icon("%a\AkelPadImage.dll",161)
-"—————" Call("Scripts::Main", 1, "InsertPlus.vbs", `"36" "—" "76" "" "\n"`) Icon("%a\AkelPadImage.dll",161)
-"~~~~~~~~" Call("Scripts::Main", 1, "InsertPlus.vbs", `"36" "~" "76" "" "\n"`) Icon("%a\AkelPadImage.dll",161)
}
"Линии..." Icon("%a\AkelPadImage.dll",742)
{
-"========" Call("Scripts::Main", 1, "InsertPlus.vbs", `"36" "=" "76"`) Icon("%a\AkelPadImage.dll",161)
-"—————" Call("Scripts::Main", 1, "InsertPlus.vbs", `"36" "—" "76"`) Icon("%a\AkelPadImage.dll",161)
-"~~~~~~~~" Call("Scripts::Main", 1, "InsertPlus.vbs", `"36" "~" "76"`) Icon("%a\AkelPadImage.dll",161)
}

"Различные примеры"
{
-"Дублицировать выделенное в строке  и увеличить все цифры +1" Call("Scripts::Main", 1, "InsertPlus.vbs", `"33"`) Icon("%a\AkelPadImage.dll",1017)
-"В выделенном увеличить все цифры +1" Call("Scripts::Main", 1, "InsertPlus.vbs", `"34"`) Icon("%a\AkelPadImage.dll",1017)
-"Дублицировать выделенное в строке" Call("Scripts::Main", 1, "InsertPlus.vbs", `"19"`) Icon("%a\AkelPadImage.dll",1017)
-"Вставка с выделением" Call("Scripts::Main", 1, "InsertPlus.vbs", `"28"`) Icon("%a\AkelPadImage.dll",1040)
-"Вставка в начало файла" Call("Scripts::Main", 1, "InsertPlus.vbs", `"9"`) Icon("%a\AkelPadImage.dll",537)
-"Вставка в конец файла" Call("Scripts::Main", 1, "InsertPlus.vbs", `"24"`) Icon("%a\AkelPadImage.dll",1031)
-"Вставка поверх..." Call("Scripts::Main", 1, "InsertPlus.vbs", `"30"`) Icon("%a\AkelPadImage.dll",1042)
-"Вставка с переходом на новую строку" Call("Scripts::Main", 1, "InsertPlus.vbs", `"2"`) Icon("%a\AkelPadImage.dll",1007)
-"Вставка на строку выше" Call("Scripts::Main", 1, "InsertPlus.vbs", `"5"`) Icon("%a\AkelPadImage.dll",366)
-"Вставка на строку ниже" Call("Scripts::Main", 1, "InsertPlus.vbs", `"14"`) Icon("%a\AkelPadImage.dll",246)
-"Вставка из буфера в блок Ctrl+Shift+B" Call("Scripts::Main", 1, "InsertPlus.vbs", `"15"`) Icon("%a\AkelPadImage.dll",907)
-"Вставить в начало файла имя файла" Call("Scripts::Main", 1, "InsertPlus.vbs", `"1"`) Icon("%a\AkelPadImage.dll",353)
-"Замена пробелов на ~~ и кавычки на чёрточки" Call("Scripts::Main", 1, "InsertPlus.vbs", `"8"`) Icon("%a\AkelPadImage.dll",527)
-"Поменять местами левую и праую часть строки" Call("Scripts::Main", 1, "InsertPlus.vbs", `"6"`) Icon("%a\AkelPadImage.dll",344)
-"Увеличить версию и дату в vbs скрипте" Call("Scripts::Main", 1, "InsertPlus.vbs", `"16"`) Icon("%a\AkelPadImage.dll",1011)
}

"Вставка с <обрамлением>" Icon("%a\AkelPadImage.dll",1041)
{
-"Вставка с <обрамлением>" Call("Scripts::Main", 1, "InsertPlus.vbs", `"29" "<||>"`) Icon("%a\AkelPadImage.dll",1041)
-"Вставка с [обрамлением]" Call("Scripts::Main", 1, "InsertPlus.vbs", `"29" "[||]"`) Icon("%a\AkelPadImage.dll",1041)
-"Вставка с /обрамлением/" Call("Scripts::Main", 1, "InsertPlus.vbs", `"29" "/||/"`) Icon("%a\AkelPadImage.dll",1041)
-"Вставка с • обрамлением •" Call("Scripts::Main", 1, "InsertPlus.vbs", `"29" "• || •"`) Icon("%a\AkelPadImage.dll",1041)
}

"Вставка в другой документ" Icon("%a\AkelPadImage.dll",1030)
{
-"Вставить из буфера в новую вкладку" Call("Scripts::Main", 1, "InsertPlus.vbs", `"18"`) Icon("%a\AkelPadImage.dll",151)
        SEPARATOR
-"Вставка выделенного в следующий документ" Call("Scripts::Main", 1, "InsertPlus.vbs", `"10"`) Icon("%a\AkelPadImage.dll",547)
-"Вставка выделенного в предыдущий документ" Call("Scripts::Main", 1, "InsertPlus.vbs", `"11"`) Icon("%a\AkelPadImage.dll",555)
}
"Вставка с преобразованием..." Icon("%a\AkelPadImage.dll",1038)
{
-"Вставка с переводом ''ВСЕ ПРОПИСНЫЕ''" Call("Scripts::Main", 1, "InsertPlus.vbs", `"21"`) Icon("%a\AkelPadImage.dll",1037)
-"Вставка с переводом ''все строчные''" Call("Scripts::Main", 1, "InsertPlus.vbs", `"20"`) Icon("%a\AkelPadImage.dll",1035)
-"Вставка с переводом ''Как в предложениях''" Call("Scripts::Main", 1, "InsertPlus.vbs", `"22"`) Icon("%a\AkelPadImage.dll",1036)
-"Вставка с переводом ''Начинать С Прописных''" Call("Scripts::Main", 1, "InsertPlus.vbs", `"25"`) Icon("%a\AkelPadImage.dll",1034)
-"Вставка с переводом ''иНВЕРТИРОВАТЬ''" Call("Scripts::Main", 1, "InsertPlus.vbs", `"26"`) Icon("%a\AkelPadImage.dll",1033)
        SEPARATOR
-"Вставка с удалением пробелов" Call("Scripts::Main", 1, "InsertPlus.vbs", `"35" " " ""`) Icon("%a\AkelPadImage.dll",1070)
-"Вставка с заменой пробела на _" Call("Scripts::Main", 1, "InsertPlus.vbs", `"35" " " "_"`) Icon("%a\AkelPadImage.dll",1071)
-"Вставка с заменой _ на пробел" Call("Scripts::Main", 1, "InsertPlus.vbs", `"35" "_" " "`) Icon("%a\AkelPadImage.dll",1071)
}

"Вставка выделенного..." Icon("%a\AkelPadImage.dll",1045)
{
-"Вставка выделенного в начало файла" Call("Scripts::Main", 1, "InsertPlus.vbs", `"31"`) Icon("%a\AkelPadImage.dll",1044)
-"Вставка выделенного в конец файла" Call("Scripts::Main", 1, "InsertPlus.vbs", `"32"`) Icon("%a\AkelPadImage.dll",1043)
-">Вставка выделенного в конец файла" Call("Scripts::Main", 1, "InsertPlus.vbs", `"32" ">||"`) Icon("%a\AkelPadImage.dll",1046)
}


Code

-"Вставка с заменой строки" Call("Scripts::Main", 1, "InsertPlus.vbs", `"41"`) Icon("%a\AkelPadImage.dll",1185)
-"Вставка с заменой правой части строки" Call("Scripts::Main", 1, "InsertPlus.vbs", `"39"`) Icon("%a\AkelPadImage.dll",1181)
-"Вставка с заменой левой части строки" Call("Scripts::Main", 1, "InsertPlus.vbs", `"40"`) Icon("%a\AkelPadImage.dll",1182)


Доступно только для пользователей

Доступно только для пользователей



 
jsonДата: Пятница, 22.02.2013, 19:18 | Сообщение № 3
Сержант

На сайте с: 28.10.2012
Город: Киев
Сообщений: 21
Награды: 1
Репутация: 0
Andrey_A , можно сделать так чтобы Вставлять выделенное в следующий документ не в позицию курсора,а с новой строки?
чтобы не следить где там курсор,в какой он там позиции....
 
Andrey_AДата: Пятница, 22.02.2013, 19:20 | Сообщение № 4
Генералиссимус

На сайте с: 26.01.2012
Город: Сочи, Хоста
Сообщений: 7186
Награды: 143
Репутация: 125
Аверин Андрей
Цитата (json)
можно сделать так чтобы Вставлять выделенное в следующий документ не в позицию курсора,а с новой строки?

Для этого скрипта есть ещё 3 хотелки от разных пользователей - постараюсь на днях сделать.


 
Andrey_AДата: Понедельник, 25.02.2013, 02:01 | Сообщение № 5
Генералиссимус

На сайте с: 26.01.2012
Город: Сочи, Хоста
Сообщений: 7186
Награды: 143
Репутация: 125
Аверин Андрей
Код
-"Вставка выделенного в следующий документ" Call("Scripts::Main", 1, "InsertPlus.vbs", `"10"`) Icon("%a\AkelPadImage.dll",547)
-"Вставить выделенное в следующий документ в конец строки в позицию курсора" Call("Scripts::Main", 1, "InsertPlus.vbs", `"51"`) Icon("%a\AkelPadImage.dll",547)
-"Вставить выделенное в следующий документ в начало строки в позицию курсора" Call("Scripts::Main", 1, "InsertPlus.vbs", `"52"`) Icon("%a\AkelPadImage.dll",547)
-"Вставить выделенное в следующий документ на новую строку" Call("Scripts::Main", 1, "InsertPlus.vbs", `"53"`) Icon("%a\AkelPadImage.dll",547)
-"Вставить выделенное в следующий документ на предыдущую строку" Call("Scripts::Main", 1, "InsertPlus.vbs", `"54"`) Icon("%a\AkelPadImage.dll",547)
-"Вставить выделенное в следующий документ в конец текста" Call("Scripts::Main", 1, "InsertPlus.vbs", `"55"`) Icon("%a\AkelPadImage.dll",547)
-"Вставить выделенное в следующий документ в начало текста" Call("Scripts::Main", 1, "InsertPlus.vbs", `"56"`) Icon("%a\AkelPadImage.dll",547)
SEPARATOR
-"Вставка выделенного в предыдущий документ" Call("Scripts::Main", 1, "InsertPlus.vbs", `"11"`) Icon("%a\AkelPadImage.dll",555)
-"Вставить выделенное в предыдущий документ в конец строки в позицию курсора" Call("Scripts::Main", 1, "InsertPlus.vbs", `"57"`) Icon("%a\AkelPadImage.dll",555)
-"Вставить выделенное в предыдущий документ в начало строки в позицию курсора" Call("Scripts::Main", 1, "InsertPlus.vbs", `"58"`) Icon("%a\AkelPadImage.dll",555)
-"Вставить выделенное в предыдущий документ на новую строку" Call("Scripts::Main", 1, "InsertPlus.vbs", `"59"`) Icon("%a\AkelPadImage.dll",555)
-"Вставить выделенное в предыдущий документ на предыдущую строку" Call("Scripts::Main", 1, "InsertPlus.vbs", `"60"`) Icon("%a\AkelPadImage.dll",555)
-"Вставить выделенное в предыдущий документ в конец текста" Call("Scripts::Main", 1, "InsertPlus.vbs", `"61"`) Icon("%a\AkelPadImage.dll",555)
-"Вставить выделенное в предыдущий документ в начало текста" Call("Scripts::Main", 1, "InsertPlus.vbs", `"62"`) Icon("%a\AkelPadImage.dll",555)


 
jsonДата: Понедельник, 25.02.2013, 15:56 | Сообщение № 6
Сержант

На сайте с: 28.10.2012
Город: Киев
Сообщений: 21
Награды: 1
Репутация: 0
То что надо!Спасибо!
up
 
shveicarДата: Вторник, 26.02.2013, 14:14 | Сообщение № 7
Генерал-лейтенант

На сайте с: 18.05.2012
Город: Санкт-Петербург
Сообщений: 562
Награды: 10
Репутация: 23
И от меня Спасибо, не хватает только варианта - Вставить выделенное в следующий документ в начало текста и отделение от предыдущего пустой строкой.
И еще одного варианта - разделение с помощью ---------------------//-------------------- дата (месяц день время)
текст1
---------------------//-------------------- (месяц день время)
текст2
На все случаи жизни...
Еще раз Благодарю за труд.


Сообщение отредактировал shveicar - Вторник, 26.02.2013, 14:28
 
Andrey_AДата: Вторник, 26.02.2013, 19:44 | Сообщение № 8
Генералиссимус

На сайте с: 26.01.2012
Город: Сочи, Хоста
Сообщений: 7186
Награды: 143
Репутация: 125
Аверин Андрей
Цитата (shveicar)
Вставить выделенное в следующий документ в начало текста и отделение от предыдущего пустой строкой.
И еще одного варианта - разделение с помощью

сделал - перекачайте скрипт
+ подправил предыдущие последние примеры...

а вот новые:

Код

-"Вставить выделенное в следующий документ в конец текста с пустой строкой" Call("Scripts::Main", 1, "InsertPlus.vbs", `"63" ""`) Icon("%a\AkelPadImage.dll",547)
-"Вставить выделенное в следующий документ в конец текста с разделителем" Call("Scripts::Main", 1, "InsertPlus.vbs", `"63" "- - - - - - - - - - - \\ - - - - - - - - - - -"`) Icon("%a\AkelPadImage.dll",547)
-"Вставить выделенное в следующий документ в начало текста с пустой строкой" Call("Scripts::Main", 1, "InsertPlus.vbs", `"64" ""`) Icon("%a\AkelPadImage.dll",547)
-"Вставить выделенное в следующий документ в начало текста с разделителем" Call("Scripts::Main", 1, "InsertPlus.vbs", `"64" "- - - - - - - - - - - \\ - - - - - - - - - - -"`) Icon("%a\AkelPadImage.dll",547)
SEPARATOR
-"Вставить выделенное в предыдущий документ в конец текста с пустой строкой" Call("Scripts::Main", 1, "InsertPlus.vbs", `"65" ""`) Icon("%a\AkelPadImage.dll",555)
-"Вставить выделенное в предыдущий документ в конец текста с разделителем" Call("Scripts::Main", 1, "InsertPlus.vbs", `"65" "- - - - - - - - - - - \\ - - - - - - - - - - -"`) Icon("%a\AkelPadImage.dll",555)
-"Вставить выделенное в предыдущий документ в начало текста с пустой строкой" Call("Scripts::Main", 1, "InsertPlus.vbs", `"66" ""`) Icon("%a\AkelPadImage.dll",555)
-"Вставить выделенное в предыдущий документ в начало текста с разделителем" Call("Scripts::Main", 1, "InsertPlus.vbs", `"66" "- - - - - - - - - - - \\ - - - - - - - - - - -"`) Icon("%a\AkelPadImage.dll",555)


Цитата (shveicar)
Еще раз Благодарю за труд.

Да какой же это труд )
Единственная трудность это переключаться с одного языка программирования на другой, с одной сборки на другую, с третьей утилиты на четвёртую... good
Спасибо за спасибо!!!


 
jsonДата: Вторник, 12.03.2013, 19:25 | Сообщение № 9
Сержант

На сайте с: 28.10.2012
Город: Киев
Сообщений: 21
Награды: 1
Репутация: 0
Единственный недостаток - это переключение каждый раз на ту вкладку в которую выделенное вставляется.Если бы еще вот зто как-то убрать....
 
Andrey_AДата: Вторник, 12.03.2013, 20:34 | Сообщение № 10
Генералиссимус

На сайте с: 26.01.2012
Город: Сочи, Хоста
Сообщений: 7186
Награды: 143
Репутация: 125
Аверин Андрей
Цитата (json)
Единственный недостаток - это переключение каждый раз на ту вкладку в которую выделенное вставляется.Если бы еще вот зто как-то убрать....

Так будет жёсткое дёрганье, конечно можно попробовать...


 
Andrey_AДата: Понедельник, 06.01.2014, 12:47 | Сообщение № 11
Генералиссимус

На сайте с: 26.01.2012
Город: Сочи, Хоста
Сообщений: 7186
Награды: 143
Репутация: 125
Аверин Андрей
Цитата json ()
Единственный недостаток - это переключение каждый раз на ту вкладку в которую выделенное вставляется.Если бы еще вот зто как-то убрать....

Не прошло и года... реализовано, примеры:

Код

"Вставить в другой документ и вернуться к прежнему"
{
-"Вставить из буфера в новую вкладку справа <-->" Call("Scripts::Main", 1, "InsertPlus.vbs", `"108"`) Icon("%a\AkelPadImage.dll",1241)
-"Вставить из буфера в новую вкладку слева <-->" Call("Scripts::Main", 1, "InsertPlus.vbs", `"109"`) Icon("%a\AkelPadImage.dll",1242)
SEPARATOR
-"Вставка выделенного в следующий документ <-->" Call("Scripts::Main", 1, "InsertPlus.vbs", `"110"`) Icon("%a\AkelPadImage.dll",1239)
-"Вставить выделенное в следующий документ в конец строки в позицию курсора <-->" Call("Scripts::Main", 1, "InsertPlus.vbs", `"201"`) Icon("%a\AkelPadImage.dll",1239)
-"Вставить выделенное в следующий документ в начало строки в позицию курсора <-->" Call("Scripts::Main", 1, "InsertPlus.vbs", `"202"`) Icon("%a\AkelPadImage.dll",1239)
-"Вставить выделенное в следующий документ на новую строку <-->" Call("Scripts::Main", 1, "InsertPlus.vbs", `"203"`) Icon("%a\AkelPadImage.dll",1239)
-"Вставить выделенное в следующий документ на предыдущую строку <-->" Call("Scripts::Main", 1, "InsertPlus.vbs", `"204"`) Icon("%a\AkelPadImage.dll",1239)
-"Вставить выделенное в следующий документ в конец текста <-->" Call("Scripts::Main", 1, "InsertPlus.vbs", `"205"`) Icon("%a\AkelPadImage.dll",1239)
-"Вставить выделенное в следующий документ в начало текста <-->" Call("Scripts::Main", 1, "InsertPlus.vbs", `"206"`) Icon("%a\AkelPadImage.dll",1239)
SEPARATOR
-"Вставка выделенного в предыдущий документ <-->" Call("Scripts::Main", 1, "InsertPlus.vbs", `"111"`) Icon("%a\AkelPadImage.dll",1240)
-"Вставить выделенное в предыдущий документ в конец строки в позицию курсора <-->" Call("Scripts::Main", 1, "InsertPlus.vbs", `"207"`) Icon("%a\AkelPadImage.dll",1240)
-"Вставить выделенное в предыдущий документ в начало строки в позицию курсора <-->" Call("Scripts::Main", 1, "InsertPlus.vbs", `"208"`) Icon("%a\AkelPadImage.dll",1240)
-"Вставить выделенное в предыдущий документ на новую строку <-->" Call("Scripts::Main", 1, "InsertPlus.vbs", `"209"`) Icon("%a\AkelPadImage.dll",1240)
-"Вставить выделенное в предыдущий документ на предыдущую строку <-->" Call("Scripts::Main", 1, "InsertPlus.vbs", `"210"`) Icon("%a\AkelPadImage.dll",1240)
-"Вставить выделенное в предыдущий документ в конец текста <-->" Call("Scripts::Main", 1, "InsertPlus.vbs", `"211"`) Icon("%a\AkelPadImage.dll",1240)
-"Вставить выделенное в предыдущий документ в начало текста <-->" Call("Scripts::Main", 1, "InsertPlus.vbs", `"212"`) Icon("%a\AkelPadImage.dll",1240)
SEPARATOR
SEPARATOR
-"Вставить выделенное в следующий документ в конец текста с пустой строкой <-->" Call("Scripts::Main", 1, "InsertPlus.vbs", `"213" ""`) Icon("%a\AkelPadImage.dll",1239)
-"Вставить выделенное в следующий документ в конец текста с разделителем <-->" Call("Scripts::Main", 1, "InsertPlus.vbs", `"213" "- - - - - - - - - - - \\ - - - - - - - - - - -"`) Icon("%a\AkelPadImage.dll",1239)
-"Вставить выделенное в следующий документ в начало текста с пустой строкой <-->" Call("Scripts::Main", 1, "InsertPlus.vbs", `"214" ""`) Icon("%a\AkelPadImage.dll",1239)
-"Вставить выделенное в следующий документ в начало текста с разделителем <-->" Call("Scripts::Main", 1, "InsertPlus.vbs", `"214" "- - - - - - - - - - - \\ - - - - - - - - - - -"`) Icon("%a\AkelPadImage.dll",1239)
SEPARATOR
-"Вставить выделенное в предыдущий документ в конец текста с пустой строкой <-->" Call("Scripts::Main", 1, "InsertPlus.vbs", `"215" ""`) Icon("%a\AkelPadImage.dll",1240)
-"Вставить выделенное в предыдущий документ в конец текста с разделителем <-->" Call("Scripts::Main", 1, "InsertPlus.vbs", `"215" "- - - - - - - - - - - \\ - - - - - - - - - - -"`) Icon("%a\AkelPadImage.dll",1240)
-"Вставить выделенное в предыдущий документ в начало текста с пустой строкой <-->" Call("Scripts::Main", 1, "InsertPlus.vbs", `"216" ""`) Icon("%a\AkelPadImage.dll",1240)
-"Вставить выделенное в предыдущий документ в начало текста с разделителем <-->" Call("Scripts::Main", 1, "InsertPlus.vbs", `"216" "- - - - - - - - - - - \\ - - - - - - - - - - -"`) Icon("%a\AkelPadImage.dll",1240)
}


 
Andrey_AДата: Среда, 15.10.2014, 17:04 | Сообщение № 12
Генералиссимус

На сайте с: 26.01.2012
Город: Сочи, Хоста
Сообщений: 7186
Награды: 143
Репутация: 125
Аверин Андрей
Примеры использования:

Код

-"Вставить в начало колонок '-привет-'" Call("Scripts::Main", 1, "InsertPlus.vbs", `"121" "привет" "0"`) Icon("%a\AkelPadImage.dll",886)
-"Вставить в конец колонок '-привет-'" Call("Scripts::Main", 1, "InsertPlus.vbs", `"121" "привет" "1"`) Icon("%a\AkelPadImage.dll",1183)
-"Вставить в начало колонок строку из буфера обмена" Call("Scripts::Main", 1, "InsertPlus.vbs", `"121" "#clip#" "0"`) Icon("%a\AkelPadImage.dll",886)
-"Вставить в конец колонок строку из буфера обмена" Call("Scripts::Main", 1, "InsertPlus.vbs", `"121" "#clip#" "1"`) Icon("%a\AkelPadImage.dll",1183)
-"Вставить в начало колонок строку, введенную в диалоге" Call("Scripts::Main", 1, "InsertPlus.vbs", `"121" "#dialog#" "0"`) Icon("%a\AkelPadImage.dll",886)


 
goldengeДата: Воскресенье, 17.12.2017, 04:32 | Сообщение № 13
Сержант

На сайте с: 17.12.2017
Сообщений: 37
Награды: 0
Репутация: 0
не скачивается файл, он не доступен
вопрос. как вставить только имя без расширения в начало первой строки
 
Andrey_AДата: Воскресенье, 17.12.2017, 05:10 | Сообщение № 14
Генералиссимус

На сайте с: 26.01.2012
Город: Сочи, Хоста
Сообщений: 7186
Награды: 143
Репутация: 125
Аверин Андрей
goldenge, обновил скрипт и перезалил

Цитата goldenge ()
ак вставить только имя без расширения в начало первой строки

В скрипте посмотрите параметры для 137 режима вставки частей пути активного на редактирования файла

Пример:

Код
-"Вставить в начало документа имя файла" Call("Scripts::Main", 1, "InsertPlus.vbs", `137 2 1`) Icon("%a\AkelPadImage.dll",103)


.


 
goldengeДата: Понедельник, 18.12.2017, 04:51 | Сообщение № 15
Сержант

На сайте с: 17.12.2017
Сообщений: 37
Награды: 0
Репутация: 0
Цитата Andrey_A ()
для 137 режима вставки

---------------------------------------------
скачал, спасибо

Добавлено (18.12.2017, 04:51)
---------------------------------------------
Цитата Andrey_A ()
goldenge, обновил скрипт и перезалил

все замечательно получилось, есть пожелание
в том было лучше тем, что был перевод строки, а здесь нет и к тому же еще одно автосохранение не нужно после действия вставки имени файла
можно над этим поработать?


Сообщение отредактировал goldenge - Понедельник, 18.12.2017, 05:44
 
  • Страница 1 из 2
  • 1
  • 2
  • »
Поиск:

Интеллектуальные права и отказ от ответственности