如何为免费软件添加注册功能

   软件开发者写免费软件根本无利可图，咱们必须对免费软件进行限制保护功能，咱们能够写一款电子注册版软件，能够对软件进行推广和传播做用，同时也很好地保护了制做人的切身利益。那么，咱们如何制做一个电子注册版软件呢？ 

    使用平台，net平台，开发环境：

使用编程语言，visual basic

磨刀不误砍柴工：

利用API中的“GetVolumeInformation”函数提取使用者机器的硬盘序列号为特征码，注册时提交此码，通过软件著做权人加以运算，给出注册码，最后软件使用人输入注册码完成整个注册过程（为使说明简单，本例中以特征码减101作为注册码）。 
　　新建一模块文件 
　　新建一模块文件，并将以下声明的语句和常量添加到Module1.Bas模块中： 
code：

编程时需注意的是要将声明语句写在同一行中。 
　　窗体设置 
　　在Form1上添加2个文本框，Name属性分别设置为Text一、Text2；再添加1个按钮，Name属性设置为Command1。 
　　添加code
　　将以下程序代码添加到Form1的Form1_Load事件中： 

Private Sub Form_Load()  　Dim TempStr1 As String * 256  　Dim TempStr2 As String * 256  　Dim TempLon1 As Long  　Dim TempLon2 As Long  　………  ‘读取是否注册的信息，如何控制这里再也不说明  　………  　Call GetVolumeInformation("C:\", TempStr1, 256, GetVal, TempLon1, TempLon2, TempStr2, 256)  　Text1.Text = GetVal ‘提取本机C盘的序列号至文本框一  End Sub

　 　将以下程序代码添加到Command1的Command1_Click事件中： 
　

Private Sub Command1_Click()  　If Text2 〈〉 CStr(GetVal) Then  　　MsgBox "注册码不正确，请认真检查输入是否正确。"  　Else  　　MsgBox "你已经成功注册，请从新启动本软件。"  　　………  　（将正确注册的信息写入，使软件功能之后不受限制。具体方法依我的爱好进行设置。）  　　………  　End If  End Sub

　　最后，咱们能够运行一下程序。你会发现咱们已经简单地实现了利用硬盘序列号制做电子注册版软件的功能。

   固然，你还能够对软件添加javascript弹出广告，获取利润。

adiOS