Школоло / Говнокод #13763 Ссылка на оригинал

0

  1. 1
  2. 2
  3. 3
  4. 4
  5. 5
  6. 6
  7. 7
  8. 8
  9. 9
  10. 10
  11. 11
  12. 12
  13. 13
  14. 14
  15. 15
Главная » Усыпление программы
Усыпление программы
Автор: -Гепард97-
Написать автору
[просмотров 751]

В VBS есть функция wscript.sleep, позволяющая усыпить скрипт. Но как такое сделать в VB? Ответ прост: делаем новый модуль и пишем код:

Public Declare Sub Sleep Lib "kernel32" (byval dwMilliseconds As Long)

И все. Когда прогу нужно усыпить, просто пишем в коде проги, если например прога должна остановиться на 2 секунды то пишем

Sleep 2000

Этого способа нет на MSDN, я его сам отрыл

Билл Гатэс прочел это и уснул...
Z-z-z-z...

Запостил: Stertor Stertor, (Updated )

Комментарии (113) RSS

      • ...Глотать или не глотать вот в чем вопрос.
        Я уже нашел ответ.
        ГЛОТАТЬ, ОДНОЗНАЧНО!
        Если ты крут в натуре, напиши мне, не ссы:
        tarasber@mail.ru
        сделай меня мужчиной.
        Ответить
        • Бля, да я РУЧАЮСЬ что он не пидор. Обычный парень, я фотку его видел в фейсбуке.(может в вк, не помню уже).
          Ответить
  • Это изобретатель, типа моего вузовского преподавателя по программированию.
    И статья новая. Сначала подумал, что она ровестник superhackkiller'а.
    Ответить
      • Нет. У меня линукс дома. Думал, что 97 это год регистрации, но похоже это год рождения). АнтиСуперХакКиллер лол.
        Ответить
        • И причем тут линукс, дорогой crastinus? Что-то я недопонимаю. Может, Вы троллите, или того хуже, Вы-бот? Ну да ладно. Спасибо, что заглянули ко мне на статью.
          Ответить
          • Если ты не заметил, то Гепард извращается с функцией ядра NT. Думаешь в лине так можно?
            Ответить
            • > функцией ядра NT
              > Думаешь в лине так можно?
              Можно. Но с функцией ядра линукса 🙂

              Кстати sleep, емнип, не функция ядра. kernel32 это просто более-менее удобные обертки над ntdll, которая и взаимодействует с ядром.
              Ответить
              • >Можно. Но с функцией ядра линукса 🙂
                А в каком интерпретаторе и как это вызвать?
                Ответить
                • > А в каком интерпретаторе и как это вызвать?
                  В питоне например:
                  from ctypes import cdll
                  
                  libc = cdll.LoadLibrary("libc.so.6")
                  my_sleep = libc.sleep
                  
                  print "ZZZzzz..."
                  my_sleep(5)
                  print "Good morning!"
                  Да и в любом другом, где есть FFI.

                  P.S. Естественно, это вызов функции из какой-нибудь библиотеки, а не из ядра. Но и в VB ведь то же самое.
                  Ответить
            • Я спросил, заглядываете ли Вы на сайт к товарищам. Я не спрашивал, какая у Вас операционка.
              Ответить
                • Странная логика. Но мне нравятся нестандартные личности, это кульно.
                  +1
                  Ответить
                  • Я тоже не исключаю, что вы, программируя под .NET заглядываете на ЛОР, и обсуждаете с пацанами какое говно systemd :))
                    Ответить
          • ...Глотать или не глотать вот в чем вопрос.
                   Я уже нашел ответ:
              ГЛОТАТЬ, ОДНОЗНАЧНО!
            Если ты крут в натуре, напиши мне, не ссы:
            tarasber@mail.ru
            сделай меня мужчиной.
            Ответить
  • Сенсация! Сишники и жабисты нервно курят и подыскивают себе новую работу! Русский хакер Гепард97 совершил гениальное открытие! Теперь, благодаря его изысканиям, каждый программист на VB может поюзать любые функции WinAPI!

    Читать далее >>>
    Ответить
    • <Сишники и жабисты нервно курят>
      а кого и жаба душит
      Ответить
    • Борманд, ты жесток. Я попытался "перейти по ссылке"

      D
      Ответить
        • См. лучше это:
          http://www.youtube.com/watch?v=2Ajp9L17Dm8

          эта гениальная мелодия живет в моей душе уже лет 6, если не больше, вот только качество воспроизведения на ютубе, к сожалению, не очень.
          Этот трек, будучи извлечен из ресурсов и открыт в renoise, звучит раз в 10 лучше.
          Ответить
            • Это ты с непривычки. Трекерные мелодии имеют своеобразное звучание.
              Ответить
            • > Куда катится мир?
              Да не, что-то тёплое и ламповое прямоугольно-модулированное и восьмибитное в chiptune музыке все-таки есть... Демки, кейгены, старые игрушки... Ностальгия, мать ее 😛
              Ответить
              • kohina.net - крутят в прямом эфире солидный треклист чипдисков, саундов от демок и кейгенов и из старых игрушек.

                > прямоугольно-модулированное
                ЧИМ же почти у всех форматов модулей (по крайней мере для инструментов), верно?
                Ответить
                  • О да, попасть в твой чёрный список - это же так страшно. Кто теперь вообще будет ходить на этот сайт? Ума не приложу.
                    По существу: криворучка, скачай расшаренный плейлист и слушай в том плеере, который тебе удобен.
                    Ответить
                    • У меня в черном списке. Я никуда ничего не отсылаю, никаких данных. Просто не буду ходить на сайт, и точка.
                      Ответить
                      • Да и на компе не стоит держать. После установки открывает порт и устанавливает соединение с каким-то своим сервером. Можно было бы списать на обновление, но зачем же тогда держать соединение открытым?
                        Ответить
                        • Закрой фаером, если тебя это так беспокоит. Начиная с XP фаер искоропки блочит все входящие.
                          Ответить
                          • Фаер/антивирь - это все от шайтана. Не буду ставить. Самым лучшим эвристиком был и остается Панда. Но я не мог позволить себе купить лицензию. А из бесплатных антивирей у меня снискал славу православного аваст! 4.8, так как обладал хорошей эвристикой и совершенно не грузил комп. Но теперь рука сатаны Гугла простерлась и над их конторой... В топку.
                            Ответить
                            • Один только кашпер чего стоит. Многие вирмейкеры, троянописцы и прочий маргинальный сброд выбирают его, закрывая глаза на то, что разработчик оного - бывший кгб-шник. Потом выпучив глазища, долго удивляются, почему их новенький вирь - только что из под компилятора - уже палится. А это он, сукин сын, уже отправил образец к себе в офис. NOD32 вообще жопа. Эвристика полностью слизана у кава: одни и те же замашки, глюки и просчеты. Возможно, это произошло после инцидента в 2008, когда исходники антивируса касперского утекли в сеть. Расскажу небольшую историйку, когда я еще учился. Захожу я на кафедру и вижу, что комп странно себя ведет. После недолгих манипуляций выяснилось, что нод32 с просроченными базами (на календаре 2010 год, базы 2009) мирно соседствуетс с 5 червями, которые буквально вели борьбу за существование, по 1001 раз переписывая созданный на флешке autorun.inf. По моему совету поставили аваст с такими же базами и просканировали комп до загрузки. Аваст обнаружил около 300 инфицированных файлов - 4-5 в system32, более 100 в application data, обозначая их как win32:malware-gen. Это значит, вредоносная программа отсутствует в базах, и вывод сделан на основании эвристического анализа. Через пару недель провели интернет, аваст обновился и долечил комп. Вот такая история, гасспода. В другой раз кашпер упорно отказывался видеть червя на автоите. Червь грузил библиотечку к процессам и становился невидим в менеджере задач. Аваст со старыми базами даже открыть не дал флешку.
                              Ответить
                              • ты хоть с разный аккаунтов пиши, а то как шизофренник
                                Ответить
                                • Почему "как"? Я и не отрицаю.
                                  D

                                  кстати, "шизофреник" с 1 "н".
                                  И ставить диагнозы имеет право только врач. У тебя есть мед.образование?
                                  Ответить
                                    • Скажи ей, пусть аминазин тебе поколет. Рецепт я выпишу.
                                      Ответить
                                      • вот скажи, кого она послушает, тебя, шизофренника или меня, ее парня?)
                                        Ответить
                                        • А ты сначала покажи ей свои комментарии здесь. Посмотрит она на твою содомию, возьмет свой самый большой литровый шприц и вколет тебе 30 тройных смертельных доз.
                                          Ответить
                              • >на календаре 2010 год
                                В вашей забегаловке не было хотя бы локалки с автоапдейтом баз? Нод еще и пиратский небось?
                                Ответить
                                  • Если кого-то и привлекут за использование ломаного софта, то на суде он в любом случае сможет выкрутиться да еще и сыграть роль Трололо, задав один единственный вопрос:
                                    - А на чем Вы, батенька, приговор печатаете, м?

                                    100% из 100 что Ворд на компе у секретутки будет ломаный )
                                    Ответить
                                    • - А на чем Вы, батенька, приговор печатаете, м?
                                      - На бумаге.
                                      Ответить
                                  • Тем не менее, автоапдейт сделать можно? Скажи еще, у вас всеинститутской локалки нет или она еще на коаксиале.
                                    Ответить
                              • Это уже 6 лет, как не играет роли, мой йуный друк.

                                как последный баран купил отпост лет 5 назад, поставил и тут же снес по причине херовости. коробка валяется под кроватью.
                                Ответить
          • За что плюс то поставили? ) Интересный у нас народ. Минусуют вкусные посты и плюсуют пустые.
            Ответить
            • > За что плюс то поставили?
              Иногда лучше жевать, чем говорить 🙂
              Ответить
              • Позвольте немного подправить:
                Иногда лучше сосать, чем говорить :)
                , о чем красноречиво говорит вот этот маэстро: http://govnokod.ru/13763#comment196175
                Гм, Борманд, Вы тоже плюсанули (
                если я вас всех так напрягаю, я лучше уйду. Это так?
                Ответить
                • > я лучше уйду
                  Говнокод. Только здесь тролли уходят сами.
                  Ответить
                  • <Только здесь тролли уходят сами.>
                    ...чтобы уступить место новым.

                    p/s/
                    Никогда не имел привычки троллить местных.
                    Ответить
        • ...Глотать или не глотать вот в чем вопрос.
           Я уже нашел ответ:
                                     ГЛОТАТЬ, ОДНОЗНАЧНО!
          Если ты крут в натуре, напиши мне, не ссы:
          tarasber@mail.ru
          сделай меня мужчиной.
          Ответить
  • В jscript нет функции а-ля MsgBox, а в vbscript - есть. Потому особо хитрые создают эктивикс компонет ScriptControl типа VBScript, которому скармливают через eval кусочек кода с функцией.
    Ответить
    • < jscript нет функции а-ля MsgBox>
      есть, и не одна:
      * Wscript.Echo('');
      * alert('');
      Вот только не могу понять, при чем тут msgbox :/
      Ответить
  • Не знаю какая разница между "VB" и "VBS"
    Ответить
    • А я - между "Java" и "JavaScript". Я так догадываюсь, различие в том, что первый является адаптацией второго для серверов; но тогда непонятно, зачем ещё "NodeJS" создали...
      Ответить
  • > Этого способа нет на MSDN, я его сам отрыл
    Какой скилл )))
    Ответить

Добавить комментарий

Из-за тебя ушел bormand, guest!

    А не использовать ли нам bbcode?


    8