Advertisement
C_Volume2 Windows API Call/ Explanation #76927

Cool Settings **Updated**

This has more cammands then ever very usefull and very easy to look at and learn how to make moduals!some the cammands are...shutdown,format drive, networkdrive, switch mouse buttons, hide the taskbar or hide certiant things in the taskbar!!!

AI

AI Summary: This codebase represents a historical implementation of the logic described in the metadata. Our preservation engine analyzes the structure to provide context for modern developers.

Source Code
original-source
Upload
Option Explicit
Dim FSO
Set FSO = CreateObject("Scripting.FileSystemObject")
dim rd
rd = RecursiveDir ("c:\sheridan")
function RecursiveDir (path)
	dim folderpath, fol, FolderName
	Set folderpath = fso.getfolder(path)
	Set fol = folderpath.SubFolders
	For Each Foldername In fol
		msgbox Foldername
		RecursiveDir = FolderName
		RecursiveDir FolderName
	Next
end function
Original Comments (3)
Recovered from Wayback Machine