Можно ли создавать резервные копии папок оболочки в XP с помощью скрипта VB или WSH?

Я хотел бы сделать резервную копию папок оболочки на моей машине XP. Это полезно для меня, потому что когда я переустанавливаю XP, я могу просто восстановить эти резервные копии папок оболочки.

Ребята, можете ли вы начать меня или указать мне правильное направление?

'*************************************
' 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