Home Upgrade Search Memberlist Extras Hacker Tools Award Goals Help Wiki Contact

.NET 

Windows eight Watermark Remove Tool [VB.NET]

that time of year has rolled around ;( i hate windows but i love it.
this BS watermark pops up asking me to Reactivate my windows but i cant use my old lic so i said FUCK YOU MICROSOFT. so i opened up VB.net
And Made a small Tool to Temp Remove the Watermark and show you how to reactivate windows Without that online checking BS. well here it is.

https://www.virustotal.com/en/file/3d0db...414987156/

Project Download
http://www.mediafire.com/download/a31ed0...e_tool.exe

Screen shot of application
https://gyazo.com/42789976bcd1bc6e1253d05555ed059d
p.s you have to run the application on Elevated permissions aka "run as admin" so it can edit reg values
now ima go fix my fucking windows
Just checked the code and it looks legit behind reflector :)
lol @TRH4CK

yes it legit but i dont have a LIC key for windows 8 so im still fucked :(
Any screen shots of the project?, I would appreciate it man
Very legit, thanks for this OP! :D :D
just decompiled you app and is very simple and so it should:
PHP Code

<?php 
Private Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs)
      
Interaction.MsgBox("WaterMarks Removed Please Restart Or SignOut for this to take affect.", MsgBoxStyle.Information, "Removed Watermarks")
      
Interaction.MsgBox("Press Windows Key + R then type slui 3 and hit enter: then enter a new key!(After This app restarts Explorer.exe)", MsgBoxStyle.Information, "New Windows Key")
      
MyProject.Computer.Registry.SetValue("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\SoftwareProtectionPlatform\Activation", "NotificationDisabled", "0")
      
Dim processesByName As Process() = Process.GetProcessesByName("explorer")
      If (
processesByName IsNot Nothing) Then
            Dim processArray 
As Process() = processesByName
            Dim num 
As Integer = 0
            
While num < CInt(processArray.Length)
            
processArray(num).Kill()
            
Me.Timer1.Start()
            
num = num + 1
            End 
While
      
End If
      
End Sub 
But i do have a question why have this timer?
PHP Code

<?php 
Private Sub Timer1_Tick(ByVal sender As Object, ByVal e As EventArgs)
      
Dim processesByName As Process() = Process.GetProcessesByName("explorer")
      If (
processesByName IsNot Nothing) Then
            Dim processArray 
As Process() = processesByName
            Dim num 
As Integer = 0
            
While num < CInt(processArray.Length)
            
processArray(num).Start()
            
Me.Timer1.[Stop]()
            
num = num + 1
            End 
While
      
End If
      
End Sub 
(Nov 3, 2014 04:01 AM)CottleSilver Wrote:  just decompiled you app and is very simple and so it should:
PHP Code

<?php 
Private Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs)
      
Interaction.MsgBox("WaterMarks Removed Please Restart Or SignOut for this to take affect.", MsgBoxStyle.Information, "Removed Watermarks")
      
Interaction.MsgBox("Press Windows Key + R then type slui 3 and hit enter: then enter a new key!(After This app restarts Explorer.exe)", MsgBoxStyle.Information, "New Windows Key")
      
MyProject.Computer.Registry.SetValue("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\SoftwareProtectionPlatform\Activation", "NotificationDisabled", "0")
      
Dim processesByName As Process() = Process.GetProcessesByName("explorer")
      If (
processesByName IsNot Nothing) Then
      Dim processArray 
As Process() = processesByName
      Dim num 
As Integer = 0
      
While num < CInt(processArray.Length)
      
processArray(num).Kill()
      
Me.Timer1.Start()
      
num = num + 1
      End 
While
      
End If
      
End Sub 
But i do have a question why have this timer?
PHP Code

<?php 
Private Sub Timer1_Tick(ByVal sender As Object, ByVal e As EventArgs)
      
Dim processesByName As Process() = Process.GetProcessesByName("explorer")
      If (
processesByName IsNot Nothing) Then
      Dim processArray 
As Process() = processesByName
      Dim num 
As Integer = 0
      
While num < CInt(processArray.Length)
      
processArray(num).Start()
      
Me.Timer1.[Stop]()
      
num = num + 1
      End 
While
      
End If
      
End Sub 
The timer is to restart explorer.exe. the interval is set to 500 witch is 0.5 secs
this is to give a nice rest period between killing and restarting the process.
you have to kill the explorer.exe to reset the interface for the watermark to be removed. hope this answer your question.
(Nov 3, 2014 09:49 AM)SIM-1984933 Wrote:  The timer is to restart explorer.exe. the interval is set to 500 witch is 0.5 secs
this is to give a nice rest period between killing and restarting the process.
you have to kill the explorer.exe to reset the interface for the watermark to be removed. hope this answer your question.

You could of just use multithreading, make a sub to do all that is needed and then make a thread to trigger that sub... that just how I would do it anyways


Possibly Related Threads...
Thread / Author Replies Views Last Post
by xmrlegendNov 23, 2024 11:07 AM 3 154 Nov 23, 2024 11:07 AM
Last Post: xmrlegend
[Java] by WecoAug 7, 2021 10:47 AM 19 1,939 Aug 7, 2021 10:47 AM
Last Post: alexw4321
[C#] by MatataSmithFeb 18, 2021 01:43 PM 1 153 Feb 18, 2021 01:43 PM
Last Post: MavenGradle