VS 
Saya berani bertaruh kalo negara yang paling mahal harganya bila dijual adalah Indonesia. Mungkin kalo dinilai sekitar lebih dari 10.000 trilyun (maybe). Siapa si yang ga ngiler liat kekayaan alam Indonesia? Mulai dari jaman penjajahan Belanda, Portugis, Jepang sampai penjajahan Amerika saat ini. Amerika??? Yup secara ga langsung kita sebenarnya blom merdeka secara utuh dan masih dijajah oleh amerika. Liat aja mulai dari embargo militer, intervensi politik, melanggar kedaulatan negara sampai mengatur perekonomian Indonesia. Kembali pada konteks kekayaan alam Indonesia, beberapa hari ini saya baca di koran ada isu tentang eksplorasi gas alam di pulau Natuna. Dimana produsen inyak terbesar pertama dan kedua di dunia yaitu Exxon (AS) dan Shell (Belanda) berebut untuk bisa mengeksplorasi gas alam di pulau tersebut. Konon katanya pulau Natuna memiliki cadangan gas alam terbesar di dunia (wuiiihhh), bisa dibayangkan berapa keuntungan yang bisa diraih perusahaan-perusahaan minyak tersebut bila dapat mengeksplorasi gas tersebut. Isu yang berkembang, kedatangan Hillary Clinton ke Jakarta tempo hari salah satu tujuannya adalah untuk membicarakan kemungkinan eksplorasi blok natuna oleh Exxon. Sedangkan di Amsterdam, PM Belanda Jan Pieter Balkinende secara mendadak meninggalkan rapat antar negara Uni Eropa untuk menemui Wakil Presiden Jusuf Kalla dalam rangka membicarakan kelanjutan proposal yang ditawarkan ke Pemerintah RI terhadap Natuna.Diantara perjanjian proposal tersebut Shell menjanjikan akan memindahkan kilangnya di Singapura ke Pulau Batam senilai 5 Milyar US Dollar (sekitar 46 Trilyun rupiah) Kita patut bersyukur akhirnya Pulau Natuna diakui oleh Mahkamah Internasional sebagai pulau milik RI karena sebelumnya sempat diperebutkan oleh Malaysia. Lalu apa kabar Pertamina???Sayangnya teknologi yang dimiliki bangsa ini khususnya Pertamina belum mampu untuk bisa mengeksplorasi gas alam di natuna seperti teknologi canggih yang dimiliki Exxon dan Shell untuk bisa memisahkan gas CO2 menjadi Liquid Petroleum Gas (Elpiji). Tetapi pemerintah berupaya untuk menjadikan Pertamina sebagai lead project dan bagi hasil 60 : 40 untuk keuntungan Indonesia. Andai saja SDM di negara kita ini maju seperti bangsa lainnya..mungkin saat ini Indonesia adalah negara kaya.
image source : http://www.yousaytoo.com
Guten Morgen..ein schoenes wochenende..(belaga sok jerman ha5x)
Yap..Selamat pagi..akhir pekan yang indah..buat saya atau mungkin buat anda. Bangun pagi, nonton tipi langsung dicekokin band-band cengeng. Bisa dibilang jaman sekarang kalo ga bawain lagu cinta ga bakalan laku, semua mengobral kata "cinta" dan "selingkuh". Saya ga munafik mengakui kalo ada beberapa band yang lumayan enak didenger tapi makin lama makin enek aja dengernya. Seolah-olah cinta terhadap lawan jenis itu diatas segala-galanya melebihi cinta terhadap Tuhannya sendiri. Seperti kalimat "kaulah segalanya", "tak bisa hidup tanpamu", "engkaulah hidpku" CUIH!!! makan tuh cinta! emangnya cinta bisa bikin kenyang? emangnya anak istri bisa dikasi makan cinta?
Mau tampang personel band-nya metal, kampung atow kota ga terlalu penting, yang penting harus bawain lagu cinta dan terbukti manjur sukses dipasaran. Yang tadinya anak desa jadi anak kota, tadinya muka ga beraturan jadi muka make up, tadinya naek angkot jadi naek mobil, tadinya ngamen di kaki lima jadi ngamen di stasiun tv dan tadinya bukan siapa-siapa jadi siapa siapa. Pendapatan band tersebut terhitung dahsyat, kalo dikalkulasikan (halah) pendapatan terbesar merak dari manggung dan RBT (ring back tone). Mana ada yang mau nolak kalo gitu mah. Yang aga miris mungkin melihat dan mendengar ejekan-ejekan buat Kangen Band (baca: Kenjen Ben. he5x). Ada sebagian orang yang benci mereka sampe ada cemoohan dan cacian buat mereka. Apa kangen band ngerugiin orang-orang tersebut? apa kangen band bikin kuping mereka yang denger jadi budek? Kalo ga suka musik dan penampilannya ya ga usah didenger atow diliat lah..gitu aja kok repot. Ga perlu sampe bikin perkumpulan anti kangen band kaleeee. Jujur aja saya juga ga suka sama musiknya tapi saya salut sama perjuangannya meniti karir dari bawah. Buktinya banyak juga yang suka sama musik mereka. Intinya, terserah deh..mau cinta kek..selingkuh kek..dua lingkuh atow tiga lingkuh kek..asal jangan lebay aja en jangan lagu cinta melulu.
Denger deh lagunya Efek Rumah Kaca yang Cinta Melulu..(nice song)
download: http://gudanglagu.com/e/efek-rumah-kaca/efek-rumah-kaca-cinta-melulu
Iseng-iseng buka folder side project di komputer, saya mikir kenapa ga di posting aja..kali aja bisa bantu orang laen yang kira-kira butuh contoh program Visual Basic 6. Aplikasi yang pernah saya buat yaitu aplikasi input data untuk Sertifikasi HATHI Dinas Pekerjaan Umum. Dari keseluruhan program saya tampilkan contoh form input data dan koneksi database melalui Microsoft Access sebagai garis besarnya saja
Langkah Pertama buat database melalui Microsoft Access. Pilih Blank database serta save pada direktori yang anda inginkan
Save Tabel menjadi TabelSertifikasi lalu klik DesignView. Isi Field Name dengan KTA, Nama, Bidang Keahlian Domain, Angka Kredit, Kualifikasi, Nomor Sertifikasi HATHI, Nomor Registrasi LPJK, Masa Berlaku Sertifikat dan Cabang. Untuk Primary Key pilih di field KTA. Saya memberikan semua data type = text pada semua field karena input semua field tidak selalu berupa angka (number). Seperti gambar dibawah ini
Klik DatasheetView lalu masukkan field-field seperti dibawah ini dengan data yang akan diinput sampai selesai lalu save.
Langkah berikutnya buka aplikasi visual basic 6
Pada layar New Project pilih Standard EXE lalu klik open. Maka akan muncul tampilan sebagai berikut
Masukkan Frame pada form lalu perbesar ukurannya. Selanjutnya masukkan 9 buah Label, 9 buah Text Box, 5 buah Command Button, sebuah Adodc dan sebuah DataGrid. Apabila pada panel belum tersedia Adodc dan DataGrid, bisa dicari melalui Project – Reference.
Ubah Properties semua Label , CommandButton, Label, TextBox, Adodc dan DataGrid pada panel properties seperti dibawah ini
Frame : Caption : Data Sertifikasi HATHI
Label1 – Caption : KTA
Label2 – Caption : Nama
Label3 – Caption : Bidang Keahlian Domain
Label4 – Caption : Angka Kredit
Label5 – Caption : Kualifikasi
Label6 – Caption : Nomor Sertifikasi HATHI
Label7 – Caption : Nomor Registrasi LPJK
Label8 – Caption : Masa Berlaku Sertifikat
Label9 – Caption : Cabang
TextBox1 hingga TextBox9 – Text : Blank (kosongkan saja)
CommandButton1 – Caption : &Save
CommandButton2 – Caption : &Delete
CommandButton3 – Caption : &Clear
CommandButton4 – Caption : &Exit
Adodc – Name : adoSertifikasi, Caption : Sertifikasi, CommandType : 2 adCmdTabel
Untuk Adodc, Connection stringnya pilih use connection string (Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\BARU\DinasPU.mdb;Persist Security Info=False) – build – select or enter a database name-pilih database yang telah dibuat lalu test connection-Ok
DataGrid – Data source : adoSertifikasi
Hingga tampilannya menjadi seperti dibawah ini
Untuk Code semua CommandButton diatas adalah :
Button Save :
Private Sub Command1_Click()
adoSertifikasi.Recordset.Fields("KTA") = Text1.Text
adoSertifikasi.Recordset.Fields("Nama") = Text2.Text
adoSertifikasi.Recordset.Fields("Bidang Keahlian Domain") = Text3.Text
adoSertifikasi.Recordset.Fields("Angka Kredit") = text4.Text
adoSertifikasi.Recordset.Fields("Kualifikasi") = Text5.Text
adoSertifikasi.Recordset.Fields("Nomor Sertifikasi HATHI") = Text6.Text
adoSertifikasi.Recordset.Fields("Nomor Registrasi LPJK") = Text7.Text
adoSertifikasi.Recordset.Fields("Masa Berlaku Sertifikat") = Text8.Text
adoSertifikasi.Recordset.Fields("Cabang") = Text9.Text
adoSertifikasi.Recordset.Update
End Sub
Button Delete :
Private Sub Command3_Click()
Confirm = MsgBox("Apakah anda ingin menghapus record ini?", vbYesNo, "Deletion Confirmation")
If Confirm = vbYes Then
adoSertifikasi.Recordset.Delete
MsgBox "Record Deleted!", , "Message"
Else
MsgBox "Record Not Deleted!", , "Message"
End If
End Sub
Button Clear :
Private Sub Command2_Click()
Text1.Text = ""
Text2.Text = ""
Text3.Text = ""
Text4.Text = ""
Text5.Text = ""
Text6.Text = ""
Text7.Text = ""
Text8.Text = ""
Text9.Text = ""
End Sub
Button Exit :
Private Sub Command4_Click()
Unload Me
End Sub
Jalankan program. Klik Run maka hasilnya seperti dibawah ini
Untuk program tersebut anda bisa memodifikasi tampilan sampai form tambahan seperti form login. Caranya ga jauh beda kok.
Tips dari saya :
Tambah terus ilmu dan pengetahuan source program Visual Basic dari internet
Selalu buat file backup program tersebut bila sewaktu-waktu program tersebut ga sengaja kehapus
Bila program masih error tanyakan pada yang lebih mengerti atau cari arti kesalahan tersebut di internet
Jangan pernah lupa untuk men-save program anda coz kita ga pernah tau kapan tiba-tiba listrik mati atau ngejepret (bahasa mana ini).. Kalo lupa ngesave trus listrik mati, nikmatilah nasib anda hahahahaha
- Ngerjain ini program paling mantep waktu tengah malem ditemenin kopi, rokok, sama alunan musik postal service
Gunakanlah ilmu komputer yang anda miliki untuk mencari uang . Jangan pernah merasa ilmu anda hanya untuk mendapatkan ijazah dan melamar pekerjaan. Bukannya mau pamer tapi cuma mau berbagi pengalaman. Saya pernah diminta tolong buat ngedesain leaflet suatu organisasi di Bandung, ngedesainnya aja cuma sejam pake Corel Draw dan ga kepikiran untuk matok tarif coz udah kenal sama yang minta tolong. Ujung-ujungnya dikasi amplop yang isinya lumayan buat beli jeans levi’s original. Trus buat aplikasi database dapet amplop yang nilainya lumayan buat ditabung en wisata kuliner ampe kenyang plus dikasi Flashdisk 4 GB.
Next Project ..Website Bandung Discovery with Joomla. Mudah-mudahan lancar en bisa diposting disini
Hari ini saya mendapatkan barang menarik yaitu sebuah buku yang berjudul Secret Societies (21 organisasi perusak dunia) karangan Michael Bradley. Kenapa dibilang barang menarik, karena akhir-akhir ini saya lagi gandrung baca buku yang berbau sejarah, politik dan bisnis. Bukannya sok pinter tapi berusaha menjadi pinter..daripada baca novel yang ga nambah ilmu atau ga bisa menghibur. Ga tau kenapa dari dulu ga pernah minat baca novel.
Buku Secret Societies tersebut bisa membuka wawasan saya tentang organisasi-organisasi "jahat" yang ada di muka bumi ini. Diantara urutan organisasi-organisasi tersebut yang saya tau dan pernah dengar mungkin sebatas organisasi Triad, Mafia dan Ku Klux Klan.
Lalu apa yang jadi tolak ukur organisasi tersebut dikatakan terlarang? Yaitu misi organisasi tersebut ketika dibentuk : seluruh bangsa dibuat menjadi budak dalam "satu pemerintahan dunia". Perang dunia sengaja mereka ciptakan, konflik antar etnis, premanisme dan terorisme hingga virus HIV AIDS demi menghemat amunisi dan bubuk mesiu.
deretan organisasi-organisasi tersebut adalah :
1. The Assasin/Hashhasin/Nizariyah
2. The Bilderbergers
3. The Bohemian Club
4. The Club of Rome
5. Council on Foreign Relations (CFR)
6. Essex Junto
7. Freemasonry
8. The Golden Dawn
9. The Illuminati
10. Knight Templar
11. Ku Klux Klan
12. Mafia
13. Majestik-12 The Abiary and The Aquarium
14. Mensur
15. Opus Dei
16. The Order of Skull and Bones
17. Sionus Prioratus
18. The Rosicrucians
19. The Round Table
20. Triad
21. Trilateral Commision
Dari sederet organisasi tersebut yang paling menarik perhatian saya adalah The Club of Rome. Why??? because..(halah) karena menurut buku ini organisasi tersebut adalah organisasi yang menciptakan virus HIV AIDS!!! Pendapat tersebut dikuatkan oleh beberapa sumber informasi bahwa AIDS adalah virus buatan manusia yang sengaja dikembangbiakkan oleh The Club of Rome melalui para penguasa elit dunia, yaitu CIA dan jaringan Bilderbergers. Organisasi ini didirikan pada tahun 1968 dan merupakan salah satu organisasi terbesar di dunia. Ada yang menyebutnya komplotan elit rahasia yang berambisi menguasai dunia entah bagaimana caranya. Untuk menjalankan misi, mereka berkedok "kerja sama" yang didukung oleh kalangan elit dunia, Bank Dunia hingga Dana Moneter Internasional (IMF). Untuk Indonesia sendiri rasanya pernah menjadi "korban" IMF bukan..
Untuk kasus virus HIV AIDS sendiri sasaran pemusnahan penduduk melalui AIDS ini adalah kelompok masyarakat yang dianggap "tidak layak" untuk hidup seperti ras kulit hitam, hispanik hingga homoseksual. Tetapi nyatanya menular kepada orang-orang diluar konteks tersebut. Proyek pengembangbiakkan AIDS diberi nama MK-NAOMI. Benua Afrika terinfeksi AIDS melalui vaksin cacar tahun 1977, penduduk Amerika Serikat terinfeksi tahun 1978 melalui vaksin Hepatitis B di pusat kontrol penyakit dan Bank Darah New York. Hingga akhirnya virus tersebut menyebar ke seluruh benua dan negara.
Ternyata eh ternyata..sejahat-jahatnya seseorang pasti masih ada yang lebih jahat lagi yaitu "Iblis".
I LOVE C.E.G.E.R
