請問, 我撰寫了一個程式, 但要如何才能限定特定電腦才能執行這支程式?
例如: test.exe在A電腦可以使用, 但copy到B電腦就不能使用
原本我是想在CODE內寫死MAC, 但是若電腦沒有IP的話, MAC就全部變成0了, 故MAC的想法不可行.

後來我google了一下, 發現有人使用WMI去抓processer id, 
我只要把processer id 寫死在code裡面就可以了, 給大家參考看看
或是大家有其他更好的idea?
http://www.xtremevbtalk.com/archive/index.php/t-279269.html

寫一支小程式在登錄檔設一個變數並填上特定值，主程式執行時檢查這個變數，找到且內容正確，才能繼續執行，不然自動結束，這樣可以嗎？
有人把主程式 Copy 到其他電腦，就不能用啦。

You can use computer name or user login ID to check valid users.

------
Inung Huang

有心人士假如用softice or OllyDbg 這類的工具
在判斷的地方動個手腳,可能就失效了 ^^

取硬碟的序號如何?


[code delphi]

sHDDSN:=getHDDSerial('C:\');

function getHDDSerial(DiskStr:String):String;
var
VolumeSerialNumber : DWORD;
MaximumComponentLength : DWORD;
FileSystemFlags : DWORD;
SerialNumber : string;
begin
GetVolumeInformation(PChar(DiskStr),
nil,
0,
@VolumeSerialNumber,
MaximumComponentLength,
FileSystemFlags,
nil,
0);
SerialNumber := IntToHex(HiWord(VolumeSerialNumber), 4)
'-'
IntToHex(LoWord(VolumeSerialNumber), 4);
result:=SerialNumber;
end;
[/code]


===================引 用 junlin 文 章===================
請問, 我撰寫了一個程式, 但要如何才能限定特定電腦才能執行這支程式?
例如: test.exe在A電腦可以使用, 但copy到B電腦就不能使用
原本我是想在CODE內寫死MAC, 但是若電腦沒有IP的話, MAC就全部變成0了, 故MAC的想法不可行.

編輯記錄

 It is like user name ad password. If user know the method, user name and password, then user always can find workaround.
First, you can not let user know you use computer name.
You may use computer name and use hard driver serail number and a formula to create a string and save the value in the registry while user first time run the application and check regsiter for the value from after first run.

in this case, even user chnage computer name or hard drive then it still can run.
For example, computer name is MyComputer and hard drive serial number is 123ABC then you may have (M 3) *( y -3) - (C-3) /(o 4) mputer123ABC
and save the value in thr registry for first time running or during install and check registry from second time running.

I hope it helps,


Inung

------
Inung Huang