Hallo Community!
Habe ein kleines Problem mit meinen HWID Login.
Also kann mir meine HWID anzeigen lassen.
Wenn ich jetzt eine .txt-Datei auf z.B. dropbox hochlade mit NUR MEINER HWID funktioniert es.
Wenn ich aber jetzt 2 HWIDs in der .txt-Datei habe funktioniert es plötzlich nicht mehr, was ich aber nicht verstehe.
Code:
Habe ein kleines Problem mit meinen HWID Login.
Also kann mir meine HWID anzeigen lassen.
Wenn ich jetzt eine .txt-Datei auf z.B. dropbox hochlade mit NUR MEINER HWID funktioniert es.
Wenn ich aber jetzt 2 HWIDs in der .txt-Datei habe funktioniert es plötzlich nicht mehr, was ich aber nicht verstehe.
Code:
VB.NET-Quellcode
- Imports System.Management
- Public Class Form1
- Dim CPUInfo As String = String.Empty
- Dim MC As New ManagementClass("win32_processor")
- Dim MOC As ManagementObjectCollection = MC.GetInstances()
- Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
- End Sub
- Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
- For Each MO As ManagementObject In MOC
- If CPUInfo = "" Then
- CPUInfo = MO.Properties("processorID").Value.ToString()
- TextBox1.Text = CPUInfo
- End If
- Next
- End Sub
- Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
- Dim WC As New System.Net.WebClient
- Dim http3 As String = WC.DownloadString("https://www.dropbox.com/s/iz8p0z4zf9idb8a/HWID.txt")
- If http3.Contains(CPUInfo) Then
- Form2.Show()
- Else
- TextBox1.Text = "Error"
- End If
- End Sub
- End Class