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

Показать сообщение отдельно

Ветеран


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

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


Цитата Hancog:
Еще спросить хотел можно ли добавить к всем файлам их запуск после создания,т.е что бы вот файл создался и сразу запустился,не для всех файлов нужен запуск »
Код: Выделить весь код
@echo off
goto:#

#####################################
Здесь
расположен
Ваш 1-ый текст!
#####################################
Здесь
расположен
Ваш 2-ой текст!
#####################################
Здесь
расположен
Ваш 3-ий текст!
#####################################
Здесь
расположен
Ваш 4-ый текст!
#####################################
Здесь
расположен
Ваш 5-ый текст!
#####################################
Здесь
расположен
Ваш 6-ой текст!
#####################################
Здесь
расположен
Ваш 7-ой текст!
#####################################
Здесь
расположен
Ваш 8-ой текст!
#####################################
Здесь
расположен
Ваш 9-ый текст!
#####################################

:#
set quantity=9
for %%i in (
 "D:\Work\109\1.txt/start"
 "D:\Work\109\2.txt"
 "D:\Work\109\3.txt"
 "D:\Work\109\4.txt"
 "D:\Work\109\5.txt/start"
 "D:\Work\109\6.txt"
 "D:\Work\109\7.txt"
 "D:\Work\109\8.txt"
 "D:\Work\109\9.txt/start"
 ) do (
 set /a count+=1
 call set %%count%%=%%i
 )

for /l %%i in (1 1 %quantity%) do (
 set /p="WScript.StdOut.Write(Split(WScript.CreateObject("Scripting.FileSystemObject").OpenTextFile("%~fs0").ReadAll(), vbCrLf&"#####################################"&vbCrLf)(%%i))"<nul>.vbs
 for /f "tokens=1,2 delims=/" %%j in ('
 "call set /p=%%%%i%%<nul"
 ') do (
  cscript //nologo .vbs>"%%j"
  if not "%%k"=="" (
   start "" notepad "%%j"
   )
  )
 )
del .vbs

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

Отправлено: 22:00, 21-08-2014 | #53