terkadang di suatu tempat atau kantor tempat agan , mungkin adanya larangan untuk menggunakan flashdrive di komputer kantor . Tentunya alasannya mungkin untuk mencegah virus dan lain sebagainya , karena komputer kantor pasti terkoneksi ke jaringan LAN , sehingga takut kalau flashdrive isi virus terus menyebar lewat LAN .
Kebetulan ane kerja di Contact Center PLN di Bali , dan mempunyai ide untuk membuat aplikasi semacam USB Monitoring , dimana aplikasi ini berbasis client server dan ane buat menggunakan VB.Net .
Pembuatan aplikasi ini ane bagi menjadi 3 Part yaitu :
[Part Pertama] : membuat file konfigurasi untuk koneksinya.
[Part Kedua] : membuat aplikasi untuk detect usb (vb.net).
[Part Ketiga] : membuat aplikasi untuk monitoring usb (php).
langsung aja gan , untuk Part 1 , membuat modul koneksinya gan :
1. Buka aplikasi Visual Studio agan
2. Klik Menu Project kemudian Pilih Add Module ,
3. Copas Kode Singkat berikut ini :
selanjutnya kita akan membuat aplikasi di clientnya . Dimana aplikasi di client ini tidak akan kelihatan oleh user alias ke hidden .
Tunggu terus kelanjutannya gan di blog ane ini , . . .
see uuuuuuu
Kebetulan ane kerja di Contact Center PLN di Bali , dan mempunyai ide untuk membuat aplikasi semacam USB Monitoring , dimana aplikasi ini berbasis client server dan ane buat menggunakan VB.Net .
Pembuatan aplikasi ini ane bagi menjadi 3 Part yaitu :
[Part Pertama] : membuat file konfigurasi untuk koneksinya.
[Part Kedua] : membuat aplikasi untuk detect usb (vb.net).
[Part Ketiga] : membuat aplikasi untuk monitoring usb (php).
langsung aja gan , untuk Part 1 , membuat modul koneksinya gan :
1. Buka aplikasi Visual Studio agan
2. Klik Menu Project kemudian Pilih Add Module ,
3. Copas Kode Singkat berikut ini :
Imports MySql.Data.MySqlClient.MySqlConnection4. Setelah itu simpan code tersebut dan simpan dengan nama "modKoneksi" atau terserah agan aj dech . hehe
Module modKoneksi
Public conn As New MySql.Data.MySqlClient.MySqlConnection
Public Sub koneksi(ByVal server As String, ByVal user As String, ByVal pass As String, _
ByVal db As String, ByVal port As String)
Try
If conn.State = ConnectionState.Closed Then
conn.ConnectionString = "DATABASE=" & db _
& ";SERVER = " & server _
& ";user id=" & user & ";password=" & pass & ";port=" & port & ";charset=utf8"
conn.Open()
End If
Catch ex As MySql.Data.MySqlClient.MySqlException
MsgBox("Koneksi ke server gagal", MsgBoxStyle.Critical, "USB Monitoring")
End Try
End Sub
Public Sub disconnect()
Try
conn.Open()
Catch ex As MySql.Data.MySqlClient.MySqlException
End Try
End Sub
End Module
selanjutnya kita akan membuat aplikasi di clientnya . Dimana aplikasi di client ini tidak akan kelihatan oleh user alias ke hidden .
Tunggu terus kelanjutannya gan di blog ane ini , . . .
see uuuuuuu
1 komentar:
Gan.. Ini lanjutannyavmana lagi. Ane lg butuh banget nih.. Bisa s posting sampe beres gk, klo nggak kirim aja ke email ane rudyahmadpangestu@yahoo.co.id ene tunggu secepatnya gan. Makaaih banyak.