DVD Eject mit Win PE

<#
-----------------------------------------------------------------------
- Function to open and close specific CD/DVD-Drive 
- by @colinardo (https://administrator.de)
-----------------------------------------------------------------------
#>
function initCDROM() {
    [String]$SourceCode = @"  
Namespace colinardo.cdrom
    Public Class MyFunctions
        Declare Function mciSendString Lib "winmm.dll" Alias "mciSendStringA" (ByVal lpszCommand As String, ByVal lpszReturnString As String, ByVal cchReturnLength As Long, ByVal hwndCallback As Long) As Long  

        Public Shared Function OpenDoor(device As String) As Long
            Dim cmd As Long = mciSendString("open " & device & " type cdaudio alias CD wait shareable", 0, 0, 0)  
            If cmd <> 0 Then
                Dim cmd2 As Long = mciSendString("set CD door open", 0, 0, 0)  
                mciSendString("close CD", 0, 0, 0)  
                Return cmd2
            Else
                Return cmd
            End If
        End Function
        Public Shared Function CloseDoor(device As String) As Long
            Dim cmd As Long = mciSendString("open " & device & " type cdaudio alias CD wait shareable", 0, 0, 0)  
            If cmd <> 0 Then
                Dim cmd2 As Long = mciSendString("set CD door closed", 0, 0, 0)  
                mciSendString("close CD", 0, 0, 0)  
                Return cmd2
            Else
                Return cmd
            End If
        End Function
    End Class
End Namespace
"@  
 add-type -TypeDefinition $SourceCode -Language VisualBasic
}

#Benutzerdefinierten .Net-Code laden (Hinweis: Die Type-Definition dar nur einmal in einer Session geladen werden)
initCDROM

echo "Öffne das Laufwerk F:"  
#Hiermit öffnet man ein Laufwerk mit dem jeweiligen Laufwerksbuchstaben
[colinardo.cdrom.MyFunctions]::OpenDoor("F:")  

echo "Schließe das Laufwerk F:"  
#Hiermit schließt man ein Laufwerk mit dem jeweiligen Laufwerksbuchstaben
[colinardo.cdrom.MyFunctions]::CloseDoor("F:")  

#AutoIt3Wrapper_Change2CUI=y
if $CmdLine = 2 Then
	$laufwerk =  $CmdLine[1]
	$funktion = $CmdLine[2]
	if DriveGetType($laufwerk) <> "" and ($funktion  = "open" or $funktion = "close") then  
		if cdtray($laufwerk,$funktion) = 1 Then
			exit 0
		Else
			ConsoleWriteError("Unspecified Error")  
			exit 1
		endif
	Else
		ConsoleWriteError("Fehler in Parametern oder Laufwerk nicht verfügbar!" & @lf & "Syntax: tray.exe [Laufwerk] [open] | [close]")  
		exit 1
	EndIf

Else
	ConsoleWriteError("Kein Laufwerksparameter angegeben!" & @lf & "Syntax: tray.exe [Laufwerk] [open] | [close]")  
	exit 1
EndIf