Dateien auf USB-Stick kopieren

set fso = CreateObject("Scripting.FileSystemObject")  

set drive = fso.GetDrive("D")  

Wscript.Echo "AvailableSpace =", drive.AvailableSpace   
Wscript.Echo "DriveLetter    =", drive.DriveLetter      
Wscript.Echo "DriveType      =", drive.DriveType        
Wscript.Echo "FileSystem     =", drive.FileSystem       
Wscript.Echo "FreeSpace      =", drive.FreeSpace        
Wscript.Echo "IsReady        =", drive.IsReady          
Wscript.Echo "Path           =", drive.Path             
Wscript.Echo "RootFolder     =", drive.RootFolder       
Wscript.Echo "SerialNumber   =", drive.SerialNumber     
Wscript.Echo "ShareName      =", drive.ShareName        
Wscript.Echo "TotalSize      =", drive.TotalSize        
Wscript.Echo "VolumeName     =", drive.VolumeName       

Function Script:DeleteOldest($zipFileName)
    {
        $pc = $env:COMPUTERNAME
        $usb = get-wmiobject -class "Win32_LogicalDisk" -namespace "root\CIMV2" -computername $pc -Filter "DriveType='2'"  

        # if ($usb.Name -contains "D:")  
		if (@($usb | Select-Object -Expand Name) -contains "D:")  
            {

                $data_size = 0
                $usb_size = Get-WMIObject Win32_Logicaldisk  -filter "DeviceId='D:'" | Select-Object -expand freespace  
                $data_size = (Get-Item $zipFileName).Length/1MB + 10
                if ( $usb_size/1MB -lt $data_size ) { Get-ChildItem D:\ | ? { $_.Extension -eq ".zip" -and ( $_.Name -like "*sysdb*" -or $_.Name -like "*usrdb*"  ) } | Sort-Object -Property LastWriteTime | Select-Object -first 3 | Remove-Item  }  
                if(-not $?) { $Script:MOVEErrorMsg += "`r`n`r`nPlatz auf USB schaffen... Failed: " + $error[0].exception.message }  

            }

    }

$USBDrives = (Get-CimInstance Win32_Volume -Filter "DriveType='2'").DriveLetter  
switch ($USBDrives.Count) {
    0 { Write-Host "Kein USB-Laufwerk erkannt" }  
    1 {
        $drive = $USBDrives 
    }
    Default {
        for ($i = 0; $i -lt $USBDrives.Count; $i++) {
            Write-Host "$i fuer $($USBDrives[$i])"  
        }
        $drive = $USBDrives[[Int32]::Parse($(Read-Host "Welches Laufwerk?"))]  
    }
}
if ($drive) {
    Write-Host "USB-Laufwerk: $drive"  
    # kopieren
}