Hi there,
I have written a program in VB 6.0 and I want to sell it to a client. I do not wish that the client distributes my program to someone else. Can anyone guide me to code in a program that will recognise only that clients computer to whom I am selling it to?
Pls help.
5 1302
Hi there,
I have written a program in VB 6.0 and I want to sell it to a client. I do not wish that the client distributes my program to someone else. Can anyone guide me to code in a program that will recognise only that clients computer to whom I am selling it to?
Pls help.
Im new to vb.net but...
i dont know how to do it but how about detecting their windows seriel key.
you could...
detect the seriel key encrypt it and store in a txt file, then everytime the programme loads retrieves the seriel key, encrypt it again and run a compare statement to check if it matches that stored in the text file.
Thanks
thanks
Im new to vb.net but...
i dont know how to do it but how about detecting their windows seriel key.
you could...
detect the seriel key encrypt it and store in a txt file, then everytime the programme loads retrieves the seriel key, encrypt it again and run a compare statement to check if it matches that stored in the text file.
Thanks
thanks
Two persons also have same key or they can solve it by using the same copy of windows.
I think if we use the computer name it can solve the problem or computer configuartion or any thing else but not windows serial key.
OK
GOODLUCK
Two persons also have same key or they can solve it by using the same copy of windows.
If that's the case, then at least one of them is an illegal copy and you should not support it.
Try this code - Private Declare Function GetVolumeInformation Lib "Kernel32" Alias "GetVolumeInformationA" (ByVal lpRootPathName As String, ByVal lpVolumeNameBuffer As String, ByVal nVolumeNameSize As Long, lpVolumeSerialNumber As Long, lpMaximumComponentLength As Long, lpFileSystemFlags As Long, ByVal lpFileSystemNameBuffer As String, ByVal nFileSystemNameSize As Long) As Long
-
Private Sub Form_Load()
-
Dim Serial As Long, VName As String, FSName As String
-
VName = String$(255, Chr$(0))
-
FSName = String$(255, Chr$(0))
-
GetVolumeInformation "C:\", VName, 255, Serial, 0, 0, FSName, 255
-
VName = Left$(VName, InStr(1, VName, Chr$(0)) - 1)
-
FSName = Left$(FSName, InStr(1, FSName, Chr$(0)) - 1)
-
Serial = Replace(Trim(Str$(Serial)), "-", "")
-
MsgBox "Your Serial Number is " & Serial
-
x = InputBox("Enter Activation Code for the serial " & Serial)
-
''' Make other Application for you to make the activation code and put in it this small code
-
' Serial = the serial that the customer will give you
-
' Activation = Val(Serial) * 50 / 5454 + 1542
-
If x = Val(Serial) * 50 / 5454 + 1542 Then MsgBox "Activated" Else MsgBox "Invalid Activation Code"
-
End Sub
Thanks kZero. Shall try this out and see what I can do.
Try this code ...
Sign in to post your reply or Sign up for a free account.
Similar topics
by: andthen |
last post by:
I read the following in the Thread API:
When a Java Virtual Machine starts up, there is usually a single non-daemon
thread (which typically calls the method named main of some designated
class)....
|
by: Alistair |
last post by:
hello again oh knowledgable ones
Today I took the plunge (more like a hell-hole dive) and upgraded to windows
XP Pro..
and as I expected things are slightly different...
what I didn't...
|
by: tstephan |
last post by:
In the past we have used the classic nTier design with COM+, SQL Server
and MFC. We are currently working on a new project with an opportunity
to use .NET, ADO.NET, etc. One of the areas where I...
|
by: Mike MacSween |
last post by:
S**t for brains strikes again!
Why did I do that? When I met the clients and at some point they vaguely
asked whether eventually would it be possible to have some people who could
read the data...
|
by: Ken Galer |
last post by:
I am working on a small project that I started at home. It originally was
on the C: drive and was working properly. After bringing it to work I
placed it in a folder on the server with the other...
|
by: Nikhil Patel |
last post by:
Hi all,
My Asp.Net application gives System.UnauthorizedAccessViolation exception
when It tries to write a word document to a special folder I created for
storing word documents. It says ASPNET...
|
by: Jack |
last post by:
Hi,
I have copied a web based application to a new laptop having windows xp
professional. Now in one of the folders where the database is physically
located, I want to give IUSR_Computermachine...
|
by: davidkoree |
last post by:
I mean not about cookie.
Does it have something to do with operating system or browser plugin?
I appreciate any help.
|
by: chowdary |
last post by:
I am developing a PHP-mysql database. It is noted that when the
browser window is refreshed the data is inserted again in the
database. unfortunately there is no unique keys that I can use to...
|
by: CloudSolutions |
last post by:
Introduction:
For many beginners and individual users, requiring a credit card and email registration may pose a barrier when starting to use cloud servers. However, some cloud server providers now...
|
by: Faith0G |
last post by:
I am starting a new it consulting business and it's been a while since I setup a new website. Is wordpress still the best web based software for hosting a 5 page website? The webpages will be...
|
by: ryjfgjl |
last post by:
In our work, we often need to import Excel data into databases (such as MySQL, SQL Server, Oracle) for data analysis and processing. Usually, we use database tools like Navicat or the Excel import...
|
by: Charles Arthur |
last post by:
How do i turn on java script on a villaon, callus and itel keypad mobile phone
|
by: aa123db |
last post by:
Variable and constants
Use var or let for variables and const fror constants.
Var foo ='bar';
Let foo ='bar';const baz ='bar';
Functions
function $name$ ($parameters$) {
}
...
|
by: ryjfgjl |
last post by:
In our work, we often receive Excel tables with data in the same format. If we want to analyze these data, it can be difficult to analyze them because the data is spread across multiple Excel files...
|
by: emmanuelkatto |
last post by:
Hi All, I am Emmanuel katto from Uganda. I want to ask what challenges you've faced while migrating a website to cloud.
Please let me know.
Thanks!
Emmanuel
|
by: Sonnysonu |
last post by:
This is the data of csv file
1 2 3
1 2 3
1 2 3
1 2 3
2 3
2 3
3
the lengths should be different i have to store the data by column-wise with in the specific length.
suppose the i have to...
|
by: Hystou |
last post by:
There are some requirements for setting up RAID:
1. The motherboard and BIOS support RAID configuration.
2. The motherboard has 2 or more available SATA protocol SSD/HDD slots (including MSATA, M.2...
| |