最好的加密就是通過(guò)你的網(wǎng)站去加密!用網(wǎng)絡(luò)服務(wù)器驗(yàn)證把一些主要程序都可以加載到服務(wù)器上!這樣你的程序加密就完美了! (個(gè)人觀點(diǎn)純屬不懂裝懂的。哈哈見笑)
企業(yè)建站必須是能夠以充分展現(xiàn)企業(yè)形象為主要目的,是企業(yè)文化與產(chǎn)品對(duì)外擴(kuò)展宣傳的重要窗口,一個(gè)合格的網(wǎng)站不僅僅能為公司帶來(lái)巨大的互聯(lián)網(wǎng)上的收集和信息發(fā)布平臺(tái),成都創(chuàng)新互聯(lián)面向各種領(lǐng)域:成都柴油發(fā)電機(jī)等成都網(wǎng)站設(shè)計(jì)、全網(wǎng)整合營(yíng)銷推廣解決方案、網(wǎng)站設(shè)計(jì)等建站排名服務(wù)。
網(wǎng)上有很多專業(yè)的加密教程
最適合小開發(fā)者的軟件加密方式就是下面這個(gè)
獲取硬件信息和個(gè)人注冊(cè)時(shí)的姓名手機(jī)號(hào)等一系列信息,通過(guò)預(yù)先設(shè)定好的加密函數(shù)進(jìn)行散列加密,生成一個(gè)只有本人本機(jī)能使用的序列號(hào),軟件正版授權(quán)的時(shí)候用同樣的方式生成序列號(hào)進(jìn)行比對(duì),一樣則通過(guò)
Private Function myEncrypt(ByVal Code As String) As String
Dim Result As String = ""
Dim CurrentChar As Char
For i As Integer = 0 To Code.Length - 1
CurrentChar = Code.Substring(i, 1)
Select Case Code.Substring(i, 1)
Case "Z"
Result = "a"
Case "z"
Result = "A"
Case Else
Result = Chr(Asc(CurrentChar) + 1)
End Select
Next
Return Result
End Function
'vb.net 2005 調(diào)試通過(guò)
papernews說(shuō)得的控件不錯(cuò),但要銀子。免費(fèi)的不能打開加密的PDF
可能比較難,建議用鍵盤發(fā)送的方式