Foxtable(狐表)用户栏目专家坐堂 → 1月13日更新,新增注册模块设计功能。


  共有36210人关注过本帖树形打印复制链接

主题:1月13日更新,新增注册模块设计功能。

帅哥哟,离线,有人找我吗?
狐狸爸爸
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47448 积分:251060 威望:0 精华:91 注册:2008/6/17 17:14:00
1月13日更新,新增注册模块设计功能。  发帖心情 Post By:2009/1/13 13:30:00 [显示全部帖子]

1月13日更新
1、新增注册系统设计功能
2、新提供一批和加密解密相关的函数,用于辅助设计注册系统。


设计自己的注册系统

如果你基于Foxtable设计了应用软件,而且希望能够发行并收取一定的注册费,那么就必须建立一套基于电脑硬件的软件注册系统。
设计这样的系统并不复杂,复杂的是如何获得电脑的硬件信息。

HardWareInfo类专门用于获得电脑的硬件信息,如何使用该类获得硬件信息,可以参考下面的代码:

If HardWareInfo.Ready = False '如果没有初始化
    HardWareInfo.Initialize '初始化HardWareInfo,提取硬件信息
End If

Output.Show(
"CPU信息")
With
HardWareInfo.CPU
    Output.Show(
"制造商:" & .Manufacturer)
    Output.Show(
"品名:" & .Name)
    Output.Show(
"型号:" & .Description)
    Output.Show(
"序列号:" & .ProcessorId)
End
With
Output.Show(Chr(
13) & Chr(10))
Output.Show(
"主板信息")
With
HardWareInfo.BaseBoard
    Output.Show(
"制造商:" & .Manufacturer)
    Output.Show(
"型号:" & .Product)
    Output.Show(
"序列号:" & .SerialNumber)
End
With
Output.Show(Chr(
13) & Chr(10))
Output.Show(
"硬盘信息")
With
HardWareInfo.Disk
    Output.Show(
"型号:" & .Model)
    Output.Show(
"序列号:" & .Signature)
End
With
Output.Show(Chr(
13) & Chr(10))
Output.Show(
"BIOS信息")
With
HardWareInfo.Bios
    Output.Show(
"厂商:" & .Manufacturer)
    Output.Show(
"序列号:" & .SerialNumber)
End
With

通常来说,不同的电脑,其CPU、主板、硬盘、Bios的序列号都是唯一的,我们可以据此生成软件的序列号和注册码。不过,也有特殊的情况,例如国内销售的电脑,大多数是没有办法获取CPU序列号的,其余的硬件也偶有不能获得序列号的情形,我们建议您在设计注册系统的时候,软件序列号应该包括上述四个硬件序列号信息,以防万一。

HardWareInfo需要初始化才可以提供硬件信息,通过其Ready属性可以判断HardWareInfo是否已经初始化了,通过Initialize方法进行话。初始化是需要时间的,所以在任何时候都应该先通过Ready属性判断一下,以避免重复初始化

根据硬件信息获得软件序列号后,可以利用字符加密解密函数生成和比对注册码,请参考:加密与解密

 


 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47448 积分:251060 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2009/1/13 20:06:00 [显示全部帖子]

以下是引用hnaysx在2009-1-13 18:47:00的发言:
呵呵,好象 也不关我事。
这个软件本身以应用为主,以数据管理为主,不是以开发为主 加这个功能有点鸡肋啊
[此贴子已经被作者于2009-1-13 18:47:43编辑过]


呵呵,需要这个鸡肋的人可不少。


 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47448 积分:251060 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2009/1/13 20:43:00 [显示全部帖子]

以下是引用wcs在2009-1-13 20:34:00的发言:

是不少啊!

有没有软件狗加密的方法?


Foxtable支持兼容.net规范的外部DLL,要求加密狗厂商提供即可。


 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47448 积分:251060 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2009/1/13 21:04:00 [显示全部帖子]

以下是引用fangling在2009-1-13 21:01:00的发言:

看势头,foxtable已是数据管理和开发功能齐头并进的了,老六的目标是要把这两类用户都抓过来,毕竟用foxtable搞开发比用VB进行开发要简单得多了!


呵呵,方兄一直看得比较透彻。


 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47448 积分:251060 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2009/1/13 21:42:00 [显示全部帖子]

以下是引用fangling在2009-1-13 21:20:00的发言:
最近一段时间一直很忙,没能用foxtable开发出一个完整的项目来,不过《中小医院网络管理信息系统》已纳入开发计划,我想foxtable灵活强大的开发功能一定能发挥出应有的效率来,唯一担心的是报表部分,在程序中使用Excel报表好像不太适合,全部用专业报表,恐怕开发效率要受影响且不直观,希望下一步还是搞一个可视化的报表设计器还是比较好的!


专业报表其实比较简单的,学一下,你可能会发现,效率比传统的报表还高。


 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47448 积分:251060 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2009/1/14 8:58:00 [显示全部帖子]

以下是引用hnaysx在2009-1-14 7:13:00的发言:

注册方式 不应该仅仅限制为硬件啊 ,可以提供更多的软件注册方式


你自己做的软件,你想怎么收费都行。
我只是提供获得硬件信息的方式而已。


 回到顶部