Hallo nochmal! 
Kann mir jemand sagen, wie ich veranlasse, dass eine CD-ROM wieder ausgeworfen wird, wenn sich darauf nicht die Datei xy befindet?
Wie z.B. bei Setup-Anwendungen mit mehreren Disks...
Dankeschön! 
CD-ROM Laufwerk selbst auswerfen
-
- [ gelöst ]
-
MatthiasG. -
16. Januar 2009 um 07:04 -
Geschlossen -
Erledigt
-
-
Check mal CDTray(...)
-
Kurz mal ein Beispiel:
Spoiler anzeigen
[autoit]$Drive = 'X:'
[/autoit] [autoit][/autoit] [autoit]
$Datei = 'autorun.exe'CDTray($Drive, 'open')
[/autoit] [autoit][/autoit] [autoit]
MsgBox(0, "", "Bitte die nächste CD einlegen und dann OK drücken")
CDTray($Drive, 'closed')
Do
Sleep(50)
$Bereit = DriveStatus($Drive)
Until $Bereit = 'READY'
If Not FileExists($Drive&'\'&$Datei) Then
CDTray($Drive, 'open')
MsgBox(0, "", "Bitte die richtige CD einlegen!")
Else
install()
EndIfFunc install()
[/autoit]
MsgBox(0, "", "Das Programm wurde erfolgreich installiert!")
EndFunc -
Dankeschön!
Mal schaun ob es funzt