Menampilkan Bill Gates di komputer kamu

Tau kan yang namanya Bill Gates?? , betulllllll dia itu seorang pendiri dari MICROSOFT (Os yg kebanyakan org pake, termasuk kamu kan??).

Nah kalo kamu pengen wajah Bill Gates nampang di PC or laptop kamu, cobain aplikasi billeyes.  Dengan aplikasi ini, akan muncul karikatur kepala Bill Gates dan yang menariknya tampilan tersebut bukan tampilan biasa, karena bola mata bill gates akan mengikuti kursor mouse kita kemanapun itu.

Contoh penampakannya :

Nah buat yang pengen nyoba silahkan sedot filenya disini.

Trus jalanin file .exe nya.

Read More

Menggabungkan listview dengan combobox di VB 6

Suatu ketika saya di beri job oleh atasan untuk membuat sebuah aplikasi yang cara pengunaanya nanti oleh user hanya tinggal klik pada daftar data yang tampil. Saya pikir itu gampang makanya langsung saya katakan "ok pak". Dan 3 hari program pun selesai dan saya presentasikan.  Namun saat presentasi ada request pada tampilan data (saya pake listview) yang akan di klik terdapat pilihan dengan combobox karena aktual data lapangan seperti itu (terdapat beberapa pertimbangan untuk memilih data).

Listview dengan combo box???? langsung itu yang terlintas dipikiran saya, agak susah karena pada listview tidak ada fasilitas menampilkan combobox. saya pikir jika saya ganti ke datagrid bakal lama lagi trus data grid gak serapih listview tampilannya. Coba otak-atik program dan alhamdulillah akhirnya ketemu caranya.

Sekedar primbon pribadi aja, berikut saya tuliskan caranya:

- Buat desain form seperti berikut

- Kemudian tuliskan kode berikut untuk mengisi listview ( lebih bagus ngambil data dari database), saya contohkan sebagai berikut agar lebih cepat mengisinya (tanpa harus konek ke database dulu)

Private Sub Form_Load()
Dim i As Integer
Dim myList As ListItem

For i = 1 To 10
Set myList = Me.ListView1.ListItems.Add
myList.SubItems(1) = "Ini Kolom Ke2 Baris " & i
myList.SubItems(2) = "Ini Kolom Ke3 Baris " & i
myList.SubItems(3) = "Ini Kolom Ke4 Baris " & i
myList.SubItems(4) = "Ini Kolom Ke5 Baris " & i
Next
End Sub

- Kemudian kita buat fungsi untuk mendapatkan ukuran dan letak listview agar sesuai dengan 
   combobox

Function GetKolom(x!) As Long
Dim TempLebar() As Single
Dim TempBatasAwal() As Single
Dim TempBatasAkhir() As Single

Dim Lebar As Single
Dim i As Integer
Dim X1!, X2!

ReDim Preserve TempLebar(0)

TempLebar(0) = 0

For i = 1 To Me.ListView1.ColumnHeaders.Count
ReDim Preserve TempLebar(i)
ReDim Preserve TempBatasAwal(i)
ReDim Preserve TempBatasAkhir(i)

TempLebar(i) = Me.ListView1.ColumnHeaders(i).Width
Lebar = Lebar + TempLebar(i)
TempBatasAwal(i) = Lebar - TempLebar(i) + 1
TempBatasAkhir(i) = Lebar - 1
Next

For i = 1 To Me.ListView1.ColumnHeaders.Count
If x >= TempBatasAwal(i) And x <= TempBatasAkhir(i) Then
GetKolom = i
Exit For
End If
Next
End Function

Function Baris() As Long
Baris = Me.ListView1.ListItems(ListView1.SelectedItem.Index).Index
End Function

- Lalu buat fungsi yang tujuannya agar saat kolom listview di klik, maka akan tampil   

   combobox pada baris tersebut

Sub EditList()
On Error Resume Next
Dim myList As ListItem
Set myList = Me.ListView1.SelectedItem
If myList Is Nothing Then Exit Sub
Me.Combo1.Visible = False
With Me.ListView1
Me.Combo1.Left = .Left + .ColumnHeaders(Kolom).Left + 130
Me.Combo1.Top = .Top + myList.Top + 70
Me.Combo1.Width = .ColumnHeaders(Kolom).Width - 50
If Kolom > 1 Then
Me.Combo1.Text = myList.SubItems(Kolom - 1)
Else
Me.Combo1.Text = myList.Text
End If
Me.Combo1.Visible = True
Me.Combo1.SetFocus
End With
End Sub

-Panggil fungsi -fungsi diatas dengan menuliskan kode berikut:

Private Sub ListView1_Mouseup(Button As Integer, _
Shift As Integer, x As Single, y As Single)
Kolom = GetKolom(x)
EditList
End Sub

- Tuliskan kode berikut untuk menjadikan isi listview berubah sesuai text pada combobox yang kita pilih

Private Sub Combo1_Click()
Set myList = Me.ListView1.ListItems(Baris())

If Kolom > 1 Then
myList.SubItems(Kolom - 1) = Me.Combo1.Text
Else
myList.Text = Me.Combo1.Text
End If
End Sub

Private Sub Combo1_GotFocus()
With Me.Combo1
.SelStart = 0
.SelLength = Len(.Text)
End With
End Sub

Private Sub Combo1_KeyPress(KeyAscii As Integer)
If (KeyAscii = 13) Then
Combo1.Visible = False
End If
End Sub

- Selesai,,,,,,,,, dan tampilannya seperti berikut:

*) o ya,  comboboxnya saya isi manual datanya (implementasinya seh bisa dari database), terus visible=false
==== Kalo kurang jelas silahkan tinggalkan pesan di kotak komentar,,,

Read More

staff IT bukanlah staff serabutan / staff biasa

Dulu awal jadi Kuli  IT (hehehe,,,) rasanya aneh, bingung campur aduk lah.... ko semua trouble lari ke IT?? IT  kan bukan superman,,,
Tapi takdir menyatakan kalau mereka (para pekerja IT) adalah Superman, Superman disini maksudnya manusia yang memiliki kemampuan super dan tidak seperti orang pada umumnya, bahkan ada beberapa yang menyadari kalau mereka adalah Superman sampai² password mereka pun “sup3rm4n” tanpa tanda petik .  Mengapa mereka (pekerja IT) dikatakan Superman? Karena pekerjaan dan skill mereka yang melebihi batas manusia normal di sekitar mereka. Dan pekerjaan mereka pun sangat vital, beragam, pengetahuan dan skill mereka pun harus 500 kali lebih luas dari sekeliling mereka. Tapi Nasib pekerja IT di Indonesia sama dengan nasib para orang-orang jenius dan juga profesor di Indonesia. Kadang kala mereka tidak di anggap penting, dilupakan dan tidak di apresiasi dengan baik. Job desc saya juga gak jelas menyebabkan posisi sebagai staff IT ini jadi lebih mirip Staff Serabutan yang menangani lebih dari 1 pekerjaan diluar IT

sebagai seorang Superman (hehehe...) mau ga mau harus bisa menyelesaikan permasalahan, dan kalau salah satu saja ngga bisa atau bahkan ga tau sama sekali, seorang pekerja IT itu ga akan diakui sebagai orang yg bisa mengoperasikan komputer dengan baik, padahal waktu kuliah dulu ga seabreg itu pelajaran yang kita dapat,,

takdir juga mengharuskan Kuli IT harus terus belajar mengikuti perubahan teknologi, klo ga ya tinggal menunggu cap IT abal-abal....

Contoh yang harus saya minimal bisa ketika jadi kuli IT adlah :

1. Menguasai dan paham semua Operating System dengan detail.

2. Menguasai html, php, ajax, mysql, database dengan baik

3. Menguasai server

4. Menguasai jaringan (install, troubleshooting)

5. Troubleshooting hardware dan software

6. Mengetahui semua harga hardware (update kurs include)  " dah kaya tukang jualan za,,,,

7. Mengetahui semua harga laptop (update kurs include) " idem sama yang diatas,,, wkwkwkwk

8. Mengetahui spesifikasi semua merek laptop tanpa kecuali

9. Mengetahui kekurangan dan kelebihan semua produk komputer tanpa kecuali (include merk)

10. Mengetahui segala jenis perkembangan komputer dan semua hal yg berkaitan dengannya (include past and present)

11.Menguasai semua jenis handphone dan cara pengoperasiannya, Mampu setting semua jenis handphone ( GPRS, MMS, email, etc), Mampu reparasi semua jenis handphone

       (nah lo,,, emang ada ilmunya waktu Kuliah???)

12. Menguasai desain grafis dan semua softwarenya (Corel, Photoshop, 3dmax, etc)

13. Menguasai semua software sound editing

14. Menguasai semua software video editing

15. Menguasai semua software antivirus

16. Mampu menjinakkan semua jenis virus

17. Mampu menguasai dengan baik semua jenis software yang ada di dunia ini tanpa kecuali (ingat! semua software!)

18. Mampu reparasi monitor

19. Mampu reparasi printer

Dan ini yang lebih aneh lagi,,,, 

20. Mampu reparasi semua benda elektronik

21. Mampu reparasi semua benda yg rusak

22. Mampu bersosialisasi dengan baik

23. Mampu kendalikan emosi saat semuanya kacau

24. Mampu tidak tidur sampai waktu yg tidak ditentukan

25. Minimal mengetahui segala sesuatu di luar bidang IT tanpa kecuali

26. Memiliki jiwa besar untuk memberi bantuan seikhlasnya ketika perangkat pribadi rekan kerja rusak 

Yah.. memang tidak mudah untuk menjadi seorang pekerja IT, harus benar benar menjadi superman, kalo perempuan berarti harus menjadi wonder woman.     Tapi tetap semangat para pekerja IT Indonesia!! ayo pada bangun Indonesia menuju teknologi yang lebih maju dan berjuang demi kemakmuran pekerja IT.  

haruskah kita idealis agar ilmu yang saya miliki dihargai dengan sepantasnya., staff IT bukanlah staff serabutan staff biasa…

Read More

Coba sharing internet via router ah....

Kali ini saya coba berbagi masalah koneksi jaringan, cuma sekedar berbagi pengalaman buat temen-temen yang mau belajar sharing internet via router...
Cara ini diperuntukan untuk pemula dan saya harap dapat membantu untuk share koneksi internet dengan cara yang semudah mungkin.
Cara share internet dengan router
ada 2 skema untuk share internet dengan router
1. cable modem + switch + router (semua sudah ada dalam 1 alat)
2. cable modem –> switch + router (modem tidak dilengkapi dengan router + switch)

cara 1:
alat yang di butuhkan
- 1 buah cable modem gateway switch router, contoh : Wireless-G Cable Gateway WCG200
- 4 kabel LAN (RJ45) yang di Straight, panjangnya bisa di sesuaikan dengan jarak modem ke router dan jarak router ke komputer.

pasang jaringan anda :
1. Hubungkan kable tv
2. Hubungkan power
3. Sambungkan port ke LAN card yang ada di komputer.

configurasi hampir sama dengan nomor 2

cara 2:
alat yang di butuhkan
- 1 buah cable modem (contoh: Cable Modem with USB and Ethernet Connections BEFCMU10)
- 1 buah switch router 4 port (contoh: Wireless-G Broadband Router WRT54G)
- 5 kable LAN (RJ45) yang di Straight, panjangnya bisa di sesuaikan dengan jarak modem ke router dan jarak router ke komputer.

pasang jaringan anda :
1. Hubungkan kable tv ke cable modem
2. Hubungkan power
3. Hubungkan kabel LAN (RJ45) dari cable modem ke router sesuai gambar
4. Sambungkan port ke LAN card yang ada di komputer.

selesai untuk pasang jaringannya. dengan settingan standar biasanya jaringan internal (jaringan rumah yg tidak konek ke internet) sudah bisa jalan, untuk wirelessnya bisa langsung di detect, biasanya SSID = linksys. ini masih untuk internal di dalam rumah, belum untuk internetnya ya.

Konfigurasi standar tidak bisa langsung konek ke internet, ini karena kebanyakan ISP mendetek MAC tiap LAN card. jadi harus clone MAC LAN card nya dulu baru internetnya bisa jalan.

Berikut ini adalah konfigurasi router, secara keseluruhan ini adalah konfigurasi default dari router. Yang tidak default hanya pada bagian clone MAC address (supaya bisa share internetnya).

Configurasi router

buka web browser anda (bisa Internet Explorer atau firefox atau browser yang lain) masukan address router http://192.168.1.1 , kalau error, coba masukan http://192.168.0.1

username: none(kosong), password: admin

A. Setup – MAC Address Clone
Enable -> masukan MAC LAN card/USB komputer pertama yang di pakai untuk internet (pastikan pertama kali anda mengunakan LAN card atau USB).

Note : untuk mudahnya browse configurasi router ini dengan komputer pertama yang terhubung ke internet. jadi tinggal ‘Clone Your PC MAC’. (hanya bisa dilakukan bila konek ke internet pertama kali melalui LAN card, bila memakai USB anda harus memasukanMAC address USB tersebut secara manual)

kenapa MAC perlu di clone? karena beberapa ISP mencatat MAC LAN card yang di pakai untuk terhubung ke internet. kalau MAC nya tidak di clone maka MAC nya akan lain dengan yang tercatat oleh ISP sehingga tidak akan mendapatkan IP dari DHCP server. karena di anggap berbeda.

B. Setup – Basic Setup
Internet Setup
pilih yang Automatic Configuration – DHCP,

Network Setup
Router IP 192.168.1.1
Network Address Server Settings (DHCP) 
C. Wireless – Basic Wireless Settings
Wireless Network
Wireless Network Mode : mixed
Wireless Network Name (SSID) : network name yang mau di pakai untuk jaringan WLAN(Wireless LAN) anda, contoh SSID: mywlantest
Wireless Channel: channel yang mau dipakai WLAN anda, default saja dulu
Wireless SSID Broadcast : network namenya di sebarkan atau tidak, untuk sementara di enabled saja dulu (recomended :setelah bisa konek dengan sukses sebaiknya di disable agar tetangga anda tidak mendeteksi network anda)

D. Wireless – Wireless Security
Security Mode : disabled (recomended pake WPA seandainya jaringan anda sudah jalan).

Konfigurasi Komputer Anda
Start -> Settings -> Control Panels -> Network Connections
Klik kanan -> Properties (pada Local Area Connection)
pada Tab -> general
cari This connection use the following items -> Internet Protocol [TCP/IP]
klik properties -> pada tab general pilih obtain an iP address automaticaly
note : artinya IP didapat dari DHCP server, yaitu router WRT54G.

note: cara setting bisa di lihat di internet atau di buka manual. ini adalah settingan standar supaya jaringan terbentuk dan bisa sharing internet. settingan kebanyakan DHCP. Kalau sudah bisa maka bisa di coba2 settingan yang lain, contohnya static ip, WPA key untuk WLAN, dsb.

Ringkasan konfigurasi Router :
semua configurasi/settingan router hampir sama, hanya ada perbedaan sedikit atau perbedaan letak saja.

biasanya yang standar
router setting
alamat webnya http://192.168.1.1 atau http://192.168.0.1
username, password tergantung tipe nya

Mac clone : clone MAC komputer yang pernah di pakai ke internet.

Internet Setup : Automatic Configuration – DHCP,

Network Setup
Router IP 192.168.1.1
Network Address Server Settings (DHCP)

Read More

Mitos Duplikat Konten

Yup Teknik Copy dan PAste..mengisi blog anda bahkan lebih mudah daripada merebut permen dari tangan anak kecil…
saya lihat banyak sekali blog berisikan artikel yang isinya COPAS.  dan COPAS nya juga mentah mentah.. tak di edit sedikitpun.
Lalu apakah ini suatu perbuatan tercela ??? saya sendiri mah terserah Jika artikel saya di COPAS. asal cantumin nama sumbernya ajah. heheeh :)

lalu bagai mana dengan Bang Gugel yang katanya BEnci dengan konten yang kopas. KATANYA sekali lagi nih saya ulangi KATANYA.. konten blog yang copas bs kena penalty gugel.. bener gak si???
Saya sendiri mempunyai 1 blog dummy yang mendukung website utama saya. di mana Blog dummy ini 100% COPAS alias SAma persis dengan sumber… Terkena penalty??? Tampaknya tidak. bahkan beberapa artikel malah di halaman 1 dan urutan 1.. Saya memang COpas untuk artikelnya.. tetapi untuk judulnya sendiri saya menggunakan judul blog yang sudah saya optimasi pemilihankata kuncinya… PENALTY?? TIDAK
saya sendiri merasakan lebih dari satu tahun blog tersebut berisi ribuan artikel yang benar benar COPAS.. dan malah menduduki peringkat depan gugel… contoh nya bukan saya sendiri … banyak blog dummy teman saya yang isinya COPAS juga menduduki halaman 1 gugel.
bahkan teman saya ini lebih edan lagi 7 BLOG dummy yang isinya 100% copas, yang membuat perbedaan hanya di judul nya saja.
lalu apakah penali dari gugel adalah kenyataan? menurut saya si ini mungkin saja isu yang di buat agar tidak terjadi pencurian konten. dan mungkin isu ini juga yang membuat para pembuat software article rewriter bisa menjual barangnya.
namun teknik COPAS ini saya belum coba di adsense site.. menurut rumor yang beredar si akun google adsense kita bs di ban gara gara artikel kita COPAS.
lalu bagai mana dengan anda? MAsih kah anda Mng COPAS artikel?
Kalau anda masih melakukan kegiatan ini biasakan menyertakan sumber dan beri live link ke sumber artikel tersebut. biar terjadi win  win solution  lah. anda dapet artikel yang sumbernya dapet backlink… :)
menurut anda sendiri apakah anda seorang blogger yang kontenya COPAS?

Sumber Menulis Mitos Duplikat Konten

Read More