如何在做成的软件只能在一个电脑上用，换了别的电脑就用不了了？

Question

如何在做成的软件只能在一个电脑上用，换了别的电脑就用不了了？现在想想好象只有获取计算机本身一些信息然后比较的办法。有哪个大侠知道的？请指教！感激ING

Answer 1

针对主板，CPU号码什么的进行加密，生成唯一的号码

Answer 2

记住硬盘，主板，CPU的ID软件运行时对这些信息进行核对。

Answer 3

获得硬盘序列号，生成序列号，每次启动时验证一下Public Function getdiskid() As String
    Dim aa As Long
    Dim VolName As String
    Dim fsysName As String
    Dim path As String
    Dim VolSeri As Long, compress As Long
    Dim Sysflag As Long, Maxlen As Long
    VolName = String(255, 0)
    fsysName = String(255, 0)
    aa = GetVolumeInformation(path, VolName, 256, VolSeri, Maxlen, Sysflag, fsysName, 256)
    getdiskid = Hex(VolSeri)
End Function

Answer 4

http://www.china-askpro.com/msg9/qa94.shtml

Answer 5

http://www.china-askpro.com/msg13/qa66.shtml
http://www.china-askpro.com/msg21/qa45.shtml