Веселый дисковод (VBS)

Тема в разделе "VBScript / Bat / JavaScript", создана пользователем ХОТАБЫЧ, 23.06.2017.

Загрузка...
Ответов: 8 Просмотров: 1162 Ответить в теме
  1. ХОТАБЫЧ
    Тема довольно старая, но забавная

    Открыть
    Код:
    Set WMPlayer = CreateObject("WMPlayer.OCX.7")
    WMPlayer.CdRomCollection.Item(0).Eject()
    

    Закрыть если открыт, иначе откроется и закроется
    Код:
    Set WMPlayer = CreateObject("WMPlayer.OCX.7")
    WMPlayer.CdRomCollection.Item(0).Eject()
    WMPlayer.CdRomCollection.Item(0).Eject()
    

    Бесконечный
    Код:
    Set WMPlayer = CreateObject("WMPlayer.OCX.7")
    do
    WMPlayer.CdRomCollection.Item(0).Eject()
    loop
    
     
    23.06.2017 Сообщений: 418 Симпатий: 501
  2. L:319
    Это один из самых древних приколов.
     
    23.06.2017 Сообщений: 48 Симпатий: 5
  3. ХОТАБЫЧ
    Я же написал что старый прикол
     
    23.06.2017 Сообщений: 418 Симпатий: 501
  4. DonBraun
    DonBraun Online
    Ой. Моя бабушка ещё так в своей молодости забавлялась)
     
    24.06.2017 Сообщений: 414 Симпатий: 213
  5. ХОТАБЫЧ
    где-то я уже такой комент видел на ютубе
     
    24.06.2017 Сообщений: 418 Симпатий: 501
  6. DonBraun
    DonBraun Online
    Тебе показалось...
     
    24.06.2017 Сообщений: 414 Симпатий: 213
  7. L:319
    Я к тому что мало кто их уже использует, все новые молодые коды ищут! а фига там)))
     
    25.06.2017 Сообщений: 48 Симпатий: 5
  8. Houston
    все
    равно тема нормальная
     
    25.06.2017 Сообщений: 38 Симпатий: 12
  9. KopBaL0L
    Это еще норм, я помню имперсий марш на флопике - вот это правда олдскул.
     
    26.12.2018 Сообщений: 211 Симпатий: 60
В этой теме всего одна страница
Вам, как гостю, ограничены возможности взаимодействия с темами. Пройдите бесплатную регистрацию и откройте для себя море возможностей.