Kuliah 2: Cara menggunakan browser web VB untuk mengirimkan halaman web yang berisi nama pengguna dan kata sandi
Terakhir kali kita mengetahui cara membuka halaman web, hari ini kita akan melihat cara mengambil langkah pertama untuk menghasilkan uang.
Di sini kita mulai mengambil langkah-langkah:
1. Pertama buka VB dan buat proyek baru.
2. Klik kanan pada toolbar dan pilih Components (Saya menggunakan VB versi China) atau pilih menu Project dan klik Components
3. Temukan Microsoft Internet Controls, pilih di depan, lalu konfirmasikan. Anda akan melihat ikon mirip bumi tambahan di toolbar.
4. Tambahkan WebBrowser1 ke Form1, lalu tambahkan command1 ke Form1.
5. Tambahkan kode berikut ke Form1: (Semua yang di atas telah disebutkan dalam kuliah kita sebelumnya, jadi Anda harus sudah familiar dengannya)
'----------awal-----------
Sub Perintah Pribadi1_Klik()
Redupkan vDoc, vTag
Redupkan saya Sebagai Integer
Setel vDoc = WebBrowser1.Dokumen
Untuk i = 0 Ke vDoc.All.length - 1 'Deteksi semua tag
Jika UCase(vDoc.All(i).tagName) = "INPUT" Kemudian 'Temukan tag input
Setel vTag = vDoc.Semua(i)
Jika vTag.Type = "text" Atau vTag.Type = "password" Lalu 'Lihat apakah itu yang kita butuhkan
Pilih Case vTag.Name 'Sesuai dengan nama tag, operasi tanda centang
Kasus "EMAILADD"
vTag.Value = "[email protected]" 'Tulis email Anda di sini
Kasus "PASSWD"
vTag.Value = "kata sandi" 'Tulis kata sandi Anda di sini
Pilihan Akhir
ElseIf vTag.Type = "kirim" Dan vTag.Name = "SUB" Dan vTag.Value = "Berlangganan" Lalu
'Temukan tombol kirim
vTag.Pilih 'Anda juga dapat melakukannya tanpa ini
vTag.Klik 'Klik untuk mengirimkan, semuanya OK
Akhiri Jika
Akhiri Jika
berikutnya saya
Akhiri Sub
Sub Formulir_Load() Pribadi
WebBrowser1.Navigasi "http://dhunter.51.net"
Akhiri Sub
'----------Menyelesaikan-----------
6. Tentu saja ini adalah tes, klik tombol run, kita dapat melihat bahwa webbrowser kita telah membuka http://dhunter.51.net, tunggu hingga pengunduhan dasar halaman web selesai, lalu klik tombol command1. Browser web kami yang cantik akan memasukkan apa yang baru saja kami masukkan. Email dan kata sandi Anda telah dikirimkan ke halaman web. Itu tandanya kemenangan.
Baiklah, mari kita tulis sebanyak ini untuk saat ini. Lain kali kita akan melihat cara menggunakan webbrowser untuk menemukan hyperlink di halaman web, yang sesuai dengan link penghasil uang.
Lampiran (informasi terkait):
Seperti yang Anda lihat, kali ini kami menggunakan milis berlangganan di http://dhunter.51.net. Berikut adalah kode sumber halaman web ini:
<form method="post" action="http://ml.xilu.com/cgi-bin/ml/client">
<p align="center"><ukuran font="2">
<input type="hidden" name="USERID" value="dhunter">
E-mail:
<input type="text" name="EMAILADD" value="email Anda">
<br>
kata sandi:
<input type="kata sandi" nama="PASSWD" value="******">
<br>
</font><ukuran font="2">
<input type="kirim" value="Berlangganan" nama="SUB">
<input type="kirim" value="Berhenti berlangganan" name="UNSUB">
</font></p>
</bentuk>
Tag dengan masukan di dalamnya semuanya menerima masukan. Tugas utama kita di sini adalah menemukannya dan mengoperasikannya.