Eka Ardianto

Jumat, 31 Mei 2013

Menteri Kominfo Resmikan Jaringan Pita Lebar Palapa Ring Di Maluku Utara

Selasa, 28 Mei 2013 7:17 pm | andr010 | Berita Kementerian

Ternate, Kominfo - Menteri Komunikasi dan Informatika Tifatul Sembiring meresmikan groundbreaking pembangunan jaringan fiber optic broadband atau pita lebar Palapa Ring Sulawesi-Maluku-Papua di kantor PT Telkom Ternate.

Proyek ini akan membuka akses internet dengan kecepatan hingga 10 megabyte  per detik dan jika dimanfaatkan secara positif akan meningkatkan daya saing Indonesia di percaturan dunia global.

"Kita adalah anak cucu Majapahit  tengah mewujudkan mimpi Gajah Mada yang pernah mengucap sumpah Palapa untuk menyatukan Nusantara ini," kata MenkominfoTifatul Sembiring,Selasa (28/5).

Menurut Tifatul, pembangunan Palapa Ring Sulawesi-Maluku-Papua ini akan menjadi tonggak sejarah bagi kemajuan bangsa. "Ini bagaikan sinar mentari yang akan menerangi kawasan Indonesia timur karena masyarakat akan memperoleh fasilitas akses internet dengan kecepatan tinggi."

Tifatul menjelaskan, Palapa Ring ini adalah pembangunan jaringan serat optik dan telah menyambungkan pulau-pulau besar lainnya di Indonesia yaitu Sumatera, Jawa, Kalimantan dan Sulawesi. Jaringan ini dikenal juga dengan istilah Pita Lebar. Mulai hari ini akan disambungkan ke Maluku dan Papua yang diharapkan selesai dalam 18 bulan ke depan.

Untuk tahap SMPCS (Sulawesi Papua Cable System) ini  memakan biaya lebih kurang dua triliun Rupiah yang sepenuhnya dikerjakan PT Telkom Indonesia. "Ini adalah bagian dari implementasi Masterplan Percepatan Pembangunan Ekonomi Indonesia termasuk konektivitas Koridor 6," ujarnya.

Proyek prestisius ini telah dicanangkan Presiden SBY di Forum Indonesia Summit November 2009 dalam istilah "Indonesia Tersambung" baik secara infrastruktur jalan, jembatan, transportasi serta komunikasi dan informasi.

Menteri Kominfo Tifatul juga mengatakan, jaringan broadband ini akan berdampak luas pada sektor ekonomi,pariwisata, pendidikan, kesehatan, politik, sosial dan lain-lain. "Pembangunan Proyek Palapa Ring ini akan memperkecil kesenjangan antara kawasan Indonesia Bagian Barat dengan Indonesia Bagian Timur," katanya. (Rmg)

Selasa, 28 Mei 2013

FORM GAJI MENGGUNAKAN LISTVIEW

FORM GAJI MENGGUNAKAN LISTVIEW


ini tampilan awal form gaji dengan listview
masukkan syntax

Public Class Form1
    Sub BuatTable()
        Lv.Columns.Add("NIK", 80, HorizontalAlignment.Center)
        Lv.Columns.Add("nama", 80, HorizontalAlignment.Left)
        Lv.Columns.Add("jabatan", 80, HorizontalAlignment.Center)
        Lv.Columns.Add("gaji", 80, HorizontalAlignment.Center)
        Lv.Columns.Add("status", 80, HorizontalAlignment.Center)
        Lv.Columns.Add("tunj istri", 80, HorizontalAlignment.Center)
        Lv.Columns.Add("jumlah anak", 80, HorizontalAlignment.Center)
        Lv.Columns.Add("tunj anak", 80, HorizontalAlignment.Center)
        Lv.Columns.Add("jam lembur", 80, HorizontalAlignment.Center)
        Lv.Columns.Add("honor lembur", 80, HorizontalAlignment.Center)
        Lv.Columns.Add("pajak", 80, HorizontalAlignment.Center)
        Lv.Columns.Add("total", 80, HorizontalAlignment.Center)
        Lv.View = View.Details
        Lv.GridLines = True
        Lv.FullRowSelect = True
    End Sub
    Sub isitabel()
        Dim Lst As New ListViewItem
        Lst.Text = NIK.Text
        Lst.SubItems.Add(nama.Text)
        Lst.SubItems.Add(jabatan.Text)
        Lst.SubItems.Add(gaji.Text)
        Lst.SubItems.Add(status.Text)
        Lst.SubItems.Add(tunjistri.Text)
        Lst.SubItems.Add(jumlahanak.Text)
        Lst.SubItems.Add(tunjanak.Text)
        Lst.SubItems.Add(jamlembur.Text)
        Lst.SubItems.Add(honorlembur.Text)
        Lst.SubItems.Add(pajak.Text)
        Lst.SubItems.Add(total.Text)
        Lv.Items.Add(Lst)
    End Sub
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        NIK.Items.Add("001")
        NIK.Items.Add("002")
        NIK.Items.Add("003")
        jabatan.Items.Add("Mandor")
        jabatan.Items.Add("Kepala Bagian")
        jabatan.Items.Add("Staff")
        For i = 1 To 4
            jumlahanak.Items.Add(i)
        Next i
        For i = 1 To 10
            jamlembur.Items.Add(i)
        Next i
        status.Items.Add("menikah")
        status.Items.Add("tidak menikah")

        BuatTable()
    End Sub

    Private Sub jabatan_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles jabatan.SelectedIndexChanged
        Select Case jabatan.Text
            Case "Mandor" : gaji.Text = 1750000
            Case "Kepala Bagian" : gaji.Text = 2500000
            Case "Staff" : gaji.Text = 1250000
        End Select
        pajak.Text = 0.015 * Val(gaji.Text)
    End Sub

    Private Sub status_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles status.SelectedIndexChanged
        Select Case status.Text
            Case "menikah" : tunjistri.Text = 0.09 * gaji.Text
            Case "tidak menikah" : tunjistri.Text = 0
        End Select
    End Sub

    Private Sub jumlahanak_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles jumlahanak.SelectedIndexChanged
        If jumlahanak.Text >= 2 And status.Text = "menikah" Then
            tunjanak.Text = 0.07 * gaji.Text
        ElseIf jumlahanak.Text = 1 And status.Text = "menikah" Then
            tunjanak.Text = 0.03 * gaji.Text
        Else
            tunjanak.Text = 0

        End If
    End Sub
    Private Sub Btnproses_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Btnproses.Click
        If jabatan.Text = "Mandor" Then
            honorlembur.Text = 7500
        ElseIf jabatan.Text = "Kepala Bagian" Then
            honorlembur.Text = 10000
        ElseIf jabatan.Text = "Staff" Then
            honorlembur.Text = 5000
        Else
            honorlembur.Text = 0
        End If
        total.Text = Val(honorlembur.Text * jamlembur.Text) + Val(gaji.Text) + Val(tunjistri.Text) + Val(tunjanak.Text) - Val(pajak.Text)

    End Sub

    Private Sub NIK_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles NIK.SelectedIndexChanged
        Select Case NIK.Text
            Case "001" : nama.Text = "oncom"
            Case "002" : nama.Text = " udin"
            Case "003" : nama.Text = "ujang"
        End Select
    End Sub

    Private Sub Btnkeluar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Btnkeluar.Click
        end
    End Sub

    Private Sub Btnbaru_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Btnbaru.Click
        isitabel()
        NIK.Text = ""
        nama.Text = ""
        jabatan.Text = ""
        gaji.Text = ""
        status.Text = ""
        tunjistri.Text = ""
        jumlahanak.Text = ""
        tunjanak.Text = ""
        jamlembur.Text = ""
        honorlembur.Text = ""
        pajak.Text = ""
        total.Text = ""
    End Sub

    Private Sub hapus_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles hapus.Click
        Lv.Items.Clear()
    End Sub

    Private Sub nhapus_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles nhapus.Click
        Lv.Items.Remove(Lv.SelectedItems(0))
    End Sub
End Class

Tampilan setelah dijalankan.

Menjalankan Programnya


Setelah disimpan kedalam listview




Demikian Wasalam.



Kamis, 23 Mei 2013

David Karp, Remaja Pendiri Situs "Rp 10 Triliun" Tumblr

Penulis: Restituta Ajeng Arjanti | Rabu, 22 Mei 2013 | 10.31 WIB
 
 David Karp, pendiri situs blogging Tumblr.

KOMPAS.com — Muda, cerdas, kaya raya. Itulah David Karp (26), pendiri Tumblr. Senin (20/5/2013) lalu, perusahaan miliknya dibeli oleh Yahoo dengan harga fantastis 1,1 miliar dollar AS atau sekitar Rp 10 triliun. Nilai itu sepenuhnya akan dibayarkan dalam bentuk tunai oleh Yahoo.

Tumblr memang menarik. Sejak didirikan pada tahun 2007, Tumblr sudah menjadi rumah bagi 105 juta blog yang dimiliki oleh orang-orang dari segala penjuru dunia.

David Karp lahir pada tanggal 6 Juli 1986 di Manhattan, New York. Di daerah itu pula, dia dibesarkan. Ketika berusia 11 tahun, David sudah mulai belajar tentang HTML dan merancang website. Ketika kecil, sebenarnya dia sempat bercita-cita untuk  bisa kuliah di Massachusetts Institute of Technology (MIT). Namun, saat usianya masih 14 tahun, dia sudah mulai merasa bosan dengan sekolah.

Ibu David, Barbara Ackerman, bisa dibilang merupakan orang yang paling berperan dalam membuka jalan bagi kesuksesan anaknya itu. Dalam sebuah artikel di NYTimes.com yang ditulis oleh Jenna Wortham dan Nick Bilton, diceritakan tentang perkenalan David dengan Fred Seibert, seorang produser TV ternama di AS. Saat itu tahun 2000. David berusia 14 tahun dan sudah duduk di bangku SMA. Sementara Seibert masih bekerja sebagai creative director di MTV.

Ibu David yang bekerja sebagai guru sains di Calhoun School, sekolah swasta di kawasan Upper West Side, Manhattan, mengajar anak-anak Seibert dan berteman baik dengan istrinya. Kepada istri Seibert, ibu David bercerita tentang anaknya yang cerdas, yang tengah merasa bosan dengan sekolahnya. Mendengar itu, istri Seibert menyarankan ibu David untuk mempertemukan David dengan suaminya.

Singkat cerita, David pun menyambangi kantor Seibert di kawasan Park Avanue. Kepada Seibert, dia mengatakan ingin belajar soal engineering. Akhirnya, Seibert menerima David untuk magang sebagai asistennya.

Suatu hari, David datang ke kantor Seibert dan mengatakan akan datang ke sana setiap hari karena dia sudah drop out dari SMA. Seibert tahu David gemar mengutak-atik komputer dan mengerti HTML. Akhirnya, dia meminta David membangun website untuk perusahaan barunya, Next New Networks, yang bergerak di bidang video production.

Seibert bercerita, David memberi tahu dia tentang bagaimana orang-orang akan menonton video di masa depan. Saat itu, Apple baru akan merilis iPod video. Berkat wawasan dari David itu, Next New Networks bisa menjadi salah satu produk video pertama di iTunes, hingga akhirnya diakuisisi oleh Google melalui YouTube.

Hingga kini, kerja sama antara Seibert dengan David masih terjalin. Seibert bahkan tercatat sebagai investor di Tumblr dan duduk di jajaran direksi perusahaan tersebut.

"Drop out" SMA

David adalah anak yang cerdas. Dia pendiam dan cenderung tertutup. Hal itu pun diakuinya sendiri. Dia lebih suka datang lebih pagi ke kantor untuk bekerja dengan tenang.

"Saat di mana saya merasa paling produktif adalah ketika saya tenggelam dalam kode, tenggelam dalam beberapa proyek, dan mengutak-atik desain," kata David dalam sebuah acara Founders Conference yang berlangsung di New York.

Ketika remaja, kebanyakan waktunya dia habiskan untuk bermain dengan komputernya di kamar.  Melihat David "lengket" dengan komputer, alih-alih menyuruh anaknya bermain di luar rumah dan menghirup udara segar, sang ibu malah menyarankan anaknya itu untuk drop out dan mengikuti "homeschooling".

"Aku melihat dia di sekolah seharian dan menghabiskan waktunya semalaman di depan komputer," kata ibu David seperti dikutip dari NYTimes. "Sangat jelas bahwa David membutuhkan ruang untuk menghidupkan passion-nya, yakni komputer," lanjut ibunya.

Pada usia 15 tahun, akhirnya David drop out dari Bronx High School of Science. Selama 3 tahun berikutnya, dia menjalani homeschooling.

Sukses di usia muda

Ketika usianya beranjak 18 tahun, David memutuskan untuk langsung menapaki dunia kerja. Dia sempat pergi ke Tokyo, Jepang, untuk bekerja di sebuah startup (perusahaan rintisan) bernama UrbanBaby, yang menyediakan layanan online parenting bagi para orangtua. Ketika para remaja sepantarannya belajar di bangku kuliah, David sudah menjabat sebagai Head of Product di UrbanBaby.

Pada tahun 2006, CNET Networks mengakuisisi UrbanBaby. David kembali ke AS. Jabatan terakhirnya ketika itu adalah chief technology officer (CTO) di UrbanBaby. Setelah akuisisi itu, pada tahun yang sama, David mengundurkan diri dan membangun sebuah perusahaan konsultan miliknya sendiri. Perusahaan itu bernama Davidville. Salah satu proyek yang dia kerjakan di Davidville adalah layanan blog sederhana yang berkembang menjadi Tumblr.

Sebelum Yahoo mengumumkan membeli Tumblr, layanan blogging tersebut sudah bernilai lebih dari 200 juta dollar AS. Namun, hal itu tidak membuat David hidup dalam kemewahan. Sehari-hari, David lebih suka mengendarai Vespa dari tempat tinggalnya di kawasan Brooklyn menuju markas Tumblr di New York. David yang bertubuh tinggi ramping juga lebih suka tampil kasual dalam balutan jeans, T-shirt, dan sneakers.

Sosok David yang baru berusia 26 tahun kian disorot ketika berita tentang Yahoo yang tertarik membeli Tumblr mulai mengemuka. Kini, setelah Yahoo membeli Tumblr, David pun resmi masuk ke dalam kelompok kecil entrepreneur muda kaya raya yang usianya di bawah 30 tahun, menemani pendiri Facebook, Mark Zuckerberg.

Editor: Reza Wahyudi

Helikopter Rekayasa Digital Bikin Heboh di China

 Helikopter Rekayasa Digital
KOMPAS.com — Kadangkala gambar hasil rekayasa digital bisa tampil begitu meyakinkan sehingga mampu mengecoh orang yang melihatnya.

Salah satu contoh terbaru terjadi di Negeri Tirai Bambu, tempat situs online milik surat kabar Global Times keliru memuat gambar helikopter tempur palsu.

Seperti dikutip dari Kotaku, gambar hasil rendering 3D tersebut muncul di laman Huanqiu.com milik Global Times, lengkap dengan teks yang menyebutkan bahwa helikopter itu kemungkinan merupakan konsep mesin perang buatan Pasukan Beladiri Jepang.

 Ditambahkan pula bahwa helikopter yang bersangkutan "terlihat seperti model dari film fiksi ilmiah karena teknologi untuk membuatnya belum tersedia". Galeri gambar-gambar helikopter ditampilkan di rubrik "militer".

Berita tentang hal ini bahkan muncul juga lewat kantor berita Xinhua yang mengutip Global Times dan mengatakan bahwa helikopter futuristik itu merupakan konsep yang didesain oleh kalangan "profesional Jepang".

Padahal, gambar helikopter ini bukan dibuat oleh Negeri Sakura, melainkan seseorang warga Indonesia bernama Ridwan Chandra Choa yang pernah bekerja sebagai seniman digital Lucasfilm Animation di Singapura. Ridwan mengunggahnya ke situs DeviantArt.

 Beberapa pengguna di situs jejaring sosial Weibo meragukan keaslian helikopter dalam gambar. "Tanpa baling-baling ekor, bagaimana caranya dia bermanuver?" tanya seorang pengguna.

Beberapa pengguna lain berkomentar bahwa desain helikopter lebih mirip benda di buku komik ketimbang mesin perang sungguhan.

Sebenarnya gambar tersebut sudah dibubuhi alamat URL DeviantArt—berikut nama dan tanda tangan sang kreator—dalam alfabet latin yang menunjukkan bahwa helikopter 3D di dalamnya hanya dimaksudkan sebagai sebuah karya seni. Namun, agaknya mereka tidak menyadari hal ini.

Rabu, 22 Mei 2013

Mengenal Jaringan Komputer (PAN, LAN, MAN dan WAN)

Posted by www.Catatanteknisi.com


Saat ini hampir setiap komputer yang kita temui merupakan bagian dari sebuah jaringan komputer yang kompleks. Misalkan saja ketika sebuah laptop atau komputer yang tadinya berdiri sendiri (stand alone) kemudian kita tambahkan sebuah USB Modem sehingga terhubung ke internet, maka komputer kita telah terhubung dan merupakan bagian dari sebuah jaringan yang sangat luas yaitu WAN (Wide Area Network). 

Dalam artikel berikut ini kita akan mencoba mengenal pengertian dari jaringan komputer, manfaat dan resiko dari jaringan komputer dan pembagian jaringan komputer berdasarkan luas areanya yaitu PAN, LAN, MAN dan WAN.

Apa itu Jaringan Komputer?

Secara sederhana pengertian dari jaringan komputer adalah hubungan antara dua atau lebih sistem komputer melalui media komunikasi untuk melakukan komunikasi data satu dengan yang lainnya.

Manfaat Jaringan Komputer:

Manfaat utama yang dapat kita rasakan dari terbentuknya jaringan komputer adalah kemampuan untuk saling berbagi sumber daya (resource sharing) yang kita miliki seperti pemakaian printer, hardisk, CD ROM dan peripherial lain secara bersama-sama, saling bertukar data (file sharing) dan berkomunikasi satu sama lain (email, chating sampai video conference).

Kerugian Jaringan Komputer:

Sebenarnya istilah tepatnya mungkin bukan kerugian tetapi konsekuensi dari terhubungnya sistem komputer kita ke jaringan komputer ini diantaranya adalah masalah keamanan (security) baik pada pengaksesan berbagai sumberdaya dari pihak-pihak yang tidak berwenang maupun masalah keamanan (ancaman virus) pada data yang dipertukarkan.

Terlepas dari berbagai resiko yang harus kita hadapi, rasanya untuk komputer saat ini terhubung atau merupakan bagian dari jaringan komputer merupakan hal yang tidak bisa dihindari. 

Jenis-Jenis Jaringan Komputer

Jenis-jenis jaringan komputer berdasarkan cakupan areanya dapat dibedakan menjadi beberapa jenis yaitu PAN, LAN, MAN dan WAN.

1. PAN (Personal Area Network)

Pada saat kita saling menghubungkan komputer atau perangkat lain seperti handphone, PDA, keyboard, mouse , headset wireless, camera dan peralatan lain yang jaraknya cukup dekat (4-6 meter) maka kita telah membentuk suatu Personal Area Network. Hal yang paling penting bahwa dalam PAN ini kita sendiri yang mengendalikan (authoritas) pada semua peralatan tersebut. Selain dihubungkn langsung ke komputer lewat port USB atau FireWire, PAN juga sering dibentuk dengan teknology wireless seperti bluetooth, Infrared atau WIFI.

2. LAN (Local Area Network)

Inilah jaringan komputer yang sangat populer. LAN (Local Area Network) adalah jaringan komputer yang mencakup wilayah kecil; seperti jaringan komputer kampus, gedung, kantor, dalam rumah dan sekolah. 

3. MAN (Metropolitan Area Network)


Metropolitan Area Network (MAN) adalah suatu jaringan dalam suatu kota dengan transfer data berkecepatan tinggi yang menghubungkan berbagai lokasi seperti kampus, perkantoran, pemerintahan, dan sebagainya. Jaringan MAN adalah gabungan dari beberapa LAN. Jangkauan dari MAN ini berkisar antara 10 hingga 50 km.

4. WAN (Wide Area Network)





WAN (Wide Area Network) merupakan jaringan komputer yang mencakup area yang besar sebagai contoh yaitu jaringan komputer antar wilayah, kota atau bahkan negara, atau dapat didefinisikan juga sebagai jaringan komputer yang membutuhkan router dan saluran komunikasi publik. Internet merupakan contoh dari jaringan WAN ini.


Selasa, 21 Mei 2013

Samsung Galaxy S4 8 Core

TEMPO.CO – Jum, 3 Mei 2013

KONTEN TERKAIT


TEMPO.CO, Jakarta- Sekitar satu setengah bulan setelah diperkenalkan untuk pertama kali kepada publik di New York, Amerika Serikat, telepon seluler cerdas Samsung Galaxy S4 berbasis Android 4.2.2 alias Jelly Bean ini akhirnya resmi hadir di Indonesia. Ponsel yang diperkuat prosesor Exynos 8 core (octa-core) dengan kecepatan 1,6 GHz ini dijual seharga Rp 7,499 juta.
»Samsung selalu berusaha menghadirkan teknologi inovasi terdepan untuk kehidupan konsumen yang lebih baik,” kata Yoo Young Kim, Managing Director Samsung Electronics Indonesia, dalam acara peluncuran di Jakarta, kemarin. »Apa yang mereka butuhkan bukan sekadar perangkat mobile pintar, tapi juga yang memudahkan kehidupan dan mendukung gaya hidup mereka.”
Filosofi yang dikedepankan oleh Samsung untuk ponsel Galaxy S4 ini adalah perangkat sebagai »teman hidup”. Itu sebabnya, Galaxy S4 memiliki serangkaian inovasi dan teknologi yang membuat konsumen seperti memiliki pasangan setia yang memahami mereka. Salah satunya fitur yang mampu menghadirkan koneksi dengan orang-orang dalam kehidupan mereka.
Selain itu, Galaxy S4 lebih dari sekadar perangkat personal yang hanya bisa dinikmati secara individual, tapi juga bisa untuk berbagi dengan kerabat dekat atau keluarga. Contohnya adalah berbagi foto, video, atau musik. Hal ini bisa dilakukan berkat fitur Group Play, yang bisa menyambungkan hingga delapan perangkat sekaligus.

DESAIN
Sekilas, Samsung Galaxy S4 mirip pendahulunya, Galaxy S3. Dimensinya pun tak terpaut jauh, tapi layar yang diusungnya lebih lebar, yakni 5 inci. Layar seluas itu mampu menampilkan foto ataupun video dalam format full HD. Tampilan layar menjadi sangat tajam dan jelas berkat kerapatan piksel hingga 441 ppi.
Saat Tempo memegangnya, ponsel dengan dimensi 136,6 x 69,8 x 7,9 milimeter ini terasa ringan. Beratnya hanya 130 gram. Cukup nyaman untuk digenggam, tak terlalu besar tapi juga tak terlalu kecil. Bahan plastik pembalut bodi Galaxy S4 yang membuatnya ringan. »Ini membuat baterai bisa dibuka,” ucap Febri Rusli, Product Marketing Manager Samsung Mobile Phone Indonesia.

PERANGKAT KERAS
Samsung Galaxy S4 mengusung prosesor octa-core alias 8 core berkecepatan 1,6 GHz. Prosesor tersebut terdiri atas dua prosesor quad-core, yang masing-masing berkecepatan 1,6 GHz dan 1,2 GHz. »Keduanya bisa berjalan secara simultan,” ucap Febri. Alasan prosesor tersebut dibagi dua adalah untuk meringankan beban kerja.
Salah satu yang menarik dari spesifikasi Galaxy S4 ini adalah disematkannya teknologi usang, yakni infrared. Tentu kehadiran infrared ini bukan tanpa maksud. Berkat teknologi itu, Galaxy S4 bisa difungsikan sebagai remote control. Ya, untuk memindahkan channel atau mengatur volume suara televisi atau pemutar DVD bisa dilakukan dengan ponsel ini.
FITUR
Samsung Galaxy S4 menghadirkan berbagai fitur inovatif. Untuk mengabadikan momen indah, tersedia fitur Dual Camera, Drama Shot, serta Sound dan Shot. Dual Camera memungkinkan pengambilan gambar dengan kedua kamera, depan dan belakang, secara bersamaan. Sedangkan Sound dan Shot menyimpan suara saat pengambilan gambar.
Ada pula fitur Group Play, yang dibuat untuk berbagi dan menikmati musik, foto, dokumen, dan permainan hingga delapan orang di sekitar yang juga menggunakan Galaxy S4. Hebatnya, semua itu bisa dilakukan tanpa menggunakan koneksi Wi-Fi ataupun sinyal seluler. Dalam acara peluncuran, fitur ini sempat diperagakan dan bekerja dengan baik.
Tak hanya itu, Galaxy S4 juga dilengkapi dengan inovasi teknologi untuk memudahkan kegiatan sehari-hari, seperti mengganti musik dengan hanya mengibaskan tangan di atasnya. Ini dimungkinkan berkat fitur Air Gesture. Atau manfaatkan fitur Air View ketika ingin mengintip foto atau e-mail. Cukup melayangkan jari di atas layar maka akan tampil preview isi folder tersebut.
Masih banyak fitur unggulan yang dibenamkan dalam Samsung Galaxy S4 ini, antara lain Samsung Smart Pause, yang memungkinkan mengontrol layar hanya dengan menatapnya; Samsung Hub, layanan satu akses untuk menikmati lima layanan sekaligus; Samsung WatchOn, layanan video dan film terbaik; Samsung Apps, layanan terbaru yang menyediakan fungsi pencarian; serta Samsung ChatOn, menawarkan pengalaman berkomunikasi lebih menarik.
FIRMAN
SPESIFIKASI
Jaringan: 2,5 G, 3G, 4G
Prosesor: Exynos 8 core (octa-core) 1,6 GHz
Sistem operasi: Android 4.2.2 Jelly Bean
Layar: 5 inci full HD Super AMOLED (1.920 x 1.080 piksel) 441 ppi
Kamera utama: 13 MP auto-focus dengan flash, Zero Shutter Leg
Kamera depan: 2 MP, full HD recording @30 fps, Zero Shutter Leg
Fitur kamera: Dual camera, dual shot, dual recording, dual video call
Video: Codec MPEG4, full HD (1.080p)
Audio: Codec MP3, AMR-NB/BW, AAC/AAC+/eAAC+
Konektivitas: Wi-Fi 802.11 a/b/g/n/ac (HT80), GPS/GLONASS, NFC, Bluetooth 4.0, IR LED
Sensor: Accelerometer, RGB Light, Geomagnetic, Barometer Temperature dan Humidity, serta Gesture
Memori: 16/32/64 GB + microSD hingga 64 GB
Total RAM: 2 GB
Dimensi: 136,6 x 69,8 x 7,9 mm
Berat: 130 g
Baterai: 2.600 mAh
Harga: Rp 7,499 juta


Cara Untuk Mengatasi Bahaya Radiasi Pada Ponsel


Cara Untuk Mengatasi Bahaya Radiasi Pada Ponsel
Kemajuan teknologi memang selalu menghadirkan berbagai manfaat yang sangat berguna untuk masyarakat akan tetapi dibalik manfaat itu tersimpan bahaya yang dapat merugikan kesehatan anda misalnya saja HP.


Menurut hasil diskusi dari WHO telah dikatakan bahwa telepon genggam ini bersifat karsinogenik yang arinya mudah untuk mengundang radiasi sehingga harus adanya pembelajaran tentang bagaimana cara sehat mengatasinya dan berikut ini sudah saya rangkum:


1. SMS


SMS memang sudah menjadi pekerjaan sehari-hari oleh para remaja jaman sekarang ini, ya para remaja tidak akan ketinggalan untuk membuat satu sms saja. Di balik itu semua ternyata SMS lebih baik digunakan untuk berkomunikasi daripada telepon. Karena radiasi yang ada di hp akan merespon ke otak secara tidak langsung dan perlahan akan mengakibatkan rusaknya jaringan otak.


2. Loudspeaker ataupun Headset


Mengaktifkan Loudspeaker ketika menelpon merupakan salah satu alternatif terbaik untuk berkomunikasi apabila pembicaraan itu tidak terlalu penting dan apabila itu penting anda bisa menggunakan Headset.


3. Lihat Indikator Sinyal


Ponsel cenderung lebih menangkap radiasi ketika sinyal sedang melemah ataupun ketika anda berada didalam keadaan yang cepat atau berada dalamm kendaraan seperti kereta api dan juga mobil.


4. Jangan Kantungi Ponsel


Ada penelitian yang menyebutkan bahwa ketika sang pria yang membawa ponselnya di kantung atau saku celana maka akan memiliki jumlah sperma 25% lebih rendah dari pria normal pada umumnya.


5. Matikan Ponsel Saat Malam Hari


Sebaiknya anda matikan ponsel ketika malam hari karena radiasi akan lebih maksimal ditangkap oleh ponsel apabila tetap menyala ada baiknya di taruh di kamar agar gelombang elektromagnetiknya tidak menyerang otak manusia.

Info :
http://forum.kompas.com/alternatif/210797-cara-untuk-mengatasi-bahaya-radiasi-pada-ponsel.html

Lubang Menganga Tewaskan 5 Orang di China

Lubang Menganga Tewaskan 5 Orang di lubang menganga China

Rita Uli Hutapea - detikNews
Foto: AFP

Beijing, - Fenomena sinkhole kembali terjadi di China. Bahkan lima orang tewas ketika lubang menganga itu tiba-tiba muncul di pintu gerbang kawasan industri di Shenzhen, China selatan yang berbatasan dengan Hong Kong.

Pemerintah distrik Shenzhen Longgang menyatakan, lima orang tewas dalam insiden tersebut. Diimbuhkan bahwa pihaknya tengah menyelidiki lebih lanjut peristiwa munculnya sinkhole tersebut.

Sinkhole tersebut terbentuk persis di luar Huamao Industrial Park pada Senin, 20 Mei malam waktu setempat. Saat kejadian, para pekerja pabrik akan berganti shift kerja. Demikian menurut surat kabar Guangming Daily seperti dilansir News.com.au, Rabu (22/5/2013).

Menurut surat kabar pemerintah China, Shanghai Daily, para petugas penyelamat berhasil menyelamatkan seorang pria yang jatuh ke dalam lubang menganga selebar 10 meter tersebut.

Belum jelas berapa jumlah total orang yang terjatuh ke dalam lubang besar tersebut. Namun upaya pencarian masih terus dilakukan. 

Penyebab sinkhole di China umumnya akibat pekerjaan pembangunan yang pesat di negeri itu. Sebelumnya pada Maret lalu, kamera CCTV sempat merekam seorang petugas keamanan yang tersedot ke dalam sinkhole, juga di Shenzhen. Pria itu pun tewas.

Dua bulan lalu, seorang pria tertelan bumi ketika sinkhole mendadak mucul di kamarnya di Florida, Amerika Serikat. Pria itu pun kemudian ditemukan tewas.

(ita/ita)




Program Visual Basic Penggajian Karyawan


Program berikut ini latihan penggajian karyawan menggunakan bahasa pemrograman visual basic/vb 6
Program ini termasuk memiliki logika yang sedang/sedikit rumit. :) masih sedikit yah :) hehehe

Silahkan design tampilan program seperti dibawah ini :

Berikut listing program penggajian karyawan.

Dim lembur As Double
Private Sub cmdBaru_Click()
    NIK.Text = ""
    Nama.Text = ""
    Status.Text = ""
    Jabatan.Text = ""
    Pajak.Text = ""
    Total.Text = ""
    Gaji.Text = ""
    TunjIstri.Text = ""
    TunjAnak.Text = ""
    JAnak.Text = ""
    Honor.Text = ""
    JLembur.Text = ""
    TunjAnak.Text = ""

End Sub

Private Sub CmdKeluar_Click()
    Unload Me
End Sub

Private Sub CmdProses_Click()
    Total.Text = Val(Gaji.Text) + Val(TunjIstri.Text) + Val(TunjAnak.Text) + Val(Honor.Text) - Val(Pajak.Text)
End Sub

Private Sub Form_Load()
    NIK.AddItem "001"
    NIK.AddItem "002"
    NIK.AddItem "003"
    Jabatan.AddItem "Mandor"
    Jabatan.AddItem "Kepala Bagian"
    Jabatan.AddItem "Staf"
    Status.AddItem "Menikah"
    Status.AddItem "Tidak Menikah"
    
    For i = 1 To 5
        JAnak.AddItem i
    Next i
    
    For i = 1 To 15
        JLembur.AddItem i
    Next i
    
    Call cmdBaru_Click
End Sub

Private Sub Jabatan_Click()
    Select Case Jabatan.Text
    Case "Mandor":
        Gaji.Text = 1750000
        lembur = 7500
    Case "Kepala Bagian": Gaji.Text = 2500000
        lembur = 10000
    Case "Staf": Gaji.Text = 1250000
        lembur = 5000
    End Select
    Pajak.Text = 0.015 * Gaji.Text
End Sub

Private Sub JAnak_Click()
    If JAnak.Text >= 2 Then
        TunjAnak.Text = 0.07 * Gaji.Text
    ElseIf JAnak.Text = 1 Then
        TunjAnak.Text = 0.03 * Gaji.Text
    Else
        TunjAnak.Text = 0
    End If
End Sub

Private Sub JLembur_Click()
    Honor.Text = JLembur.Text * lembur
End Sub

Private Sub NIK_Click()
    Select Case NIK.Text
    Case "001": Nama.Text = "Oncom"
    Case "002": Nama.Text = "Udin"
    Case "003": Nama.Text = "Ujang"
    End Select
End Sub

Private Sub Status_Click()
    Select Case Status.Text
    Case "Menikah":
        TunjIstri.Text = 0.09 * Gaji.Text
        JAnak.Enabled = True
    Case "Tidak Menikah":
        JAnak.Text = 0
        JAnak.Enabled = False
        TunjIstri.Text = 0
        TunjAnak.Text = 0
    End Select
    
End Sub

Untuk hasilnya silahkan aja lihat tampilan berikut ini :







Senin, 20 Mei 2013

Jaringan Komunikasi

Jaringan Komunikasi Data Komunikasi data, cepat atau lambat pada akhirnya akan mengarah kesuatu sistem jaringan. Hubungan komunikasi data yang paling sederhana adalah merupakan hubungan dari satu titik ketitik yang lain. Dalam hal ini hanya melibatkan satu pemancar data kesatu penerima data. Apabila hubungan ini dikembangkan dan akhirnya melibatkan penerima lainnya ataupun pemacar lainnya, maka terbentuklah sebuah jaringan komunikasi data. Pengertian jaringan disini dapat diartikan sebagai suatu sistem yang terkordinir dan saling berhubungan yang terdiri atas beberapa terminal ataupun PC ataupun mini-komputer dan mainframe yang bekerja sendiri-sendiri tetapi dapat saling bertukar data ataupun saling memanfaatkan segala sumber daya yang tersedia. CPU yang ada dipusat disebut sebagai server ataupun host komputer, dan terminal yang ada juga disebut sebagai node ataupun simpul. Jaringan yang ada juga merupakan gabungan dari unsur hardware dan software sesuai dengan persyaratan yang dibutuhkan. a. Local Area Network Merupakan suatu jaringan dimana peralatan-peralatan hardware dan software digabungkan untuk dapat saling berkomunikasi dalam daerah yang terbatas. LAN pada awalnya dikembangkan dikomputer mini, tetapi justru menjadi populer setelah PC banyak digunakan. Dengan adanya sistem LAN ini maka beberapa PC yang tadinya bekerja sendiri-sendiri, pada akhirnya dapat bekerja sama dalam batas-batas tertentu, bahkan juga dengan sistem komputer yang lebih besar. Kerjasama yang dapat dilakukan juga semakin berkembang dari hanya pertukaran data sampai saling memakai peralatan yang dihubungkan dengan salah satu sistem komputer. Akibat banyaknya merk dan jenis komputer yang beredar, maka seringkali sebuah kantor memiliki lebih dari satu merk komputer dengan pelbagai jenis dan ukurannya. Padahal kantor sangat menghendaki agar semua sistem komputer yang dimilikinya dapat saling bekerja sama, sehingga pekerjaan dapat diselesaikan secara lebih efisien dan perlatan yang mahal dapat digunakan secara bersama. Hal inilah yang menyebabkan dorongan munculnya LAN. LAN menjadi sedemikian populernya karena secara umum dapat digunakan sebagai paralatan otomatisasi kantor. Pada gambar nampak sebuah jaringan LAN yang terdiri dari empat PC yang diletakkan pada pelbagai tempat. PC yang ada disebut sebagai workstation. Setiap workstation dapat digunakan sebagai stand-allone (komputer yang berdiri sendiri), tetapi juga dapat digunakan untuk meng-access storage ataupun output devices, yang dalam hal ini disebut sebagai peripheral, yang berlokasi saling berjauhan tetapi masih dalam satu jaringan. Manajer pada Workstation-1 dapat menggunakan software expert system yang terdapat pada server untuk menyiapkan grafik serta mencetaknya dengan ploter. Manajer 2 yang terdapat pada Workstation-2 dapat menggunakan MS-Word dan mencetaknya dengan printer biasa. LAN dalam hal ini mampu memberikan semuanya itu kepada pemakai, dan ini tentu sangat menghemat biaya. Jaringan LAN biasanya akan terdiri atas: File server, berfungsi untuk mengontrol harddisk serta menghubungkannya kedalam jaringan. Utility server, dengan adanya peralatan ini memungkinkan untuk setiap pemakai didalam jaringan bisa menggunakan beberapa peralatan, seperti misalnya modem, ploter dan lainnya. Printer server, berfungsi untuk membagi peng-access-an printer kedalam jaringan sehingga bisa dimanfaatkan seluruh pemakai. Gateway, merupakan suatu perlatan didalam jaringan yang berguna untuk melakukan komunikasi dengan jaringan yang lain. Sesuai dengan namanya, maka LAN hanya bisa menjangkau daerah yang areanya terbatas (local), seperti misalnya dalam satu gedung, satu departemen ataupun satu kampus (saat ini pengertian terbatas diartikan tidak lebih dari 20 km). Dan dikarenakan pendeknya jarak yang ada, maka kecepatan transmisi data menjadi sangat tinggi. Media transmisi data yang digunakan pada LAN biasanya berupa kabel untiran seperti halnya yang digunakan pada kabel telpon, ataupun kabel koaksil yang biasanya digunakan pada televisi, ataupun kabel serat optik. Penggunaan udara sebagai media transmisi pada LAN pada saat ini belum umum digunakan. Dalam hal ini, jaringan LAN biasanya tidak memerlukan adanya modem. b. Wide Area Network. Merupakan suatu jaringan yang terdiri atas dua ataupun lebih komputer dalam suatu area yaang luas dan dihubungkan dengan fasilitas komunikasi seperti misalnya sistem telpon ataupun pemancar gelombang-mikro. Bentuk ini biasanya digunakan oleh perusahaan besar ataupun departemen pemerintahan. Pada saat ini, banyak sekali perusahaan yang memiliki cabang yang tersebar dipelbagai kota ataupun pelbagai negara. Setiap cabang yang ada, kemudian saling dihubungkan dengan sebuah jaringan yang bermuara pada kantor pusat. Pada saat ini, jaringan yang ada dapat menangani banyak hal, seperti misalnya melakukan komunikasi suara, data ataupun komunikasi gambar/video

Kamis, 16 Mei 2013

Penggunaan Listview

Listview sering membantu dalam pemrograman visual basic. Dengan adanya listview kita mampu menampilkan beberapa data sekaligus dalam suatu objek yang di kenal listview.

Penggunaan listview ternyata sangat mudah, lihat saja program berikut ini :)

Design penggunaan listview pada pemrograman visual basic


penggunaan listview pada pemrograman visual basic
Listing program penggunaan listview pada pemrograman visual basic.


Dim lst As ListItem

Private Sub cmdbersihkan_Click()
ListView1.ListItems.Clear
End Sub

Private Sub cmdhapus_Click()
NPM.Text = ""
Nama.Text = ""
Jenjang.Text = ""
Jurusan.Text = ""
Tahun.Text = ""
NPM.SetFocus
End Sub

Private Sub cmdhapuspilih_Click()
ListView1.ListItems.Remove ListView1.SelectedItem.Index
End Sub

Private Sub cmdsimpan_Click()
Set lst = LV.ListItems.Add(, , NPM.Text)
lst.SubItems(1) = Nama.Text
lst.SubItems(2) = Jenjang.Text
lst.SubItems(3) = Jurusan.Text
lst.SubItems(4) = Tahun.Text
Call cmdhapus_Click
End Sub

Private Sub Form_Activate()
cmdhapus_Click
End Sub

Sub BuatTabel()
With LV
.ColumnHeaders.Add , , "NPM", 1000
.ColumnHeaders.Add , , "Nama", 2500
.ColumnHeaders.Add , , "Jenjang", 900
.ColumnHeaders.Add , , "Jurusan", 1700
.ColumnHeaders.Add , , "Tahun", 1000
.GridLines = True
.FullRowSelect = True
.View = lvwReport
End With
End Sub

Private Sub Form_Load()
NPM.AddItem "1211030"
NPM.AddItem "1111010"
NPM.AddItem "1102111"
NPM.AddItem "1211101"

Call BuatTabel
For i = 2005 To 2013
Tahun.AddItem i
Next i

Jenjang.AddItem "S1"
Jenjang.AddItem "D3"
Jurusan.AddItem "Teknik Informatika"
Jurusan.AddItem "Manajemen Informatika"
End Sub

Private Sub NPM_Click()
Select Case NPM
Case "1211030": Nama.Text = "Dian Sostro"
Case "1111010": Nama.Text = "Susi Andriyani"
Case "1102111": Nama.Text = "Arista Triani"
Case "1211101": Nama.Text = "Aldyan"
End Select
End Sub



Berikut hasil program dengan menggunakan listview pada pemrograman visual basic.


Demikianlah pembahasan listview ini, semoga bermanfaat.


Tag : Penggunaan Listview Pada Pemrograman Visual Basic, pemrograman visual basic, listview pada visual basic.

Bila bermanfaat silahkan share Penggunaan Listview Pada Pemrograman Visual Basic ini dengan teman anda, Terima kasih sebelumnya