Script 4: Write a Script to create Folder within a Folder.

Dim fso

Dim Path

Set fso = createobject("scripting.filesystemobject")

Path = "D:\Shilpa\testing"

For i=1 to 10

Set f= fso.createfolder(Path)

Path= Path & "\" & i

Next