| View previous topic :: View next topic |
| Author |
Message |
Yurbanizator
Joined: 13 Dec 2006
Posts: 26
|
 (Separately) Posted: Wed Dec 13, 2006 23:52 Post subject: Новый файлик ... |
 |
|
Задача: необходимо расположить на панели кнопочку, или пару кнопочек, что бы при нажатии в выбранном каталоге появлялся допустим новый текстовый файлик new.txt или же файл new.html с уже созданным заренее шаблончиком.
Вопрос: как это реализовать в ТС???
| ! | Avada: | | С учётом характера и предмета последующей дискуссии дальнейшее нахождение этой темы в подфоруме "Секреты и советы" сочтено нецелесообразным. Тема переносится в "Автоматизацию". | |
|
| Back to top |
|
 |
D1P
Joined: 20 Dec 2004
Posts: 2973
Location: Тбилиси
|
|
| Back to top |
|
|
BeTeP
Joined: 31 Mar 2005
Posts: 127
Location: Санкт-Петербург
|
| (Separately) Posted: Thu Dec 14, 2006 02:20 Post subject: |
|
|
Если я правильно понял, то ему надо создать не пустой файл, а шаблон, т.е. в файле уже должна быть записана определенная информация.
_________________
«The Truth Is Out There» |
|
| Back to top |
|
|
Yurbanizator
Joined: 13 Dec 2006
Posts: 26
|
| (Separately) Posted: Thu Dec 14, 2006 09:06 Post subject: |
|
|
| BeTeP wrote: | | Если я правильно понял, то ему надо создать не пустой файл, а шаблон, т.е. в файле уже должна быть записана определенная информация. |
Да совершенно верно, должен быть не пустой файл а файл, содержащий некий заранее подготовленный шаблон.
Так например, new.htm должен содержать
| Code: | <html>
<head>
<title>Untitled</title>
</head>
<body>
Hello World!
</body>
</html> |
[/code] |
|
| Back to top |
|
|
StrangeRRor
Joined: 15 Jul 2006
Posts: 214
|
| (Separately) Posted: Thu Dec 14, 2006 15:31 Post subject: |
|
|
Для примера с HTML можно написать bat-файл следующего содержания:
| Code: |
@echo off
set OUTPUTFILE=%1
echo ^<html^> >%OUTPUTFILE%
echo ^<head^> >>%OUTPUTFILE%
echo ^<title^>Untitled^</title^> >>%OUTPUTFILE%
echo ^</head^> >>%OUTPUTFILE%
echo ^<body^> >>%OUTPUTFILE%
echo Hello World! >>%OUTPUTFILE%
echo ^</body^> >>%OUTPUTFILE%
echo ^</html^> >>%OUTPUTFILE%
|
Добавить на панель кнопку для этого файла с параметром "?", например, для того что бы задавать нужное имя файла-результата. |
|
| Back to top |
|
|
Yurbanizator
Joined: 13 Dec 2006
Posts: 26
|
| (Separately) Posted: Fri Dec 15, 2006 21:07 Post subject: |
|
|
С копированием шаблона все очень хорошо получилось, цель достигнута. Только возможно ли сделать так что бы при выполнении батника командная строка не мелькала? echo off хоть и минимизирует отображение комманд, но все же окошко успевает промелькнуть...
Это хоть и не обязательно, но вот бы довести до идеала... |
|
| Back to top |
|
|
D1P
Joined: 20 Dec 2004
Posts: 2973
Location: Тбилиси
|
| (Separately) Posted: Fri Dec 15, 2006 21:56 Post subject: |
|
|
То же самое можно написать и на VBS, без всяких досовских окошек. Но это к нашим скриптописателям, я в VBS не силён.
_________________
База знаний о Total Commander
Блог |
|
| Back to top |
|
|
Yurbanizator
Joined: 13 Dec 2006
Posts: 26
|
| (Separately) Posted: Fri Dec 15, 2006 22:01 Post subject: |
|
|
Да действительно, я об этом как то сразу и не подумал...
Стоит попробовать, с vbs немного знаком... |
|
| Back to top |
|
|
Volniy
Joined: 15 Dec 2004
Posts: 585
Location: Местный
|
| (Separately) Posted: Sat Dec 16, 2006 02:50 Post subject: |
|
|
Сохранить как VBS-файл, параметром передавать имя файла
| Code: | Dim fso, F
Set fso = CreateObject("scripting.filesystemobject")
F = WScript.Arguments(0)
Set F=fso.OpenTextFile(F, 2, True)
F.WriteLine("<html>")
F.WriteLine("<head>")
F.WriteLine("<title>Untitled</title>")
F.WriteLine("</head>")
F.WriteLine("<body>")
F.WriteBlankLines(1)
F.WriteLine("Hello World!")
F.WriteBlankLines(1)
F.WriteLine("</body>")
F.WriteLine("</html>")
Set F=Nothing
Set fso=Nothing
WScript.Quit |
|
|
| Back to top |
|
|
Yurbanizator
Joined: 13 Dec 2006
Posts: 26
|
| (Separately) Posted: Sat Dec 16, 2006 18:55 Post subject: |
|
|
Благодарю за скриптик, но дело в том что этот скрипт сам записывает в файл все строки HTML кода.
А как сделать так что бы был в отдельной папке заранее заготовленный шаблон, и при помощи скрипта это файл копировался в текущий каталог? Вот вопрос. |
|
| Back to top |
|
|
Volniy
Joined: 15 Dec 2004
Posts: 585
Location: Местный
|
| (Separately) Posted: Sat Dec 16, 2006 19:53 Post subject: |
|
|
| Yurbanizator wrote: | | А как сделать так что бы был в отдельной папке заранее заготовленный шаблон, и при помощи скрипта это файл копировался в текущий каталог? Вот вопрос. |
Рази ж ето вопрос  А говорил ведь, что
| Yurbanizator wrote: | | с vbs немного знаком.. |
| Code: | Dim fso
Const Template="буква диска:\путь к файлу шаблона\template.html"
Set fso = CreateObject("scripting.filesystemobject")
fso.CopyFile Template, WScript.Arguments(0), True
Set fso=Nothing
WScript.Quit |
Хотя скрипт тут нафиг не нужен, ведь команду Copy еще пока никто не отменял. Имхо разумнее ее задействовать, прямо в кнопке. |
|
| Back to top |
|
|
Yurbanizator
Joined: 13 Dec 2006
Posts: 26
|
| (Separately) Posted: Sat Dec 16, 2006 20:00 Post subject: |
|
|
| Знаком немного. Давно писал чегоТо... Покопался в справочнике и вспомнил мож чего к чему... но уже опередили. Благодарю.. |
|
| Back to top |
|
|
Yurbanizator
Joined: 13 Dec 2006
Posts: 26
|
| (Separately) Posted: Sat Dec 16, 2006 21:04 Post subject: |
|
|
| Quote: | | Хотя скрипт тут нафиг не нужен, ведь команду Copy еще пока никто не отменял. Имхо разумнее ее задействовать, прямо в кнопке |
Пробовал не получилось...
Ваш скрипт не захотел работать , пока не переименовал переменную в objFSO!!!
Но вот незадача ... файл копируется, но в ТС не отображается пока не обновишь окошко директории! Что делать? |
|
| Back to top |
|
|
D1P
Joined: 20 Dec 2004
Posts: 2973
Location: Тбилиси
|
| (Separately) Posted: Sat Dec 16, 2006 22:51 Post subject: |
|
|
| Quote: | | Но вот незадача ... файл копируется, но в ТС не отображается пока не обновишь окошко директории! Что делать? |
Слать TC команду cm_RereadSource, но хз, можно ли это сделать средствами VBS. С использованием ScriptHelper - точно можно.
_________________
База знаний о Total Commander
Блог |
|
| Back to top |
|
|
Volniy
Joined: 15 Dec 2004
Posts: 585
Location: Местный
|
| (Separately) Posted: Sun Dec 17, 2006 00:32 Post subject: |
|
|
| Yurbanizator wrote: | Пробовал не получилось...
Ваш скрипт не захотел работать , пока не переименовал переменную в objFSO!!! |
Послушай совет старика - никогда не садись за комп под шофе  Чревато...
| Yurbanizator wrote: | | Но вот незадача ... файл копируется, но в ТС не отображается пока не обновишь окошко директории! Что делать? |
http://forum.wincmd.ru/viewtopic.php?p=13013#13013 |
|
| Back to top |
|
|
|
Rules
Search
FAQ
Memberlist
Usergroups
Register
Profile
Log in to check your private messages
Log in
