CD-Laufwerk öffnen
cd-laufwerk per batch öffnen
hi leutz,
ich möchte über eine batchdatei mein cd laufwerk öffnen.
kann mir vllt einer helfen???
danke im vorraus
lg phantom
hi leutz,
ich möchte über eine batchdatei mein cd laufwerk öffnen.
kann mir vllt einer helfen???
danke im vorraus
lg phantom
Bitte markiere auch die Kommentare, die zur Lösung des Beitrags beigetragen haben
Content-ID: 40548
Url: https://administrator.de/forum/cd-laufwerk-oeffnen-40548.html
Ausgedruckt am: 23.12.2024 um 02:12 Uhr
8 Kommentare
Neuester Kommentar
Hi,
geht schon, wenn der Media-Player installiert ist. Folgendes Beispiel ejected alle CD-Laufwerke:
cu,
Alex
geht schon, wenn der Media-Player installiert ist. Folgendes Beispiel ejected alle CD-Laufwerke:
' CDEject.vbs, Version 1.00
' Eject all CDROMs
'
' Needs Windows Media Player installed
'
' Script posted by Christoph Fricke on the
' microsoft.public.de.german.scripting.wsh
' newsgroup
Set oWMP = CreateObject("WMPlayer.OCX.7")
Set colCDROMs = oWMP.cdromCollection
if colCDROMs.Count >= 1 then
For i = 0 to colCDROMs.Count - 1
colCDROMs.Item(i).Eject
Next ' cdrom
End If
cu,
Alex
Yo....Ich hab da Zwei Lösungen:
1. Mit batch in kombination eines 8kb großen zusatz programmes.
Einfach http://pctipp.ch/helpdesk/kummerkasten/archiv/div/27681.asp?action=emai ... anschauen.
2. VB
Neu-->txt-File-->umbenennen zu *.vbs -->rechtsklick-->bearbeiten--> Und das eingeben:
Set oWMP = CreateObject("WMPlayer.OCX.7" )
Set colCDROMs = oWMP.cdromCollection
if colCDROMs.Count >=1 then
For i = 0 to colCDROMs.Count - 1
colCDROMs.Item(i).Eject
Next ' cdrom
End If
Das sollte dan aufgehen!
Mfg Nippie
1. Mit batch in kombination eines 8kb großen zusatz programmes.
Einfach http://pctipp.ch/helpdesk/kummerkasten/archiv/div/27681.asp?action=emai ... anschauen.
2. VB
Neu-->txt-File-->umbenennen zu *.vbs -->rechtsklick-->bearbeiten--> Und das eingeben:
Set oWMP = CreateObject("WMPlayer.OCX.7" )
Set colCDROMs = oWMP.cdromCollection
if colCDROMs.Count >=1 then
For i = 0 to colCDROMs.Count - 1
colCDROMs.Item(i).Eject
Next ' cdrom
End If
Das sollte dan aufgehen!
Mfg Nippie
Hallo,
ich frage mich gerade, ob man das gewünschte Verhalten nicht über einen rundll32 API-Aufruf hinbekommen kann. Aber um ehrlich zu sein: Ich bekomme es nicht ganz gebacken.
Folgende API-Funktion:
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/multim ...
Müsste ganz grob so funktionieren:
rundll32.exe winmm.dll,mciExecute "Set cdaudio door open"
Wie grob das funktioniert zeigt sich allerdings an den Fehlermeldungen: "Der Befehl erfordert einen Treiber-, Datei-, Alias- oder Gerätenamen", wahlweise auch "Beim Ausführen des Befehls ... ist eine Ausnahme aufgetreten".
API-Aufrufe sind nicht gerade mein Fachgebiet, deswegen würde mich interessieren, ob es nicht doch irgendwie geht nur eben etwas richtiger als mein Ansatz. Evtl. scheitert das obige nur am Ansprechen des richtigen MCI-Gerätes (Treiber-, Alias- oder Gerätename). Und wenn nicht: Woran liegt es?
Denn die ganzen Delphi, VB usw. Beispiele, die im Netz zu finden sind (http://www.google.de/search?hl=de&q=mciExecute&btnG=Google-Such ..), rufen auch nur diese API-Funktion auf...
Gruß,
Tim
ich frage mich gerade, ob man das gewünschte Verhalten nicht über einen rundll32 API-Aufruf hinbekommen kann. Aber um ehrlich zu sein: Ich bekomme es nicht ganz gebacken.
Folgende API-Funktion:
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/multim ...
Müsste ganz grob so funktionieren:
rundll32.exe winmm.dll,mciExecute "Set cdaudio door open"
Wie grob das funktioniert zeigt sich allerdings an den Fehlermeldungen: "Der Befehl erfordert einen Treiber-, Datei-, Alias- oder Gerätenamen", wahlweise auch "Beim Ausführen des Befehls ... ist eine Ausnahme aufgetreten".
API-Aufrufe sind nicht gerade mein Fachgebiet, deswegen würde mich interessieren, ob es nicht doch irgendwie geht nur eben etwas richtiger als mein Ansatz. Evtl. scheitert das obige nur am Ansprechen des richtigen MCI-Gerätes (Treiber-, Alias- oder Gerätename). Und wenn nicht: Woran liegt es?
Denn die ganzen Delphi, VB usw. Beispiele, die im Netz zu finden sind (http://www.google.de/search?hl=de&q=mciExecute&btnG=Google-Such ..), rufen auch nur diese API-Funktion auf...
Gruß,
Tim
Das ist häufig so,
Mit "hardwareeffekten" werden oft scherzprogramme bestattet. In diesen Scherzprogs sind dann aber auch oft spyware&Co.
Achja... Hinter das Script musst du noch nen "End" Tag schreiben, sonst meldet sich vbs immer beim runterfahren, weil es ja weiterläuft...Und es ist auch noch Verschwendung von wertvollen Kapazitäten
Mfg Nippie
Mit "hardwareeffekten" werden oft scherzprogramme bestattet. In diesen Scherzprogs sind dann aber auch oft spyware&Co.
Achja... Hinter das Script musst du noch nen "End" Tag schreiben, sonst meldet sich vbs immer beim runterfahren, weil es ja weiterläuft...Und es ist auch noch Verschwendung von wertvollen Kapazitäten
Mfg Nippie