VB.net 中如何實現序列號注冊功能

思路是:

在金昌等地區，都構建了全面的區域性戰略布局，加強發展的系統性、市場前瞻性、產品創新能力，以專注、極致的服務理念，為客戶提供網站設計制作、做網站 網站設計制作按需制作網站,公司網站建設,企業網站建設,品牌網站制作,營銷型網站,成都外貿網站制作,金昌網站建設費用合理。

讀取電腦硬件的信息,用隨機數加工這些信息后在注冊表中做個記錄,用這個記錄生成注冊碼送回給你,你按特定的方法生成序列號,你的小程序收到序列號后還原成數據,數據比較注冊表中的記錄,如果正確就加入第二部分注冊的信息完成注冊.你的程序每次打開時,先比對硬件信息-第一注冊信息-第二注冊信息,看這三者是否統一,不統一的就是使用期軟件.

也可以省了第一注冊信息,直接發硬件信息給你生成序列號,其他的相同.

VS2010中怎么獲取cpu或者硬盤序列號。用vb.net。想編一個注冊碼的軟件

Private Function 硬盤序列號() As String

Try

Dim myInfo As Microsoft.Win32.RegistryKey = My.Computer.Registry.LocalMachine.OpenSubKey("HARDWARE\DEVICEMAP\Scsi\Scsi Port 0\Scsi Bus 1\Target Id 0\Logical Unit Id 0")

硬盤序列號 = Trim(myInfo.GetValue("SerialNumber"))

Catch

Try

Dim myInfo As Microsoft.Win32.RegistryKey = My.Computer.Registry.LocalMachine.OpenSubKey("HARDWARE\DEVICEMAP\Scsi\Scsi Port 1\Scsi Bus 1\Target Id 0\Logical Unit Id 0")

硬盤序列號 = Trim(myInfo.GetValue("SerialNumber"))

Catch

硬盤序列號 = ""

End Try

End Try

End Function

只在我的電腦上試過，你試下

vb.net 如何更安全的給自己寫的軟件加注冊碼限制分發

注冊碼很好做啊 利用現在成熟的加密解密技術 很不容易破解的 但現在的.net時代 問題的關鍵不在這里 而是在如何加密自己的軟件不讓反編譯 看看現在的.net軟件 就算使用了亂碼器 都好容易被反編譯出來 只要被反編譯 就會刪掉你程序的注冊功能部分 然后再重新編譯 就可以無需注冊正常使用了 根本就不用去破解你那深奧的注冊碼！

vb中注冊代碼怎么寫，要求要測試成功！

最簡單的一個是，在啟動窗體中，加入一行代碼：if inputbox("請輸入注冊碼","注冊",123") “123456” then end'這個是說，如果輸入的不是123456，就退出程序，正確后就向下執行。如果要注冊碼與用戶名相結合，則要先用用戶名作為種子，進行加密操作，生成一個注冊碼，成一一對應關系就行了。如用戶名為abc，代碼如下：dim a as string,b as string,i as integer,k as integera=inputbox("請輸入用戶名","注冊用戶")for i = 1 to len(a)b=b str(asc(mid(a,i,1)))next ib=6 bif b-int(len(b)/2)*2 = 1 then b = b 4text1 = "用戶名是：" aa=""for i = 1 to len(b) step 2if mid(b,i,2)32 then a=a str(mid(b,i,2)+32) else if mid(b,i,2) 126 then a=a str(mid(b,i,2)-32) else a=a str(mid(b,i,2)) end ifend if next itext1 = text1 " 注冊碼是： " a這樣就可以了