CONTOH APLIKASI NEW MEDIA (SKYPE) BESERTA MANFAAT, KEKURANGAN & KELEBIHANNYA

Oke, disini saya akan membahas aplikasi New Media yang banyak digunakan di kalangan masyarakat. yaitu aplikasi yang bernama Skype. Berikut uraian penjelasan tentang Skype. Silahkan disimak !

• Pengertian SKYPE

Skype adalah sebuah program komunikasi dengan teknologi P2P (peer to peer). Program ini merupakan program bebas (dapat diunduh gratis) dan dibuat dengan tujuan penyediaan sarana komunikasi suara (voice) berkualitas tinggi yang murah berbasiskan internet untuk semua orang di berbagai belahan dunia. Pengguna Skype dapat berbicara dengan pengguna Skype lainnya dengan gratis, menghubungi telepon tradisional dengan biaya (skypeOut), menerima panggilan dari telepon tradisional (SkypeIn), dan menerima pesan suara. Teknologi skype ditemukan oleh wirausahawan Niklas Zennström dan Janus Fri, orang yang sama yang menemukan Kazaa dan Joost (P2P untuk televisi). Skype lalu berkompetisi dengan protokol terbuka VoIP yang sudah ada seperti SIP, IAX, dan H.323. Grup Skype yang dibentuk pada bulan September 2003 lalu dibeli oleh perusahaan lelang internet raksasa di Amerika e-bay pada bulan September 2005 dan bermarkas di Luxembourg, Jerman dengan kantor-kantor di London, Inggris, Praha, Rusia dan San Jose, California, A.S.

• Keunggulan/ Kelebihan dari SKYPE

- Komunikasi global dan lokal yang lebih ekonomis melalui suara atau konferensi video.
- Penggunannya yang mudah.
- Kualitas suara yang lebih baik dibandingkan VoIP pendahulunya.
- Data dan Alat Pencari Pengguna Global Terdesentralisasi.
- Pengarah lalulintas yang pintar (intelligent routing).
- Traversal Firewall dan NAT (Network Address Translation).

• Kekurangan dari SKYPE

- Penipuan. Layaknya seluruh hubungan yang dilakukan melalui internet, skype juga memiliki masalah yang sama dengan registrasi identitas penggunanya.
- Kapasitas yang besar.
- Terhalang oleh waktu dan kesediaan orang yang memanggil dan yang dipanggil.
- Tidak ada panggilan darurat dengan Skype.

Read More

Database Pada Visual Basic 6

A. Listing Program

• Code pada form 1:

Private Sub Command1_Click()

If Text1.Text = "rizki" And Text2.Text = "59414644" Then

MsgBox "login berhasil"

Form1.Hide

Form2.Show

Else

MsgBox "Username atau Password SALAH!"

End If

End Sub

 

Private Sub Command2_Click()

Text1.Text = ""

Text2.Text = ""

End Sub

• Code pada Form2:

Private Sub Command1_Click()

Adodc1.Recordset.AddNew

Adodc1.Recordset!NPM = Text1.Text

Adodc1.Recordset!Nama = Text2.Text

Adodc1.Recordset!kelas = Text3.Text

Text1.Text = ""

Text2.Text = ""

Text3.Text = ""

End Sub

Private Sub Command2_Click()

Adodc1.Recordset.Delete

End Sub

Private Sub Command3_Click()

Adodc1.Recordset.Update

Adodc1.Recordset!NPM = Text1.Text

Adodc1.Recordset!Nama = Text2.Text

Adodc1.Recordset!kelas = Text3.Text

Text1.Text = ""

Text2.Text = ""

Text3.Text = ""

End Sub

B.Logika Program

Berikut step by step langkah langkah pembuatan program data base dengan menggunakan visual basic 6.0:

• Buka aplikasi visual basic 6.0
• Dan akan muncul kotak form1 seperti gambar berikut

• Apabila form1 udah muncul maka buatlah form2 dengan menggunakan langkah dengan klik kanan pada form di kotak project lalu pilih add form atau bisa juga dengan cara mengklik icon berikut pada toolbar dan akan muncul gambar seperti berikut:

• Setelah itu design form1 dengan aturan berikut:

ü  Label 1 = diisi dengan Username

ü  Label 2 = diisi denagan Password

ü  textbox 1 = di kosongkan

ü  textbox 2 = di kosongkan

ü  command button 1 = berisi Login

ü  command button 2 = berisi Reset

kemudian akan muncul form1 sebagai berikut:

• Langkah selanjutnya adalah dengan memasukkan kodingan pada comman button1 atau “Login” dengan cara double klik pada Login:

Private Sub Command1_Click()

If Text1.Text = "rizki" And Text2.Text = "59414644" Then

MsgBox "login berhasil"

Kodingan diatas digunakan untuk perintah bahwa di bagian username apabila berisi “rizki” dan password “59414644” maka login akan berhasil dan akan muncul tulisan “login berhasil”

Form1.Hide

Form2.Show

Koddingan ini berguna untuk pindah ke form2 apabila login pada form pertama berhasil

Else

MsgBox "Username atau Password SALAH!"

Apabila password dan username tidak sesuai maka akan muncul “login gagal”

End If

End Sub

• Langkah selanjutnya adalah dengan memasukkan kodingan pada comman button2 atau “Reset” dengan cara double klik pada Reset:

Private Sub Command2_Click()

Text1.Text = ""

Text2.Text = ""

End Sub

Kodingan diatas digunakan untuk menghapus atau menghilangkan di bagian username yang berisi “rizki” dan password “59414644” setelah di tekan reset

• Pada form2 kita akan memasukkan aturan sebagai berikut:

ü  Label 1 = NPM

ü  Label 2 = Nama

ü  Label 3 = Kelas

ü  TextBox 1 =  untuk menginput NPM

ü  TextBox 2 = untuk menginput Nama

ü  TextBox 3 = untuk menginput Kelas

ü  Command button 1 (input) = button menginput data

ü  Command button 2 (delete ) = button untuk menghapus data yang telah diinput

ü  Command button 3 (update) = button untuk merubah data

Maka akan muncul form2 sebagai berikut:

ü  Untuk  Adodc1 dan datagrid didapat dari kita pilih icon data  di general, lalu klik kanan dan pilih component.Setelah kita klik akan muncul

Kemudian ceklis pada Microsoft ADO Data Control  6.0 dan Microsoft DataGird 6.0

ü  Kemudian akan muncul icon datagird dan adodc pada toolbox.Kemudian klik icon adodc  dan datagird  dan akan muncul kotak seperti berikut:

ü  Kemudian klik use connection string di bagian properties adodc1 seperti berikut:

ü  Kemudian akan muncul data link properties

Pada provider pilih Microsoft Jet 4.0 OLE

Pada connection pilih database yang telah di buat dengan select or enter a database name di kotak no 1:

Berikut database tersebut:

Kemudian klik ok pada properties: 

ü  Kemudian pada properties datagird ubah data source dengan adodc1 agar data yang kita buat di database bisa muncul

• Langkah selanjut nya yaitu masukkan kodingan untuk input dengan double klik pada command button1:

Private Sub Command1_Click()

Adodc1.Recordset.AddNew

Adodc1.Recordset!NPM = Text1.Text

Adodc1.Recordset!Nama = Text2.Text

Adodc1.Recordset!kelas = Text3.Text

Text1.Text = ""

Text2.Text = ""

Text3.Text = ""

End Sub

Kodingan diatas berguna untuk meng input data yang ingin di buat.

• Dan untuk menghapus data yang telah kita input kita bisa masukkan kodingan berikut dengan double klik pada command button 2:

Private Sub Command2_Click()

Adodc1.Recordset.Delete

End Sub

• Kemudian untuk update masukkan koddingan berikut dengan double klik pada command button 3:

Private Sub Command3_Click()

Adodc1.Recordset.Update

Adodc1.Recordset!NPM = Text1.Text

Adodc1.Recordset!Nama = Text2.Text

Adodc1.Recordset!kelas = Text3.Text

Text1.Text = ""

Text2.Text = ""

Text3.Text = ""

End Sub

C.OUTPUT PROGRAM

• Pada form 1:

·         Ketika kita klik ok maka akan muncul seperti di bawah ini :

· 

Read More