programming-examples/asp/More_Code_Snippets/This copies a folder called mydata to backupdata.asp

<%
Dim objFSO, objFile
Set objFSO = CreateObject("Scripting.FileSystemObject")
objFSO.CopyFolder "c:\mydata", "c:\backupdata"
%>