Results 1 to 4 of 4
  1. #1
    mroshdy is offline Novice
    Windows 7 64bit Access 2003
    Join Date
    May 2017
    Posts
    3

    Lightbulb How to bind Microsoft access program with specific machine


    I have an access program that I need to sell to others.
    Before giving the program to any body, I need to bind the version I will give to the client with his specific machine, in order to prevent his version from opening form any other machines.

    How to perform this security issue?

    Free security solutions are preferred, If not found then not free solutions.

  2. #2
    ranman256's Avatar
    ranman256 is online now VIP
    Windows Vista Access 2010 32bit
    Join Date
    Apr 2014
    Location
    Kentucky
    Posts
    9,521
    youd need the PC ID given in advance. Encode it to read it at startup.
    Then compile the frontend into an accde so users can bypass the code.

    This may work to get the ID:
    Code:
    sub CheckID()
    if CpuID <> "abcde" then 
      msgbox "Invalid PC"
      docmd.quit
    end if
    end sub
    
    Public Function CpuId() As String
    Dim computer As String
    Dim wmi As Variant
    Dim processors As Variant
    Dim cpu As Variant
    Dim cpu_ids As String
    
        computer = "."
        Set wmi = GetObject("winmgmts:" & _
            "{impersonationLevel=impersonate}!\\" & _
            computer & "\root\cimv2")
        Set processors = wmi.ExecQuery("Select * from Win32_Processor")
    
        For Each cpu In processors
            cpu_ids = cpu_ids & ", " & cpu.ProcessorId
        Next cpu
        If Len(cpu_ids) > 0 Then cpu_ids = Mid$(cpu_ids, 3)
    
        CpuId = cpu_ids
    End Function

  3. #3
    deepakg27 is offline Competent Performer
    Windows 10 Access 2013 64bit
    Join Date
    Nov 2017
    Posts
    160
    Thanks, could be useful.

    Regards
    Deepak Gupta

  4. #4
    isladogs's Avatar
    isladogs is offline MVP / VIP
    Windows 10 Access 2010 32bit
    Join Date
    Jan 2014
    Location
    Somerset, UK
    Posts
    5,954
    Creating an unique activation code for each PC is part of my security challenge thread at https://www.access-programmers.co.uk...d.php?t=300905

    It includes the CPU ID but also several other items unique to that PC
    Because this is written as a challenge, I can't give you the code. You will need to do the challenge to get the code
    Colin, Access MVP, Website, email
    The more I learn, the more I know I don't know. When I don't know, I keep quiet!
    If I don't know that I don't know, I don't know whether to answer

Please reply to this thread with any new information or opinions.

Similar Threads

  1. Replies: 1
    Last Post: 12-21-2015, 12:43 PM
  2. Replies: 13
    Last Post: 10-06-2015, 09:12 AM
  3. Replies: 1
    Last Post: 11-15-2014, 12:41 PM
  4. Replies: 7
    Last Post: 09-10-2014, 06:56 PM
  5. Replies: 4
    Last Post: 08-19-2014, 12:20 PM

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  
Other Forums: Microsoft Office Forums