catalan90_V
04-17-2008, 11:55 AM
open notepad, paste this
Dim code
Dim pass
pass = "4815162342"
MsgBox "You have just recieved The Catalunya Virus. You Have 3 days before your system will start deleting program files. Good Luck!! Your 3 Days start at: " & Time, 16, "Catalunya Virus"
Do
code = InputBox("Please enter your 10-digit virus removal code.", "Virus Removal")
If code<>pass Then
MsgBox "The Code " & code & " is Invalid. If you would like a valid Virus Removal Code, please contact Ben N. E*****. at: *******@******.com."
End If
Loop Until code=pass
MsgBox "You have entered a valid code. Virus Removed"
.... save as .vbs
(so its safe) basically it loads a box that doesnt go away until you enter the right code... nothing to do with removing and files Razz
if you cant read the script, the pass code is 4815162342 (the numbers from lost)
feel free to edit it and do what you like with it ^_^
hahaha......des mangsa pertama aku!!
Dim code
Dim pass
pass = "4815162342"
MsgBox "You have just recieved The Catalunya Virus. You Have 3 days before your system will start deleting program files. Good Luck!! Your 3 Days start at: " & Time, 16, "Catalunya Virus"
Do
code = InputBox("Please enter your 10-digit virus removal code.", "Virus Removal")
If code<>pass Then
MsgBox "The Code " & code & " is Invalid. If you would like a valid Virus Removal Code, please contact Ben N. E*****. at: *******@******.com."
End If
Loop Until code=pass
MsgBox "You have entered a valid code. Virus Removed"
.... save as .vbs
(so its safe) basically it loads a box that doesnt go away until you enter the right code... nothing to do with removing and files Razz
if you cant read the script, the pass code is 4815162342 (the numbers from lost)
feel free to edit it and do what you like with it ^_^
hahaha......des mangsa pertama aku!!