Lompat ke konten Lompat ke sidebar Lompat ke footer

Cara Update Status Facebook dengan Visual Basic .Net

Cara Update Status Facebook dengan Visual Basic .Net - Hallo sahabat Breaking News, Pada Artikel yang anda baca kali ini dengan judul Cara Update Status Facebook dengan Visual Basic .Net, kami telah mempersiapkan artikel ini dengan baik untuk anda baca dan ambil informasi didalamnya. mudah-mudahan isi postingan Artikel visual basic, yang kami tulis ini dapat anda pahami. baiklah, selamat membaca.

Judul : Cara Update Status Facebook dengan Visual Basic .Net
link : Cara Update Status Facebook dengan Visual Basic .Net

Baca juga


Cara Update Status Facebook dengan Visual Basic .Net

Dalam menjalanka bisnis nya, untuk otomatisasi sering kali para pebisnis online melakukan update status dengan bantuan software BOT.

Saya akan menjelaskan bagaimana melakukan update status dengan menggunakan software bot.
Langsugn saja buat sebuah project dengan komponen
1 richtextbox
1 button
1 webrowser

lihat gambar di bawah ini:


berikut adalah kode langkap nya:

Public Class Form1

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        WebBrowser1.Navigate("m.facebook.com")
    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        '--- <textarea class="cd ce cf cg ch" name="xc_message" id="u_0_0" rows="2"></textarea>
        '--- isi text area
        Dim oTextColl As HtmlElementCollection = WebBrowser1.Document.GetElementsByTagName("textarea")
        For Each obj As HtmlElement In oTextColl
            If obj.GetAttribute("name") = "xc_message" Then
                obj.SetAttribute("value", RichTextBox1.Text)
                Exit For
            End If
        Next

        '--- kirim status
        '--- <input value="Kirim" type="submit" name="view_post" class="x y ba" />
        Dim oInputColl As HtmlElementCollection = WebBrowser1.Document.GetElementsByTagName("input")
        For Each obj As HtmlElement In oInputColl
            If obj.GetAttribute("name") = "view_post" Then
                obj.InvokeMember("click")
                Exit For
            End If
        Next

    End Sub
End Class


Jika dijalankan maka akan terlihat seperti gambar di bawah ini:


OK vroh selamat mencoba!

Untuk refrensi lengkap pembuatan software bot dengan vb .net ANDA bisa baca buku saya yang berjudul "Trik Membuat Software BOT dengan Visual Basic .NET"
.
ANDA bisa membeli di toko buku GRAMEDIA terdekat di kota ANDA



Demikianlah Artikel Cara Update Status Facebook dengan Visual Basic .Net

Sekianlah artikel Cara Update Status Facebook dengan Visual Basic .Net kali ini, mudah-mudahan bisa memberi manfaat untuk anda semua. baiklah, sampai jumpa di postingan artikel lainnya.

Anda sekarang membaca artikel Cara Update Status Facebook dengan Visual Basic .Net dengan alamat link https://gpbn1.blogspot.com/2016/06/cara-update-status-facebook-dengan.html

Posting Komentar untuk "Cara Update Status Facebook dengan Visual Basic .Net"