• Silahkan bergabung dengan chat kami di Telegram group kami di N3Forum - https://t.me/n3forum
  • Welcome to the Nyit-Nyit.Net - N3 forum! This is a forum where offline-online gamers, programmers and reverser community can share, learn, communicate and interact, offer services, sell and buy game mods, hacks, cracks and cheats related, including for iOS and Android.

    If you're a pro-gamer or a programmer or a reverser, we would like to invite you to Sign Up and Log In on our website. Make sure to read the rules and abide by it, to ensure a fair and enjoyable user experience for everyone.

N3 [Tutorial] Login Web N3 VB.net

rekhan

3 SD
Level 2
hai sobat N3...

kali ini saya akan memberi tutor bagaimana membuat login web menggunakan VB.net

langsung saja.

bikin

- 2 Label
- 2 TextBox
- 1 Button
- 1 WebBrowser

tampilan sebagai berikut :

Source Code :
Code:
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
WebBrowser1.Navigate("http://www.nyit-nyit.net/index.php?app=core&module=global&section=login")
WebBrowser1.ScriptErrorsSuppressed = True
End Sub

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim allelements As HtmlElementCollection = WebBrowser1.document.All
WebBrowser1.document.GetElementById("ips_username").SetAttribute("value", TextBox1.Text)
WebBrowser1.document.GetElementById("ips_password").SetAttribute("value", TextBox2.Text)

For Each webpageelement As HtmlElement In allelements
If webpageelement.GetAttribute("value") = "Masuk" Then
If webpageelement.GetAttribute("tabindex") = "3" Then
webpageelement.InvokeMember("click")
End If
End If
Next
End Sub
tampilan setelah di build sebelom login :

tampilan setelah di build sesudah login :

source ini bisa dikembangkan lagi untuk membuat aplikasi khusus member N3,jadi selain member tidak bisa menggunakan nya.

semoga bermanfaat.
 

BaliSiahaan

PAUD
Level 1
Jadi Source Code ini bisa Di gunakan untuk Login website lain...Slain N3 Secara Lebih aman... ?
Dengan Cara Mengganti link ..... ?

Apa Program ini Dapat Menghindari Dari Aksi Keylogger ?
 

Ri7N

2 SD
Level 2
Jadi Source Code ini bisa Di gunakan untuk Login website lain...Slain N3 Secara Lebih aman... ?
Dengan Cara Mengganti link ..... ?

Apa Program ini Dapat Menghindari Dari Aksi Keylogger ?
kalau keylogger udah merajalela di komputer anda pasti tetap gak aman
 

Hexa_Novuz

TK B
Level 1
Bisa jadi Alternatif Log-in dan Menarik Untuk di coba. Klo bisa agan kasih Tutor berupa Video.. mungkin ada yg belum paham. thx
 

Adiman

PAUD
Level 1
Saya ingin memasangnya di Proggram cheat khusus member N3 .. Bagaimana cara menggabungkanya ?? Dan misalkan Sudah Login otomatis Exit langsung buka Proggram cheatnya itu .. Mohon bantuanya ya :D
 

irvangen

2 SD
Level 2
Saya ingin memasangnya di Proggram cheat khusus member N3 .. Bagaimana cara menggabungkanya ?? Dan misalkan Sudah Login otomatis Exit langsung buka Proggram cheatnya itu .. Mohon bantuanya ya :D
tinggal bro gabungin saja SCnya or add new form. Untuk exit tambah commondbutton dan coding bro.
 

LeakN3

1 SD
Level 2
Saya ingin memasangnya di Proggram cheat khusus member N3 .. Bagaimana cara menggabungkanya ?? Dan misalkan Sudah Login otomatis Exit langsung buka Proggram cheatnya itu .. Mohon bantuanya ya :D
kira kira kayak gini kodingnya gan :dizzy:
tapi ane juga masih newbie di vb.net hehehe
kalau salah mohon maafnya

Public Class Form1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
WebBrowser1.Navigate("http://www.nyit-nyit.net/index.php?app=core&module=global&section=login")
WebBrowser1.ScriptErrorsSuppressed = True
End Sub

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim allelements As HtmlElementCollection = WebBrowser1.document.All
WebBrowser1.document.GetElementById("ips_username").SetAttribute("value", TextBox1.Text)
WebBrowser1.document.GetElementById("ips_password").SetAttribute("value", TextBox2.Text)

For Each webpageelement As HtmlElement In allelements
If webpageelement.GetAttribute("value") = "Masuk" Then
If webpageelement.GetAttribute("tabindex") = "3" Then
webpageelement.InvokeMember("click")

End If
End If
Next
Form2.Show() 'selanjutnya form2 muncul
End Sub
End Class
 

RavenGa

TK B
Level 1
mau nanya nih ! klo misal kan source code nya di pake buat ke injektor bisa gak ??

maksud : saya,saya mau injaktor cheat,tapi injektor nya mau saya bikin login , tapi login nya pake ID member N3 bisa gak bang ?


klo bisa saya mau test
 
Top