É possível fazer backup de pastas shell no XP com script VB ou WSH?

Question

Eu gostaria de fazer backup de pastas shell na minha máquina XP. É útil para mim, porque quando eu reinstalar o XP eu posso apenas restaurar essas pastas de backup.

Vocês podem me iniciar ou me apontar na direção certa?

'*************************************
' Author:
'
' This script backs up shell folders.
'
' Source:
' Destination:
'
'-------------------------------------
'Rev #          Changes
'-------------------------------------
'1.0            started
'*************************************

'*********
'VARIABLES
'*********

dim filesys
dim source
dim destination

source="C:\Documents and Settings"
destination="C:\Temp"    'will change in future revisions

'*********
'OBJECTS
'*********
set filesys=CreateObject("Scripting.FileSystemObject")


if filesys.FolderExists(source) Then
    filesys.MoveFolder source, destination
    MsgBox("Folder Moved")
End if

    

Answer 1

Um exemplo de um script em lote simples para copiar sua pasta Meus Documentos para uma pasta em outra unidade / partição

@echo off

if not exist "S:\backup" mkdir "S:\backup"

xcopy "%userprofile%\My Documents" "S:\backup" /e /v /c /h /r /y

    

Answer 2

Você pode ter mais sorte ao usar as SpecialFolders ( Descritas aqui a>) do que codificar seu caminho para a pasta de origem, já que o SO gerenciará a localização das pastas reais, que podem não estar em C: \ Documents and Settings ou em qualquer outro local.