Ergebnis 1 bis 4 von 4

Thema: VBS: CD Laufwerk öffnen/schließen

  1. #1
    Kaiserliche Hoheit
    Registriert seit
    01.03.2007
    Beiträge
    1.957
    Danke
    0
    Bekam 0 mal "Danke" in 0 Postings

    Standard VBS: CD Laufwerk öffnen/schließen

    Hey, da ich jetzt mal wieder was für ein Programm gebraucht hab, schreiben musste, hab ich mir gedacht, dass es vll auch anderen behilflich sein könnte.

    Wer das nutzen will, muss sich etwas mit der Sprache auskennen, bzw. den Quelltext verstehen können.

    Kurze Rede, kein Sinn. Hier ist das Teil:


    Textdatei erstellen, folgenden Code einfügen, abspeichern, Dateiendung in .vbs benennen.

    Code:
    '''''''''''''''''''''''''''' Öffnen
    
    Set WSHShell = WScript.CreateObject("WScript.Shell")
    
    ' schließt nach 5 Sekunden das Popup
    WSHShell.Popup Txt, 5, WScript.ScriptName, 4096 + 64
    
    set mp = WScript.CreateObject("WMPlayer.OCX")
    mp.cdromcollection.item(0).eject
    set mp = nothing
    Edit: Das mit dem schließen hat doch nicht funktioniert!

    Viel Spaß damit!
    Achtung: Dies ist ein alter Thread im HTML und Webmaster Forum
    Diese Diskussion ist älter als 90 Tage. Die darin enthaltenen Informationen sind möglicherweise nicht mehr aktuell. Erstelle bitte zu deiner Frage ein neues Thema im Forum !!!!!

  2. #2
    Nirino
    Gast

    Standard AW: VBS: CD Laufwerk öffnen/schließen

    Zitat Zitat von Ericfischer Beitrag anzeigen
    Hey, da ich jetzt mal wieder was für ein Programm gebraucht hab, schreiben musste, hab ich mir gedacht, dass es vll auch anderen behilflich sein könnte.

    Wer das nutzen will, muss sich etwas mit der Sprache auskennen, bzw. den Quelltext verstehen können.

    Kurze Rede, kein Sinn. Hier ist das Teil:


    Textdatei erstellen, folgenden Code einfügen, abspeichern, Dateiendung in .vbs benennen.

    Code:
    '''''''''''''''''''''''''''' Öffnen
    
    Set WSHShell = WScript.CreateObject("WScript.Shell")
    
    ' schließt nach 5 Sekunden das Popup
    WSHShell.Popup Txt, 5, WScript.ScriptName, 4096 + 64
    
    set mp = WScript.CreateObject("WMPlayer.OCX")
    mp.cdromcollection.item(0).eject
    set mp = nothing
    Edit: Das mit dem schließen hat doch nicht funktioniert!

    Viel Spaß damit!
    vielen dank
    funktioniert das auch bei windows xp?

  3. #3
    Kaiserliche Hoheit
    Themenstarter

    Registriert seit
    01.03.2007
    Beiträge
    1.957
    Danke
    0
    Bekam 0 mal "Danke" in 0 Postings

    Standard AW: VBS: CD Laufwerk öffnen/schließen

    Probieren geht über Studieren^^

    Dürfte funktionieren, da VBS schon ziemlich alt ist.

  4. #4
    Sweet_Angel
    Gast

    Standard AW: VBS: CD Laufwerk öffnen/schließen

    bitte keine alten threads reanimieren

Ähnliche Themen

  1. frameset im fullscreen öffnen und wieder schließen
    Von werwolf im Forum HTML & CSS Forum
    Antworten: 8
    Letzter Beitrag: 18.02.2008, 19:06
  2. Fenster schließen und dabei link öffnen
    Von Teabag im Forum HTML & CSS Forum
    Antworten: 1
    Letzter Beitrag: 31.01.2007, 14:35
  3. Extra Fenster mit Java öffnen und schließen (newbie) ?
    Von derchris im Forum PHP Forum - Apache - CGI - Perl - JavaScript und Co.
    Antworten: 2
    Letzter Beitrag: 29.10.2006, 14:14
  4. DVD-Laufwerk wird als CD-Laufwerk angezeigt
    Von wernerdeluxe im Forum Computer - Internet Forum
    Antworten: 3
    Letzter Beitrag: 19.03.2005, 17:04
  5. Antworten: 8
    Letzter Beitrag: 29.11.2004, 09:20

Stichworte

Berechtigungen

  • Neue Themen erstellen: Nein
  • Themen beantworten: Nein
  • Anhänge hochladen: Nein
  • Beiträge bearbeiten: Nein
  •