Not quite sure what you're trying to do but something like this might help:
First three lines work out "where am I now"; next line copies everything that's in the same folder as the script to a folder called "test" under c:\temp - change that to whatever you want.
Set oShell = CreateObject("WScript.Shell")
Set ofso = CreateObject("Scripting.FileSystemObject")
I'm guessing you then want to run some kind of setup process from that folder so do that at the "do something" bit and the final line deletes the folder just copied.
The two "true" flags will overwrite anything that was already in c:\temp\test and the second one deletes files which are read-only