Tips Setting Mikrotik Untuk Warnet Game Online

Tips kali ini, kita menggunakan ISP Telkom Speedy...

Topologi Jaringan : 
Modem DSL --> ether2 Mikrotik --> Router Mikrotik --> Ether1 Mikrotik --> Switch --> PC Terminal

Langkah 1

Install/Siapkan mikrotik OS

Langkah 2

Set Ip Address Tiap interface

Code:

ip address add address=10.10.10.1/24 interface=ether1
ip address add address=10.10.11.2/24 interface=ether2

Tips Konfigurasi Firewall Mikrotik

Sudah banyak tips trik konfigurasi firewall mikrotik di internet.saya hanya ingin menambahkan tips konfigurasi yang saya modifikasi sendiri.
script nya di copas aja di terminal, firewall berikut untuk block port" yang sering di pake virus, dan juga akses ke mikrotik di batasi hanya untuk ip-ip di address-list aour network

Kita buat dulu address-list dgn nama ournetwork, diisi IP yang di ijinkan untuk akses mikrotik anda.

Tips management bandwidth dengan queue tree PCQ

Kondisi Speedy Normal, Asumsikan internetnya sudah jalan (settingan IP public, private dan NAT sudah)
saya kasih contekan konfigurasi management bandwidth dengan queue pcq, biar agan bisa langsung copas ke teminal nya mikrotik kalo menggunakan  IP yang nya sama..
Contohnya pake IP private 192.168.0.0/24 (ether2)
Gateway di mikrotik 192.168.0.254 (ether1)
ada 10 PC client dari IP 1 sampai 10
layanan 2Mbps

Tips Excel connection dan vb.net bagian ke 1

Tips VB.net dan excel connection Bagian Pertama

Setting agar VB.Net bisa terkoneksi dengan excel

Pada project "Add reference" , masuk tabulasi "COM" lalu pilih Microsoft Excel Object Library

Masukan kode berikut sebelum Public (paling atas)

---

Imports Excel = Microsoft.Office.Interop.Excel

---

Membuat file excel baru

Berikut contohnya, dipasang pada button 1

---

Imports Excel = Microsoft.Office.Interop.Excel

Public Class Form1

'~~> mendefine object excel

Dim xlApp As New Excel.Application

Dim xlWorkBook As Excel.Workbook

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

'~~> membuat WorkBook (file excel) baru

xlWorkBook = xlApp.Workbooks.Add

'~~> memumculkan file excel 

xlApp.Visible = True

End Sub

End Class

Tips Excel connection dan vb.net bagian ke 2

INI ADALAH LANJUTAN DARI BAGIAN PERTAMA

---

Copy Paste dalam satu sheet yang sama

---

Imports Excel = Microsoft.Office.Interop.Excel

Public Class Form1

    Dim xlApp As New Excel.Application

    Dim xlWorkBook As Excel.Workbook

    Dim xlWorkSheet As Excel.Worksheet

    Dim xlSourceRange, xlDestRange As Excel.Range

    Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click

        xlWorkBook = xlApp.Workbooks.Open("C:\vb dan excel\percobaan.xlsx") 

       xlApp.Visible = True

       xlWorkSheet = xlWorkBook.Sheets("Sheet1")

        '~~> sumber yg mau di copy

        xlSourceRange = xlWorkSheet.Range("A1:B10")

        '~~> tujuan atau mau dipaste

        xlDestRange = xlWorkSheet.Range("D1")

        '~~> Copy paste range

        xlSourceRange.Copy(xlDestRange)

    End Sub   

End Class