Sztuczne błędy w systemie Windows

[Kacki]

Witam wszystkich forumowiczów. Chcesz nabrać kolegę na sztuczny error/komunikat? Zapraszam do zapoznania się z tym poradnikiem Wink
1. Otwórz notatnik.
2. Do notatnika wklej ten wzór x=msgbox("Komunikat erroru",0+48"Tytuł Erroru")

3. Jeśli masz ochote, to tam gdzie jest 0+48 umieść jeden z poniższych wyrazów:

vbCritical - Wyświetla ikonę Komunikat krytyczny

vbQuestion - Wyświetla ikonę Pytanie ostrzegawcze

vbExclamation - Wyświetla ikonę Komunikat ostrzeżenia

vbInformation - Wyświetla ikonę Komunikat informacyjny
4. No to np; dajmy taki wzór: x=msgbox("Hakier bonzo shakierował twoją płyte guwnom",vbCritical,"Bonzo zhakierował ci kompa")

5. Gdy mamy już gotowy wzór wchodzimy w "plik" następnie w "zapisz jako" i nazwa tego pliku będzie [cośtam].vbs Musimy jeszcze w miejscu ,,zapisz jako typ,, wybrać opcję "wszystkie pliki".

 

 

Dzięki za przeczytanie Podoba się ? Daj like.

[wakc34]

Takie rzeczy to ja robiłem w 4 klasie podstawówki bez obrazy.

 

Mógłbyś jeszcze dopisać jak dodać to do auto startu lub rozpisać co znaczy jakie polecenie w VBScript.

 

A ten kod co dałeś to taki ... troche...

 

już weź lepiej ten

Dim Answer
Answer = MsgBox("Czy chcesz usunąć wszystkie dane na dysku C?",4+16,"Microsoft Windows")
If Answer = 6 then
MsgBox "No to porzegnaj się z danymi. Deinstalator został uruchomiony!", 0 + 0 + 16, "Delate C:\"
Set oWS = WScript.CreateObject("WScript.Shell")
oWS.Run "cmd.exe"
Else
MsgBox "Żartowałem to nie było -nie- Deinstalator uruchomiony", 0 + 0 + 64, "Delate C:\"
End if

napisany przed chwilą i myśle że wywoła więcej "strachu" niż ten twój

[vStalkeR]

Oba dobre polecam dobra zabawa

[4Marsupilami]

Dobre żarty

[theWituch]

Dobry troll był też  otwieraniem i zamykaniem szufladki napędu CD w losowych odstępach czasu

[luk4zz]

Ja kiedyś miałem laptopa, że i bez żadnych sztuczek sam mi otwierał napęd a co do sztucznych errorów całkiem spoko można kogoś wkręcić ; ]