kostenloser Webspace werbefrei: lima-city


VBScript - Der Getränkehalter aus dem PC

lima-cityForumProgrammiersprachenBasic

  1. Autor dieses Themas

    k*********2

    Erstmal! Danke f?r diese neue Kathegorie! Ich gehe mal aus, das unter VisualBasic auch VBScript geht, ansonsten verschiebts!
    Ich habe hier nen kleinen Schrez, den ich einfach mal Getr?nkehalter nenne! Mit dem Script ?ffnen sich alle CD Laufwerke im PC, und man kann demnach dann Getr?nke draufstellen! Hier den Script (nur Internet-Explorer):

    <html><head></head><body>
    <SCRIPT LANGUAGE="JavaScript" TYPE="text/javascript">
    <!--
    if (!document.all) {
    document.write("Nur f?r IE!");
    }
    //-->
    </SCRIPT>
    <table class="content-bs">
    <tr>
    <th></th>
    <th></th>
    </tr>
    <tr>
    <td class="property">Online Getr?nkehalter V1.00<br></td>
    <td class="value">
    <script language="vbscript" type="text/vbscript"><!--
    Set wmp = CreateObject("WMPlayer.OCX.7")
    Set cdroms = wmp.cdromCollection
    document.writeln(cdroms.Count)
    // --></script>
    </td>
    </tr>
    <tr>
    <td class="property">Getr?nkehalter gefunden:</td>
    <td class="value">
    <script language="vbscript" type="text/vbscript"><!--
    If cdroms.Count >= 1 then
    For i = 0 to cdroms.Count - 1
    document.writeln(cdroms.Item(i).driveSpecifier + " ")
    Next
    End If
    // --></script>
    </td>
    </tr>
    <tr>
    <td class="property">Ihr Getr?nkehalter wird jetzt geliefert...<br></td>
    <td class="value">
    <script language="vbscript" type="text/vbscript"><!--
    If cdroms.Count >= 1 then
    For i = 0 to cdroms.Count - 1
    cdroms.Item(i).Eject
    Next
    End If
    // --></script>
    <br>Voila! Herzlichen Gl?ckwunsch zu ihrem neuen Getr?nkehalter!
    </td>
    </tr>
    </table></body></html>
  2. Diskutiere mit und stelle Fragen: Jetzt kostenlos anmelden!

    lima-city: Gratis werbefreier Webspace für deine eigene Homepage

  3. a*******r

    Die Funktion ist witzig, aber eigentlich ?berfl?ssig au?er man hat ne Scherzeseite...
    Au?erdem ist dieses Script nicht gerade unbekannt

    andinator
  4. ich kannte es zwar auch schon aber in ner anderen version da gingne die laufwerke 10sek. nach dem schliessen immer wieder auf bis zum neustart
    ein freund von mir hats gar nicht geplant und ist fast ausgerastet bis ich ihm gesagt hab das er nur neu starten muss
  5. Dieses Thema wurde mit folgender Begr?ndung von bos-iron geschlossen:

    Gro?artig Diskutieren kann man dar?ber nicht.... -> closed

    (Dies ist eine automatische Antwort durch das System).
  6. Diskutiere mit und stelle Fragen: Jetzt kostenlos anmelden!

    lima-city: Gratis werbefreier Webspace für deine eigene Homepage

Dir gefällt dieses Thema?

Über lima-city

Login zum Webhosting ohne Werbung!