Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  | Правила  

Компьютерный форум OSzone.net » Клиентские ОС Microsoft » Microsoft Windows 7 » Программы - [решено] Как создать кнопку "новый текстовый документ"в проводнике-по аналогии с "Новая папка"

Ответить
Настройки темы
Программы - [решено] Как создать кнопку "новый текстовый документ"в проводнике-по аналогии с "Новая папка"

Новый участник


Сообщения: 2
Благодарности: 0

Профиль | Отправить PM | Цитировать


Изменения
Автор: sofon-emelin38
Дата: 28-06-2012
Изображения
Тип файла: png Кнопка создать текстовый файл.png
(32.5 Kb, 61 просмотров)
Собственно сабж в вопросе - Как создать кнопку "новый текстовый документ"в проводнике-по аналогии с "Новая папка" -
чтоб создавался файл .txt - одним кликом по кнопке , которая располагается скажем рядом с кнопкой "Новая папка".
Да, проводник - Windows 7 (x64) - Максимальная

Да, пожалуйста не объясняйте как создавать текстовый файл - через меню->Файл->Создать или
через правую кнопку мыши - создать текстовый документ.
Задача - создать кнопку по аналогии с кнопкой "Новая папка" - со всеми её свойствами - то-есть , если кликать несколько раз по кнопке будет создаваться текстовый файл.txt , текстовый файл (1).txt , текстовый файл (2).txt , текстовый файл (3).txt и т.д. -
для наглядности прикрепил скриншот:
http://forum.oszone.net/attachment.p...1&d=1340890745

ЖЕЛАТЕЛЬНО - ЧЕРЕЗ РЕЕСТР, А НЕ ЧЕРЕЗ УСТАНОВКУ ДОПОЛНИТЕЛЬНЫХ ПРОГРАММ.

Отправлено: 15:00, 28-06-2012

 

Аватара для Smarty

In reserve...


Contributor


Сообщения: 6705
Благодарности: 2061

Профиль | Отправить PM | Цитировать


sofon-emelin38, с чего вы взяли, что данный вопрос относится к оформлению системы?
И потом, не все "хотелки" осуществимы, тем более средствами самой системы.

-------
Установочные FLASH\USB-HDD с Windows + Live CD \ Restorator 2018 \ Windows 10 Enterprise LTSB\LTSC MUI Project


Отправлено: 18:40, 28-06-2012 | #2



Для отключения данного рекламного блока вам необходимо зарегистрироваться или войти с учетной записью социальной сети.

Если же вы забыли свой пароль на форуме, то воспользуйтесь данной ссылкой для восстановления пароля.


Новый участник


Сообщения: 2
Благодарности: 0

Профиль | Отправить PM | Цитировать


Если не относится к данной теме - посоветуйте куда её перенести , я новичок у вас на форуме - возможно оформление - не самая близкая тема к моему вопросу , но мне показалось так - ведь касается интерфейса.
В общем просьба к модерам : перенесите тему в соответствующий раздел - либо подскажите как мне самому это сделать (да , и в Какой раздел?)

Отправлено: 18:51, 28-06-2012 | #3


Аватара для Smarty

In reserve...


Contributor


Сообщения: 6705
Благодарности: 2061

Профиль | Отправить PM | Цитировать


sofon-emelin38, "понесу" в Microsoft Windows 7, смотрите теперь там.

-------
Установочные FLASH\USB-HDD с Windows + Live CD \ Restorator 2018 \ Windows 10 Enterprise LTSB\LTSC MUI Project


Отправлено: 18:55, 28-06-2012 | #4


(*.*)


Administrator


Сообщения: 34301
Благодарности: 5976

Профиль | Сайт | Отправить PM | Цитировать


sofon-emelin38, как вариант, Как добавить произвольные кнопки на панель проводника Windows 7. Но с вашими условиями надо писать скрипт... Могу перенести в скрипты

-------
Канал Windows 10, etc | Чат @winsiders

Это сообщение посчитали полезным следующие участники:

Отправлено: 19:20, 28-06-2012 | #5


Ветеран


Contributor


Сообщения: 24484
Благодарности: 7116

Профиль | Отправить PM | Цитировать


Если я правильно вновь перечитал указанную статью, то примерно так (cкрипт VBScript, на указанной ОС не проверялось по причине отсутствия оной):

читать дальше »
Код: Выделить весь код
Option Explicit

Dim strPath2Folder
Dim strNewFilePath
Dim lngCount

If WScript.Arguments.Count <> 0 Then
	With WScript.CreateObject("Scripting.FileSystemObject")
		strPath2Folder = WScript.Arguments.Item(0)
		
		strNewFilePath = .BuildPath(strPath2Folder, "Текстовый документ.txt")
		lngCount = 1
		
		Do
			If Not .FileExists(strNewFilePath) Then
				Exit Do
			Else
				lngCount = lngCount + 1
				strNewFilePath = .BuildPath(strPath2Folder, "Текстовый документ (" & CStr(lngCount) & ").txt")
			End If
		Loop
		
		With .CreateTextFile(strNewFilePath)
			.Close
		End With
	End With
Else
	WScript.Echo "Do not use this script directly"
End If

WScript.Quit 0
Это сообщение посчитали полезным следующие участники:

Отправлено: 21:49, 28-06-2012 | #6


Аватара для majoras

Пользователь


Сообщения: 101
Благодарности: 2

Профиль | Отправить PM | Цитировать


Посмотрите, пожалуйста, что я не так сделал
читать дальше »
Windows Registry Editor Version 5.00

[HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\FolderTypes\{5c4f28b5-f869-4e84-8e60-f11db97c5cc7}\TasksItemsSelected]

[HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\FolderTypes\{5c4f28b5-f869-4e84-8e60-f11db97c5cc7}\TasksItemsSelected\0]

[HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\FolderTypes\{5c4f28b5-f869-4e84-8e60-f11db97c5cc7}\TasksItemsSelected\0\c4b82bec-6cc3-4189-b8cd-e7978a6cec2c]
"Title"="Шпаргалка"
"InfoTip"="Шпаргалка"

[HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\FolderTypes\{5c4f28b5-f869-4e84-8e60-f11db97c5cc7}\TasksItemsSelected\0\c4b82bec-6cc3-4189-b8cd-e7978a6cec2c\shell]

[HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\FolderTypes\{5c4f28b5-f869-4e84-8e60-f11db97c5cc7}\TasksItemsSelected\0\c4b82bec-6cc3-4189-b8cd-e7978a6cec2c\shell\InvokeTask]

[HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\FolderTypes\{5c4f28b5-f869-4e84-8e60-f11db97c5cc7}\TasksItemsSelected\0\c4b82bec-6cc3-4189-b8cd-e7978a6cec2c\shell\InvokeTask\command]
@="wscript.exe \"C:\\Users\\majoras\\AppData\\Shpargalka\\Shpargalka.js\" %*"

-------
Даже самые красивые ноги где нибудь заканчиваются...
Жизнь чужая - копейка, кровь чужая - вода, люди с мелкой душонкой - большая беда!


Отправлено: 22:55, 22-10-2012 | #7


Ветеран


Contributor


Сообщения: 24484
Благодарности: 7116

Профиль | Отправить PM | Цитировать


majoras, если речь про код отсюда — то это VBScript. Соответственно, как минимум, должно быть не «Shpargalka.js», а «Shpargalka.vbs». В реестре так же.
Это сообщение посчитали полезным следующие участники:

Отправлено: 23:57, 22-10-2012 | #8


Аватара для majoras

Пользователь


Сообщения: 101
Благодарности: 2

Профиль | Отправить PM | Цитировать


Цитата Iska:
как минимум, должно быть «Shpargalka.vbs»»
Исправил, но этого мало. Кнопка не появилась
Гляньте ещё раз, пожалуйста!

-------
Даже самые красивые ноги где нибудь заканчиваются...
Жизнь чужая - копейка, кровь чужая - вода, люди с мелкой душонкой - большая беда!


Отправлено: 00:46, 23-10-2012 | #9


Ветеран


Contributor


Сообщения: 24484
Благодарности: 7116

Профиль | Отправить PM | Цитировать


Цитата majoras:
Кнопка не появилась
Гляньте ещё раз, пожалуйста! »
Мне глядеть нет смысла: у меня нет Windows 7. Ждите ответов тех, у кого эта ОС наличествует.
Это сообщение посчитали полезным следующие участники:

Отправлено: 03:32, 23-10-2012 | #10



Компьютерный форум OSzone.net » Клиентские ОС Microsoft » Microsoft Windows 7 » Программы - [решено] Как создать кнопку "новый текстовый документ"в проводнике-по аналогии с "Новая папка"

Участник сейчас на форуме Участник сейчас на форуме Участник вне форума Участник вне форума Автор темы Автор темы Шапка темы Сообщение прикреплено

Похожие темы
Название темы Автор Информация о форуме Ответов Последнее сообщение
Интерфейс - [решено] Пропал пункт меню "Создать"/"Текстовый документ" Myp1blka Microsoft Windows 2000/XP 7 14-11-2013 19:26
Разное - [решено] Возвращение в меню "Создать" пункта "Текстовый документ", ассоциирование с TXT Pavla Microsoft Windows 7 16 10-07-2012 07:47
Интерфейс - Из контекстного меню в пункте "Создать", пропала команда "Текстовый документ". QUMATOZ Microsoft Windows 2000/XP 1 23-10-2011 18:07
Разное - [решено] Как задать свое название вместо "Новый текстовый документ" при создании oldim Microsoft Windows 7 3 25-09-2011 14:07
Интерфейс - [решено] При просмотре папок в "мой компьютер" и "проводнике" каждая новая папка открывается в mr.R Microsoft Windows 2000/XP 14 07-08-2008 00:33




 
Переход