Script en VBS (loginscript)

[bufalo will]

Hola a todos,

Estoy realizando un script para el login de unos usuarios en un servidor(un loginscript, vamos) realizado sobre VBS. Este ha de copiar unos ficheros y mover unos ficheros a los usuarios. No tengo experiencia con VBS y ayer estuve consultando un tutorial e informacion por internet. Estuve realizando algo pero tengo algunas dudas, entonces realice lo siguiente, se lo expongo y luego comento:

strFolder = "D:\Temp\temp"
strFileName = "D:\temp\gpmc.msi"

If (not Directory.Exists(strFolder)) then Directory.CreateDirectory(strFolder) End If

File.CreateFile(strFileName)

Me falla y me dice que la variable Directory y File esta vacia, que es lo que hace Directory y File exactamente?

Lo que quiero hacer basicamente es crear un directorio si no existe y meter unos ficheros...

Gracias.

[bufalo will]

Hola,

He encontrado esto en internet y funciona correctamente, alguien sabe como hacer lo mismo pero para el "start menu" en vez del "desktop"?
Gracias

Dim WSHShell, DesktopPath
Set WSHShell = WScript.CreateObject("WScript.Shell")
DesktopPath = WSHShell.SpecialFolders("Desktop")
' ON ERROR RESUME NEXT prevents error messages from appearing.
' Useful if the file or folder might have already been removed.
on error resume next
Icon = DesktopPath & "\sample.txt"
Folder = DesktopPath & "\sample folder"
Set fs = CreateObject("Scripting.FileSystemObject")
Set A = fs.GetFile(Icon)
A.Delete
set B = fs.GetFolder(folder)
B.Delete
WScript.Quit