VISUAL STUDIO : Membuat Koneksi ke Database MySQL

Assalamuallaikum Wr,Wb . Bagaimana sobat networking ? Semoga sehat-sehat saja ya . Nah, kali ini saya akan memberikan ilmu tentang Membuat Koneksi ke Database pada Visual Studio.

MEMBUAT DATABASE

Dengan mengucap Bismillah , langkah awal kita akan membuat terlebih dahulu Database seperti gambar dibawah ini 

Pertama-tama nyalakan terlebih dahulu XAMPP Control Panel

Lalu buat database seperti dibawah ini

MENGHUBUNGKAN DENGAN DATABASE

Untuk dapat menghubungkan sebuah program dengan database, selain connection string yang ada pada baris suatu coding, juga dibutuhkan driver agar sebuah program dapat berkomunikasi dengan database, apalagi jika antara program dan database sudah berbeda platform pembuatnya. lalu bagaimana cara menghubungkannya ?

1. Download driver nya dengan mengklik disini
2. Install seperti biasa
3. Buat sebuah project baru dalam Visual Basic, dan buka My Project pada Solution Explorer, kemudian pilih Reference, pilih Add Reference, pilih MySQL.Data (double klik).

*Yang diberi tanda contoh yang sudah di tambahkan

MEMBUAT CLASS KONEKSI

1. Tambahkan class kedalam project dengan cara : Klik Menu Project.
2. Lalu pilih Add Class
3. Beri nama koneksi.vb lalu klik Add.
4. Setelah class berhasil ditambahkan, selanjutnya adalah memasukan perintah kode, berikut Source codenya

Jika sudah selesai coba running class Koneksi , jika berhasil akan muncul gambar dibawah ini 

MEMBUAT CLASS PENGOLAH DATA

1. Tambahkan class kedalam project dengan cara : Klik Menu Project.
2. Lalu pilih Add Class
3. Beri nama pengolahdata.vb lalu klik Add.
4. Setelah class berhasil ditambahkan, selanjutnya adalah memasukan perintah kode, berikut Source codenya

MENAMPILKAN DATABASE KE DATAGRIDVIEW

Design terlebih dahulu seperti dibawah ini 

Pertama import terlebih dahulu MySQL Data dan MySqlClient, dan panggil Class tampildata dan koneksi yang telah kita sebelumnya dengan cara membuat objek baru

Dim konn As New koneksi

Dim olahdata As New pengolahdata

Lalu setelah itu klik 2x pada Button-Button tersebut dan masukkan Source Code dibawah ini 

Button Tampil Barang

Button Query 1

Button Query 2

Button Query 3

Button Query 4

Button Query 5

Jika sudah jalankan Program tersebut dengan menekan F5

Dan inilah hasilnya seperti gambar dibawah ini

Hasil Tampil Data

Hasil Query 1

Hasil Query 2

Hasil Query 3

Hasil Query 4

Hasil Query 5

Bagaimana sobat networking ? Mudah bukan ? Jika gagal coba lagi , Karena usaha keras tidak akan mengkhianati dirimu . Hehe

Terimakasih telah membaca tulisan / artikel di atas tentang Membuat Koneksi ke Database MySQL. Semoga informasi tersebut bisa memberikan manfaat bagi sobat networking yang membaca dan jangan lupa bagikan ilmu ini kepada siapapun .

MikroTik : Cara Filter Koneksi Games Online PB Zepetto

Assalamuallaikum Wr,Wb . Bagaimana sobat networking ? Semoga sehat-sehat saja ya . Nah, kali ini saya akan memberikan ilmu tentang Cara Filter Koneksi Games Online PB Zepetto.

Sebelum ke tutorial saya akan menjelaskan terlebih dahulu apa itu Point Blank

POINT BLANK

Point Blank adalah sebuah permainan komputer ber-genre FPS yang dimainkan secara online. Permainan ini dikembangkan oleh Zepetto dari Korea Selatan dan dipublikasikan oleh Zepetto. Selain di Korea Selatan, permainan ini mempunyai server sendiri di beberapa negara seperti Thailand, Rusia, Indonesia, Brasil, Turki, Amerika Serikat, dan Peru. Di Indonesia, permainan ini sekarang telah dikelola oleh Zepetto.

Point Blank berkisah tentang perseteruan antara Free Rebels dan pemerintah yang dalam hal ini adalah Counter Terrorist Force (CT-Force).

Pada 30 Juni 2015 Point Blank kembali diluncurkan oleh pengembang Garena Indonesia dengan peluncuran ulang Point Blank oleh pengembang yang baru, Garena bertekad untuk meningkatkan kenyamanan bermain permainan,begitu juga dikarenakan Point Blank Garena Indonesia telah menggantikan menjadi Point Blank Evolution.

Pada tanggal 30 November 2018, Garena Indonesia mengumumkan peralihan operasi layanan oleh Zepetto, pada tanggal 1 Januari 2019, masa peluncuran Point Blank Zepetto Indonesia efektif beroperasi. Alasan peralihan kepengurusan merupakan hasil dari berakhirnya masa kontrak dari izin operasi Garena Indonesia atas Point Blank di Indonesia.

Oleh karenanya, game developer Zepetto mengalihkan operasional Point Blank Online Indonesia melalui unit perusahaannya di Indonesia yakni PT. Zepetto Interaktif Indonesia.

Mungkin segitu saja penjelasan dari saya , langsung saja ke tutorial

FILTER KONEKSI PADA MikroTik

Disini saya akan mencoba memfilter games online yang bernama PB Zepetto , Caranya dibawah ini

1. masuk ke IP - Firewall - Filter Rules
2. Buat Rules Baru dengan mengklik tanda (+)
3. Pada bagian General ,atur seperti berikut ini :

• Chain : Forward
• Src Address , bisa mengarah menuju client yang ingin di blok atau bedasarkan range ip address , karna saya menggunakan DHCP Port Lan / Wireless maka saya menggunakan range Src Address : 192.168.22.2 - 192.168.22.255 Tapi apabila ingin memblok hanya satu client saja bisa menggunakan ip address  : 192.168.22.2
• Protocol : 6 (tcp)
• In.Interface :  eth1(wan)
• Action : Drop

Untuk Protocol yang akan di block yaitu TCP
Dan untuk destination port /tujuan port nya
port TCP nya yaitu : 40000 - 40010 (port games PB Zepetto)

Atau bisa lebih jelasnya seperti gambar dibawah ini .

Dan ini Actionnya

Keterangan Perintah Di atas :

• Chain diisi dengan forward karena paket aplikasi itu melewati router,bukan paket yang masuk maupun paket yang keluar
• Src-address diisi dengan alamat ip network dari client yang akan kita blokir akses ke PB Zepetto
• Protocol diisi dengan TCP karena PB Zepetto menggunakan protocol TCP
• Dst-port diisi dengan port 40000 sampai 40010 karena PB Zepetto menggunakan port tesebut untuk aksesnya
• In-interface diisi dengan interface yang menuju client atau jaringan target disini menggunakan ether1 (wan)

Nah , jika sudah selesai mari kita coba jalankan games tersebut .

Bisa dilihat seperti gambar diatas ini bahwa server tidak merespon karena port games PB Zepetto sudah di filter agar tidak bisa di gunakan dan tidak akan terkoneksi ke internet . 

Bagaimana sobat networking ? Mudah bukan ? Jika gagal coba lagi , Karena usaha keras tidak akan mengkhianati dirimu . Hehe

Terimakasih telah membaca tulisan / artikel di atas tentang Cara Filter Koneksi Games Online PB Zepetto. Semoga informasi tersebut bisa memberikan manfaat bagi sobat networking yang membaca dan jangan lupa bagikan ilmu ini kepada siapapun .

VISUAL STUDIO : Membuat Program Pembelian Handphone

Assalamuallaikum Wr,Wb . Bagaimana sobat networking ? Semoga sehat-sehat saja ya . Nah, kali ini saya akan memberikan ilmu tentang Membuat Program Pembelian Handphone pada Visual Studio.

 MEMBUAT PROGRAM PEMBELIAN HANDPHONE

Langsung saja tanpa berlama-lama mari kita membuat Programnya ya , Mohon disimak baik-baik ya

1. Pertama buka terlebih dahulu Microsoft Visual Studio (saya menggunakan yang 2010)

2. Kemudian design seperti contoh gambar dibawah ini

ToolBox yang digunakan, diantaranya :

1. Button
2. CheckBox
3. ComboBox
4. RadioButton
5. TextBox
6. DateTimePicker
7. Label
8. GroupBox
9. NumericUpDown
10. MenuStrip
11. DataGridView
12. Panel

3. Tambah kan Item pada ComboBox Jenis Handphone seperti gambar dibawah ini

4. Tambahkan Kolom pada Data Grid View, data yang diinputkan akan dimasukan ke Grid View . Caranya klik Data Gried View - Properties - Collection . Lalu ikuti seperti gambar dibawah ini 

5. Selanjutnya, klik 2x pada form , lalu masukkan Script dibawah ini .

 Dim hargahp, hclear, hliquid, hspy, jmlbeli, tmbhn, total, diskon, acc As Double
    Dim metodepembayaran As String

6. Lalu klik 2x pada ComboBox , masukkan Script dibawah ini .

        If cbbarang.Text = "Iphone XS MAX 6/128" Then
            hargahp = 22499000
            txtharga.Text = hargahp.ToString
        ElseIf cbbarang.Text = "Redmi Note 7 4/64" Then
            hargahp = 2800000
            txtharga.Text = hargahp.ToString
        ElseIf cbbarang.Text = "Samsung Galaxy A70" Then
            hargahp = 5299000
            txtharga.Text = hargahp.ToString
        ElseIf cbbarang.Text = "Oppo F11 Pro" Then
            hargahp = 5799000
            txtharga.Text = hargahp.ToString
        End If

Dari Script diatas berarti jika cbbarang.Text (ComboBox Jenis Handphone) memilih "Iphone XS MAX 6/128" maka hargahp.Text (TextBox Harga) maka bernilai "22499000" yaitu pada variable hargahp .

7. Jika sudah maka kita lanjutkan ke Button Tambah , masukkan Script dibawah ini .

    If tgclear.Checked Then
            hclear = 25000
        Else
            hclear = 0
        End If
        If tgnano.Checked Then
            hliquid = 50000
        Else
            hliquid = 0
        End If
        If tgspy.Checked Then
            hspy = 80000
        Else
            hspy = 0
        End If

        If rbya.Checked Then
            tmbhn = 50000
        Else
            tmbhn = 0
        End If
        acc = tmbhn + hspy + hclear + hliquid
        htambahan.Text = "Rp. " + acc.ToString

Maksud dari Script diatas adalah jika kita memilih ComboBox Temperred Glass dan Radio Button Case maka akan dikenai tambahan Biaya Aksesoris

8. Selanjutnya klik 2x pada Button Cek Harga , dan masukkan Script dibawah ini .

        jmlbeli = txtjmlbeli.Text

        If cash.Checked Then
            metodepembayaran = "Kartu Kredit"
            diskon = 0.2
        ElseIf kredit.Checked Then
            metodepembayaran = "Cash"
            diskon = 0
        End If

        diskon = diskon * total
        totaldiskon.Text = diskon

        total = (hargahp + acc) * jmlbeli - diskon
        totalbayar.Text = total.ToString

 Selajutnya pada Radio Button jika pembelian menggunakan Credit Card mendapat diskon sebesar 20% selain itu tidak mendapatkan Diskon, Script bagian bawah totalbayar dihitung dari ( Handphone + Tambahan Aksesoris * Jumlah Pembelian - diskon ) .

9. Jika sudah selesai lalu klik 2x pada Button Cetak Bukti untuk memasukkan Data Pembeli ke Grid View , masukkan Script dibawah ini .

        Grid.Rows.Add(1)
        Grid.Rows(Grid.RowCount - 2).Cells(0).Value = txtnama.Text
        Grid.Rows(Grid.RowCount - 2).Cells(1).Value = txttelp.Text
        Grid.Rows(Grid.RowCount - 2).Cells(2).Value = txtjmlbeli.Text
        Grid.Rows(Grid.RowCount - 2).Cells(3).Value = cbbarang.Text
        Grid.Rows(Grid.RowCount - 2).Cells(4).Value = txtharga.Text
        Grid.Rows(Grid.RowCount - 2).Cells(5).Value = totaldiskon.Text
        Grid.Rows(Grid.RowCount - 2).Cells(6).Value = totalbayar.Text
        Grid.Rows(Grid.RowCount - 2).Cells(7).Value = tanggal.Text
        Grid.Update()

10. Selanjutnya klik 2x pada Button Reset , dan masukkan Script dibawah ini .

        txtnama.Text = ""
        txttelp.Text = ""
        txtjmlbeli.Text = ""
        tanggal.Text = ""
        tgclear.Checked = 0
        tgnano.Checked = 0
        tgspy.Checked = 0
        rbya.Checked = 0
        rbtidak.Checked = 0
        htambahan.Text = "Rp."
        cbbarang.Text = ""
        txtharga.Text = ""
        cash.Checked = 0
        kredit.Checked = 0
        totaldiskon.Text = "Rp."
        totalbayar.Text = "Rp."

 Script diatas bertujuan untuk mereset semua pembelian yang telah diproses , Terkecuali Data Grid View .

11. Klik 2x pada Button Exit , lalu masukkan Script dibawah ini

        Dispose()

12. Selanjutnya Save dengan menekan CTRL+S , lalu jalankan Program tersebut dengan menekan F5. Hasilnya akan seperti gambar dibawah ini

Bagaimana sobat networking ? Mudah bukan ? Jika gagal coba lagi , Karena usaha keras tidak akan mengkhianati dirimu . Hehe

Terimakasih telah membaca tulisan / artikel di atas tentang Membuat Program Pembelian Handphone  pada Visual Studio. Semoga informasi tersebut bisa memberikan manfaat bagi sobat networking yang membaca dan jangan lupa bagikan ilmu ini kepada siapapun .