Как добавить код для поиска серийного номера USB-накопителя, с которого работает мое приложение?
Я пытаюсь добавить уровень защиты к своему программному обеспечению, где я могу "жестко закодировать" каждую проданную программу с серийным номером или свободным пространством в байтах, доступным на флэш-накопителе, на котором я ее продаю.
Будучи просто программистом кружки, использующим Visual Basic 2010 Express, но знающим инженером, я продаю учебники с использованием приложений "MS Forms" студентам. Моя проблема заключается в том, что студенты делятся моими приложениями (копируют мои программы) со всем классом и снижают мои продажи.
Мне нужна помощь, чтобы написать полный проект, чтобы получить эту информацию.
Благодарю вас всех в предвкушении. :-)
Что я уже пробовал:
Public Class Form1 Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click Public Function GetDriveSerialNumber() As String Dim DriveSerial As Integer 'Create a FileSystemObject object Dim fso As Object = CreateObject("Scripting.FileSystemObject") Dim Drv As Object = fso.GetDrive(fso.GetDriveName(Application.StartupPath)) With Drv If .IsReady Then DriveSerial = .SerialNumber Else '"Drive Not Ready!" DriveSerial = -1 End If End With Return DriveSerial.ToString("X2") End Function End Class
Dave Kreskowiak
Что заставляет вас думать, что каждый USB-накопитель даже имеет серийный номер?
Chris.Crooks7
Я просто подумал, что у них у всех должен быть серийный номер. Если нет, то не могли бы вы рассказать мне, как, возможно, просто получить доступное место на USB - накопителе в качестве "длинного". То, что я ищу, - это приложение с одной формой, которое возвращает целочисленное значение доступного пространства в текстовое поле.
Спасибо за ваш комментарий :-)
Dave Kreskowiak
Зависит от привода. Дешевые диски обычно не имеют серийного номера. Самый дорогой из них, например, большой емкости, шифрующие диски, делают.
Что касается дискового пространства, то это просто ... > DriveInfo.Свойство TotalFreeSpace (System.IO)[^]