‘============================================================ ‘ NAME: FSO_Folder_Add.vbs ‘ AUTHOR: Neal Walters ‘ DATE : 3/26/2005 ‘ http://VBScript-Training.com ‘============================================================ Option Explicit Dim fso, myFolderName, objFolder, myNewFoldername, objFolders Set fso = CreateObject(“Scripting.FileSystemObject”) myFolderName = “c:\Documents and Settings\nwalters\My Documents\Camtasia Studio\VBScript-Training2″ myNewFolderName = “NealsNewestFolder” If fso.FolderExists(myFolderName) Then ‘Copy Folder Here Set objFolder = fso.GetFolder(myFolderName) Set objFolders = objFolder.SubFolders WScript.Echo ” Folder = [...]
Read More...- Subscribe via RSS
Pages
Categories
Blogroll
Tags
Add Folder browser Collections delete Dictionary Object Disk Drives Drives Enumerate Excel Explode File File I/O Files FileSystemObject Folder Folders FSO Hardware HTML HTTP Post I/O Input List MS-Excel Name/Value Pairs Output Prompt Read ReadAll ReadLine Recursion Recursive RegEx Regular Expressions remove Scripting.Dictionary Scripting.FileSystemObject Show spreadsheet User Input Web Write WriteLine Write to File XML