SoftBan
Posted: Wed Sep 15, 2010 7:22 pm
I came on to this idea today, and as I was bored write it soon after.
Did you ever make an application important enough to block users from it if they abuse it?
Well, you can now! with SoftBan.
This is a very easy DLL to use and since I'm still developing it, it will be free for a while! wahooo;
Here's an example of how to use it;
It will return either BANNED or NOT_BANNED as you can see in the example, on that value you can act and display messageboxes, terminate the application, limit access, etc.
Enjoy
Did you ever make an application important enough to block users from it if they abuse it?
Well, you can now! with SoftBan.
This is a very easy DLL to use and since I'm still developing it, it will be free for a while! wahooo;
Here's an example of how to use it;
Code: Select all
To get the USERS banned guid the first time(To e-mail to yourself to add it to the html file) use this;Imports SoftBan_Project
Public Class TestProject
Private Sub TestProject_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim CheckUserBan As New SoftBan
If CheckUserBan.BanCheck("http://test.com/banned_users.html") = "BANNED" Then
MsgBox("Your Banned from this application!")
Application.Exit
ElseIf CheckUserBan.BanCheck("http://test.com/banned_users.html") = "NOT_BANNED" Then
MsgBox("Your not Banned from this application!")
End Sub
End Class
Code: Select all
The library automatically gets the GUID, checks it against your HTML file and returns a value on which you can act.Dim userguid As String = My.Computer.Registry.GetValue("HKEY_LOCAL_MACHINE\Software\Microsoft\Cryptography", "MachineGuid", Nothing)It will return either BANNED or NOT_BANNED as you can see in the example, on that value you can act and display messageboxes, terminate the application, limit access, etc.
Enjoy
