-
-
请教:如下的VB代码如何写一个算法注册机,算出注册码?
-
发表于:
2005-7-27 01:20
4126
-
请教:如下的VB代码如何写一个算法注册机,算出注册码?
请教各位大哥:
如下的VB代码如何写一个算法注册机,算出注册码?
请多指教!!!
aa ----为要输入的注册码,
reg_temp2 ----用该结果和硬盘系列号比较,正确为输入的注册码对,否则注册码错误。
reg_rand1 = Mid(Trim(aa), 2, 1)
reg_temp1 = Trim(f_conversion(Trim(Mid(Trim(aa), 3, 100)), CStr(reg_rand1), "2"))
reg_rand2 = Mid(Trim(aa), 1, 1)
reg_temp2 = f_conversion(Trim(reg_temp1), CStr(reg_rand2), "2")
if hd_id<>reg_temp2
exit
else
'ok
endif
哈哈,谢谢各位已经知道这样做了
[培训]内核驱动高级班,冲击BAT一流互联网大厂工作,每周日13:00-18:00直播授课