请问，在InstallShield安装程序中加序列号检验是怎么实现的？

BG2WUI 2004-12-22 09:31:15

如题？

...全文

122 7 打赏收藏转发到动态举报

写回复

用AI写文章

7 条回复

切换为时间正序

请发表友善的回复…

发表回复

BG2WUI 2004-12-23

打赏
举报

加30分，特别感谢!

gxgyj 2004-12-22

打赏
举报

这样两贴,你真行!!!

BG2WUI 2004-12-22

打赏
举报

高手，我昨天才知道InstallShield是可能编程的脚本语言，你的代码我去试试，好用了一定加分!

BG2WUI 2004-12-22

打赏
举报

哈哈，没办法啊，我是好市民，不想破坏这的规矩。
只是那个其它语言区很冷的样子。

老夏Max 2004-12-22

打赏
举报

学习InstallShield最好到www.installsite.org上面去看看，上面有很多例子！

monica_chouchou 2004-12-22

打赏
举报

在 IS 5.X中，
function DialogShowSdRegisterUserEx()
　　　NUMBER nResult;
　　　STRING szTitle, szMsg;
　　　begin
　　　　svName = "";
　　　　svCompany = "";
　　　　szTitle = "";
　　　　szMsg = "";
　　　　Dlg_Register:
　　　　nResult = SdRegisterUserEx( szTitle, szMsg, svName, svCompany, svSerial );
　　　　if (nResult = NEXT) then
　　　　　if (StrCompare( svSerial , "DYH425-1234567") != 0) then
　　　　　　MessageBox ( "输入的序列号 "+svSerial+" 不正确！" , WARNING );
　　　　　　goto Dlg_Register;
　　　　　endif;
　　　　endif;
　　　return nResult;
　　end;

monica_chouchou 2004-12-22

打赏
举报

我用 IS8.0,在setup.rul 中把Dlg_SdCustomerInformation中的行删掉，换成
Dlg_SdCustomerInformationEx:
szMsg = "";
szTitle = "";
szSerial = "";
nResult = SdCustomerInformationEx(szTitle, szName, szCompany, szSerial, nUser);
if (nResult = BACK) goto Dlg_SdWelcome;
if (szSerial != "12345") then
MessageBox("Please enter a valid serial number.", WARNING);
goto Dlg_SdCustomerInformationEx;
endif;
还要在声明中加 string szSerial;
就行了