rik1471

I am trying to create a batch file which asks for a user to enter a number, then it creates a directory with that number as the name;

I have up to now:

set /p input="Enter Number>"

How can I pull the string from that variable I have just set?

I could set input >> text.txt then how do I delete the "input=" part from the text file?

Any ideas??

David_Wallis

echo %input%

or

set /p input="Enter Number>"
md %input%

David

rik1471

You are the man.

rik1471

Ok, now how do I create a number of files depending on how many files are in a directory;

e.g.

If c:\files contains 14 files, I need to create a text file:
1.txt-->14.txt each i.e.

1.txt contains: http://link1.htm
2.txt contains: http://link2.htm

etc. all the way up to 14.txt, but sometimes there could be more or less files.

Thanx.

David_Wallis

does it have to be a batch file??

David

rik1471

No, but I can't program.

David_Wallis

Option Explicit

Dim OShell, FSys, Fsys1, XFile, XFiles, xFolder, TempFile
Dim Count, Folder, OutFolder, Line

Count = 0

' Set the location of the files
Folder = "C:\"

' Set The output Folder
OutFolder = "C:\"

Set oShell = WScript.CreateObject("WScript.Shell")
Set FSys = CreateObject("Scripting.FileSystemObject")
Set xFolder = FSys.GetFolder(folder)
Set xFiles = xFolder.Files

For Each xFile In xFiles
Count = Count + 1
WScript.Echo "Processing File " & Count & ": " & xFile.Name

Set FSys1 = CreateObject("Scripting.FileSystemObject")
Set TempFile = Fsys1.CreateTextFile(OutFolder & Count & ".txt", True)

' Line to write to file
Line = "Http://link" & Count & ".htm"

TempFile.WriteLine(Line)
TempFile.Close

Set Fsys1 = Nothing
Next

David_Wallis

Click on edit on my post...

Copy and paste into notepad, save as "File.Vbs" or whatever..

then call from a batch file by doing

cscript file.vbs

David

rik1471

Thanx

David_Wallis

no probs