Working with folderscreating the basic folder
Just the steps
|
To create a folder
1.
|
Create a file system object by using Createobject. |
2. |
Use the createfolder command to create the folder. |
|
Createbasicfolder. vbs
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFolder = objFSO.CreateFolder("c:\fso1")
Creating Multiple folders
Createmultifolders. vbs
Option Explicit
Dim numFolders
Dim folderPath
Dim folderPrefix
Dim objFSO
Dim objFolder
Dim i
Dim objSHell
Dim myDocs
Set objSHell = CreateObject("wscript.shell")
myDocs = objSHell.SpecialFolders("mydocuments")
numFolders = 10
folderPath = myDocs & "\"
folderPrefix = "TempUser"
For i = 1 To numFolders
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFolder = objFSO.CreateFolder(folderPath & folderPreFix & i)
Next
WScript.Echo(i - 1 & " folders created")
Note: when FsO creates a folder, its parent directory must have been created. Otherwise, creation will fail.
Deleting a folderdeletebasicfolder. vbs
Set objFSO = CreateObject("Scripting.FileSystemObject")
objFSO.DeleteFolder("c:\fso")
Deletemultifolders. vbs
Option Explicit
Dim numFolders
Dim folderPath
Dim folderPrefix
Dim objFSO
Dim objFolder
Dim i
numFolders = 10
folderPath = "C:\"
folderPrefix = "TempUser"
For i = 1 To numFolders
Set objFSO = CreateObject("Scripting.FileSystemObject")
objFSO.DeleteFolder(folderPath & folderPreFix & i)
Next
WScript.Echo(i - 1 & " folders deleted")
For ..... Next usage
Just the steps
|
To implement for... Next
1.
|
On a new line in the script, type I followed by a variable and a count (such as for I = 1 to 10 ). |
2. |
On the next line, type the command to be completed MED. |
3. |
On the next line, type next. |
|