Question

使用Inno Setup，setup.exe已经给了客户，根据合同他只允许使用2016年和2017年。但是在01-01-2018他不应该继续使用相同的2017年序列号。

如何使innosetup的setup.exe限制为来自和迄今为止？

[Setup]
#define SerialNumber "2017"
UserInfoPage=yes

[Code]
function CheckSerial(Serial: String): Boolean;
begin
  Result := Serial = '{#SerialNumber}';
end;

执行setup.exe
已插入许可证密钥
提交后，我想查看网址https://www.stackoverflow.com/query/license?id=2017
如果结果正常或根据安装继续

Answer 1

从以下代码开始：Inno Setup - HTTP request - Get www/web content，您将得到类似的内容：

[Setup]
UserInfoPage=yes 

[Code]

{ Presence of the CheckSerial event function displays the serial number box. }
{ But here we accept any non-empty serial. }
{ We will validate it only in the NextButtonClick, }
{ as the online validation can take long. }
function CheckSerial(Serial: String): Boolean;
begin
  Result := (Serial <> '');
end;

function NextButtonClick(CurPageID: Integer): Boolean;
var
  WinHttpReq: Variant;
  Url: string;
begin
  Result := True;
  if CurPageID = wpUserInfo then
  begin
    WinHttpReq := CreateOleObject('WinHttp.WinHttpRequest.5.1');
    Url := 'https://www.example.com/serial.php?serial=' +
           WizardForm.UserInfoSerialEdit.Text;
    WinHttpReq.Open('GET', Url, False);
    WinHttpReq.Send('');
    { Depending on implementation of the server, use wither HTTP status code (.Status) or }
    { contents of returned "page" (.ResponseText) }
    { Here we use the HTTP status code: }
    { 200 = serial is valid, anything else = serial is invalid, }
    { and when invalid, we display .ResponseText }
    Result := (WinHttpReq.Status = 200);
    if not Result then
      MsgBox(WinHttpReq.ResponseText, mbError, MB_OK);
  end;
end;

一个简单的服务器端验证PHP脚本（serial.php）就像：

<?

if (empty($_REQUEST["serial"]) || ($_REQUEST["serial"] != "2017"))
{
    header("HTTP/1.0 401 The serial number is not valid");
    // error message to be displayed in installer
    echo "The serial number is not valid";
}

考虑：

此验证不难绕过，即使用代理服务器。
它也不会阻止用户从安装程序中提取文件并手动安装它们。
只有在验证序列号后才可以考虑在线下载实际文件。
或下载应用程序运行所需的许可证文件。无论如何，如果您希望强制执行应用程序以在许可证到期后停止工作，则需要这样做。

对于类似的问题，另见
How to store serial numbers in a Sharepoint List, for to call from Inno Setup and verify if is autorized user?

Inno设置 - 如何在线验证序列号

1 个答案: