Siteyle çalışan bir HWID sistemi yapmak istiyorum kaynak kodlarını verir misiniz;
kullanıcı textbox1'e "41925754882147352xxx" yazıp button1'e tıkladığında eğer örneğin memoryhackers.org/hwid.txt adresinde "41925754882147352xxx" yazıyor ise onu form2'ye yönlendirecek yazmıyor ise textbox1 backgroundcoloru red yapıcak ve msgbox çıkarıcak uyarı diye ben yaptım ama olmadı
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
WebBrowser1.Navigate("
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
If TextBox1.Text = WebBrowser1.DocumentText Then
MsgBox("HWID confirmed! You're redirecting to h4ck menu")
Form2.Show()
Else
MsgBox("HWID wrong. Please try again later.")
TextBox1.BackColor = Color.Red
End If
End Sub
End Class
000webhost ve infinityfree dışında bildiğiniz free hosting veren site var mı?
kullanıcı textbox1'e "41925754882147352xxx" yazıp button1'e tıkladığında eğer örneğin memoryhackers.org/hwid.txt adresinde "41925754882147352xxx" yazıyor ise onu form2'ye yönlendirecek yazmıyor ise textbox1 backgroundcoloru red yapıcak ve msgbox çıkarıcak uyarı diye ben yaptım ama olmadı
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
WebBrowser1.Navigate("
Bağlantıları görmek için lütfen
Giriş Yap
")End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
If TextBox1.Text = WebBrowser1.DocumentText Then
MsgBox("HWID confirmed! You're redirecting to h4ck menu")
Form2.Show()
Else
MsgBox("HWID wrong. Please try again later.")
TextBox1.BackColor = Color.Red
End If
End Sub
End Class
000webhost ve infinityfree dışında bildiğiniz free hosting veren site var mı?
Son düzenleme: