Чем создать много текст файлов ?

kuzenstudio
На сайте с 20.09.2009
Offline
160
4665

Добрый день всем. Вопросик такой, требуется создать много(допустим 300) текст файлов. Идеально, программа или скрипт берет из текст файла имена и создает ткстовые файлы. Есть ли что то подобное ? Спасибо.

Качественный и не дорогой датский хостинг (https://gigahost.com.ru/e?ref=kuzenstudio).
wwwwww
На сайте с 29.04.2011
Offline
195
#1

ОС Windows? Какой формат входных данных?

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

Видишь? Свободная подпись.
[Удален]
#2

SeoTxtGen задаете программе текст указываете сколько файлов вам нужно сделать и и наслаждаетесь результатом

wwwwww
На сайте с 29.04.2011
Offline
195
#3

Попробуйте такой скрипт

Создайте в папке файл "makefiles.vbs" содержимое:


Const filename = "filenames.txt"
Dim file1, fname

Set FSO=WScript.CreateObject("Scripting.FileSystemObject")

If Not(FSO.FileExists(filename)) then
MsgBox "Не найден файл с именами"

Else

Set file1 = FSO.OpenTextFile(filename, 1)
Do Until file1.AtEndOfStream
fname = Trim(file1.ReadLine)
FSO.CreateTextFile fname & ".txt", True
Loop
file1.Close


End If

И текствоый файл "filenames.txt", такого вида


qagsadhgsh
afafsaf
hsfdjfg

где каждая новая строка сожержит имя для вновь создаваемого файла.

Получите:

qagsadhgsh.txt

afafsaf.txt

hsfdjfg.txt

файлы в текущей папке

Авторизуйтесь или зарегистрируйтесь, чтобы оставить комментарий