我需要一种激活码，请提供个方案
就是中 10位 16位的
大侠们一般怎么设计啊 ，请给个思路
[解决办法]
你要随机码？还是激活码？激活码不需要随机，只要你能某个编码与某台机器对应就可以了
[解决办法]
MD5(Guid.NewGuid().ToString(),16)
[解决办法]
Imports System.Security.Cryptography
Imports System.Text
Imports System.Management
Public Function MD5(ByVal input As String, ByVal coda As Integer) As String
Dim md5Hasher As New MD5CryptoServiceProvider
Dim data As Byte() = md5Hasher.ComputeHash(Encoding.Default.GetBytes(input))
Dim sBuilder As New StringBuilder
Dim i As Integer
If coda = 16 Then
For i = 4 To 11
sBuilder.Append(data(i).ToString("x2"))
Next i
Else
For i = 0 To 15
sBuilder.Append(data(i).ToString("x2"))
Next i
End If
Return sBuilder.ToString()
End Function
[解决办法]
我也不懂~我抄的`
