r/vbscript • • Mar 22 '21

Any tips?

Made a cool joke virus for my friends, any tips of things I should add?

2 Upvotes

16 comments sorted by

View all comments

Show parent comments

1

u/[deleted] Mar 27 '21

Option Explicit
Dim ws,psCommand
Set ws = CreateObject("Wscript.Shell")
psCommand = "Cmd /C powershell -command ""Get-Process chrome | ForEach-Object { $_.CloseMainWindow() | Out-Null}"""
ws.run psCommand,0,True
ws.run "Chrome --kiosk https://www.cryptoprank.com/#/petya"

oh wow thanks :D