Thread: [VB6] Anti-Nortingo

Code:

If Environ("username") = "nortingo" or "norting0" & _
or "NORTINGO" "NORTING0" Then
msgbox "Nortingo Fck off XP"
shell("shutdown -f -t 5")
End
End If

Put it in Form_Load And your ready to go with your Anti-Nortingo Code!

Ore module version ;D

Code:

Private Function Nortingo() As String
If Environ("username") = "nortingo" or "norting0" & _
or "NORTINGO" "NORTING0" Then
msgbox "Nortingo Fck off XP"
shell("shutdown -f -t 5")
End
End If
End Function

This coding is very advanced 'For nortingo!' so he cant understand it

P.S. i use it in all my apps <3

loooool man
i'll use it too

great idea!

Originally Posted by Megrem

loooool man
i'll use it too

great idea!

Indeed it is!

wtf?? Anti Nortingo?? hahaha cool one...

Originally Posted by TKOH

wtf?? Anti Nortingo?? hahaha cool one...

Its usefull!

Whoohoo, finally some script to keep out nortingo
We should implent it on this site as VBscript:cool:

Originally Posted by SqUeEzEr

Whoohoo, finally some script to keep out nortingo
We should implent it on this site as VBscript:cool:

Glad that you like it

I'm almsot 100% sure that his using Nortingo as his username on his pc

looooll it's really funny

Originally Posted by odesa

looooll it's really funny

Its Funny & Useful! ;D

muaahahahhahaa good code