ANTICHAT.XYZ    VIDEO.ANTICHAT.XYZ    НОВЫЕ СООБЩЕНИЯ    ФОРУМ  
Баннер 1   Баннер 2

ANTICHAT — форум по информационной безопасности, OSINT и технологиям

ANTICHAT — русскоязычное сообщество по безопасности, OSINT и программированию. Форум ранее работал на доменах antichat.ru, antichat.com и antichat.club, и теперь снова доступен на новом адресе — forum.antichat.xyz.
Форум восстановлен и продолжает развитие: доступны архивные темы, добавляются новые обсуждения и материалы.
⚠️ Старые аккаунты восстановить невозможно — необходимо зарегистрироваться заново.
Вернуться   Форум АНТИЧАТ > Оффтоп > Болталка
   
 
 
Опции темы Поиск в этой теме Опции просмотра

блондинка папалась.
  #1  
Старый 10.03.2009, 00:17
br1tva
Познающий
Регистрация: 26.12.2007
Сообщений: 38
Провел на форуме:
1555641

Репутация: 8
По умолчанию блондинка папалась.

Народ подскажите что этот код сделал на машине:
On Error Resume Next
Set WSHShell = WScript.CreateObject("WScript.Shell")

WshShell = WScript.CreateObject("WScript.Shell")
WshShell.Run "notepad", 1
WshShell.AppActivate "ЮРААААААААААА АХАХАХАХАХАХАХ "
dim ms(25)
ms(0) = "M"
ms(1) = "a"
ms(2) = "k"
ms(3) = "c"
ms(4) = " "
ms(5) = "l"
ms(6) = "u"
ms(7) = "4"
ms(8) = "sh"
ms(9) = "i"
ms(10) = "j"
ms(11) = " "
ms(12) = "4"
ms(13) = "e"
ms(14) = "v"
ms(15) = "e"
ms(16) = "r"
ms(17) = "!!"
ms(18) = Chr(13)
ms(19) = "~"

WScript.Sleep 1000
dy=0
do while(1)
dy=dy+1
For Each Item in ms
WScript.Sleep 25
WshShell.SendKeys Item
next
loop

Что нибудь куда нибудь прописалось???
 
Ответить с цитированием
 



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Про блондинку -) FordMX Болталка 13 11.02.2007 15:06
Кто умнее: ты или блондинка? Puff Болталка 4 19.11.2005 00:23



Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
 


Быстрый переход




ANTICHAT.XYZ