Kopier fra netværksfolder
Nogen der lige kan se hvad der er galt med linie 16? Jeg vil gerne kopiere en folder fra et netværksdrev til en lokal folder under profilen... Please help..Takker
Dim wsh
Dim fs
Dim profile
set wsh = createobject("WScript.Shell")
Set fs = CreateObject("Scripting.FileSystemObject")
profile = wsh.ExpandEnvironmentStrings("%UserProfile%")
set wsh = createobject("WScript.Shell")
profile = wsh.ExpandEnvironmentStrings("%UserProfile%")
set filesys = CreateObject("Scripting.FileSystemObject")
filesys.CopyFolder ", Profile & "\\Application Data\Microsoft\Skabeloner" , "L:\skabeloner"
WScript.Quit