Welcome to

Musim Hujan

2008-12-16T23:35:00.000-08:00

Lebaran

2008-09-30T09:14:00.001-07:00

Tak selamanya mata memandang dengan ramah, hati menilai dengan jernih, dan mulut bicara dengan santun.Hari ini kuucapkan MET HARI RAYA IDUL FITRI, MOHON MAAF LAHIR BATIN.

LEBARAN Uey

2008-09-30T09:00:00.000-07:00

MUDIK - MUDIK
kasian temenku udah malem lebaran g bisa pulang yahhhh akhirnya nongkronglah di tepi pantai nan sunyi,,,,,,,

hmmmmm.........btw kasian juga ke habisan tiket mau pulang selamat jalan dan met PULKAM temenku ..,. smoga kelak kita bertemu kembali.

Lek Endang Balik yo......hahahahahaha

Kisah Nyata...Tujuh kali naik Haji tidak bisa melihat Ka'bah

2008-09-26T20:30:00.000-07:00

Sebagai seorang anak yang berbakti kepada orang tuanya, Hasan (bukan nama sebenarnya), mengajak ibunya untuk menunaikan rukun Islam yang kelima.
Sarah (juga bukan nama sebenarnya), sang Ibu, tentu senang denganajakananaknya itu. Sebagai muslim yang mampu secara materi, mereka memang berkewajiban menunaikan ibadah Haji.

Segala perlengkapan sudah disiapkan. Singkatnya ibu anak-anak ini akhirnya berangkat ke tanah suci. Kondisi keduanya sehat wal afiat, tak kurang satu apapun. Tiba harinya mereka melakukan thawaf dengan hati dan niat ikhlas menyeru panggilan Allah, Tuhan Semesta Alam. "Labaik allahuma labaik, aku datang memenuhi seruanMu ya Allah".

Hasan menggandeng ibunya dan berbisik, "Ummi undzur ila Ka'bah (Bu, lihatlah Ka'bah)." Hasan menunjuk kepada bangunan empat persegi berwarna hitam itu.

Ibunya yang berjalan di sisi anaknya tak beraksi, ia terdiam. Perempuan itu sama sekali tidak melihat apa yang ditunjukkan oleh anaknya.Hasan kembali membisiki ibunya. Ia tampak bingung melihat raut wajah ibunya. Di wajah ibunya tampak kebingungan. Ibunya sendiri tak mengerti mengapa ia tak bisa melihat apapun selain kegelapan. beberapakali ia mengusap-usap
matanya, tetapi kembali yang tampak hanyalah kegelapan.

Padahal, tak ada masalah dengan kesehatan matanya. Beberapa menit yang lalu ia masih melihat segalanya dengan jelas, tapi mengapa memasuki Masjidil Haram segalanya menjadi gelap gulita. Tujuh kali Haji Anak yang sholeh itu bersimpuh di hadapan Allah. Ia shalat memohon ampunan-Nya. Hati Hasan begitu sedih. Siapapun yang datang ke Baitulah, mengharap rahmatNYA. Terasa hampa menjadi tamu Allah, tanpa menyaksikan segala kebesaran-Nya, tanpa merasakan kuasa-Nya dan juga rahmat-Nya. Hasan tidak berkecil hati, mungkin dengan ibadah dan taubatnya yang sungguh-sungguh, Ibundanya akan dapat merasakan anugrah-Nya, dengan menatap Ka'bah, kelak. Anak yang saleh itu berniat akan kmebali membawa ibunya berhaji tahun depan. Ternyata nasib baik belum berpihak kepadanya.

Tahun berikutnya kejadian serupa terulang lagi. Ibunya kembali dibutakan di dekat Ka'bah, sehingga tak dapat menyaksikan bangunan yang merupakan symbol persatuan umat Islam itu... Wanita itu tidak bisa melihat Ka'bah. Hasan tidak patah arang.. Ia kembali membawa ibunya ke tanah suci tahun berikutnya.
Anehnya, ibunya tetap saja tak dapat melihat Ka'bah. Setiap berada di Masjidil Haram, yang tampak di matanya hanyalah gelap dan gelap. Begitulah keganjilan yang terjadi pada diri Sarah.. hingga kejadian itu berulang Sampai tujuh kali menunaikan ibadah haji.

Hasan tak habis pikir, ia tak mengerti, apa yang menyebabkan ibunya menjadi buta di depan Ka'bah. Padahal, setiap berada jauh dari Ka'bah, penglihatannya selalu normal. Ia bertanya-tanya, apakah ibunya punya kesalahan sehingga mendapat azab dari Allah SWT ?. Apa yang telah diperbuat ibunya, sehingga mendapat musibah seperti itu ? Segala pertanyaan
berkecamuk dalam dirinya. Akhirnya diputuskannya untuk mencari seorang alim ulama, yang dapat membantu permasalahannya.

Beberapa saat kemudian ia mendengar ada seorang ulama yang terkenal Karena kesholehannya dan kebaikannya di Abu Dhabi (Uni Emirat). Tanpa kesulitan berarti, Hasan dapat bertemu dengan ulama yang dimaksud.

Ia pun mengutarakan masalah kepada ulama yang saleh ini. Ulama itu mendengarkan dengan seksama, kemudian meminta agar Ibu dari hasan mau menelponnya. anak yang berbakti ini pun pulang. Setibanya di tanah kelahirannya, ia meminta ibunya untuk menghubungi ulama di Abu Dhabi tersebut. Beruntung, sang Ibu mau memenuhi permintaan anaknya. Ia pun mau
menelpon ulama itu, dan menceritakan kembali peristiwa yang dialaminya di tanah suci. Ulama itu kemudian meminta Sarah introspeksi, mengingat kembali, mungkin ada perbuatan atau peristiwa yang terjadi padanya di masa lalu, sehingga ia tidak mendapat rahmat Allah. Sarah diminta untuk bersikap terbuka, mengatakan dengan jujur, apa yang telah dilakukannya.

"Anda harus berterus terang kepada saya, karena masalah Anda bukan masalah sepele," kata ulama itu pada Sarah. Sarah terdiam sejenak. Kemudian ia meminta waktu untuk memikirkannya. Tujuh hari berlalu, akan tetapi ulama itu tidak mendapat kabar dari Sarah. Pada minggu kedua setelah percakapan pertama mereka, akhirnya Sarah menelpon. "Ustad, waktu masih muda, saya bekerja sebagai perawat di rumah sakit," cerita Sarah akhirnya. "Oh,
bagus.....Pekerjaan perawat adalah pekerjaan mulia," potong ulama itu...

"Tapi saya mencari uang sebanyak-banyaknya dengan berbagai cara, tidak peduli, apakah cara saya itu halal atau haram," ungkapnya terus terang. Ulama itu terperangah. Ia tidak menyangka wanita itu akan berkata demikian. "Disana...." sambung Sarah, "Saya sering kali menukar bayi, karena tidak semua ibu senang dengan bayi yang telah dilahirkan. Kalau ada yang
menginginkan anak laki-laki, padahal bayi yang dilahirkannya perempuan, dengan imbalan uang, saya tukar bayi-bayi itu sesuai dengan keinginan mereka."

Ulama tersebut amat terkejut mendengar penjelasan Sarah. "Astagfirullah. ....." betapa tega wanita itu menyakiti hati para ibu yang diberi amanah Allah untuk melahirkan anak. bayangkan, betapa banyak keluarga yang telah dirusaknya, sehingga tidak jelas nasabnya.

Apakah Sarah tidak tahu, bahwa dalam Islam menjaga nasab atau keturunan sangat penting.

Jika seorang bayi ditukar, tentu nasabnya menjadi tidak jelas. Padahal,nasab ini sangat menentukan dalam perkawinan, terutama dalam masalah mahram atau muhrim, yaitu orang-orang yang tidak boleh dinikahi.

"Cuma itu yang saya lakukan," ucap Sarah. "Cuma itu ?" tanya ulama terperangah. "Tahukah anda bahwa perbuatan Anda itu dosa yang luar biasa, betapa banyak keluarga yang sudah Anda hancurkan !". ucap ulama dengan nada tinggi.

"Lalu apa lagi yang Anda kerjakan ?" tanya ulama itu lagi sedikit kesal. "Di rumah sakit, saya juga melakukan tugas memandikan orang mati." "Oh bagus, itu juga pekerjaan mulia," kata ulama. "Ya, tapi saya memandikan orang mati karena ada kerja sama dengan tukang sihir."
"Maksudnya ?". tanya ulama tidak mengerti. "Setiap saya bermaksud menyengsarakan orang, baik membuatnya mati atau sakit, segala perkakas sihir itu sesuai dengan syaratnya, harus dipendam di dalam tanah. Akan tetapi saya tidak menguburnya di dalam tanah, melainkan saya masukkan benda-benda itu ke dalam mulut orang yang mati."

"Suatu kali, pernah seorang alim meninggal dunia. Seperti biasa, saya memasukkan berbagai barang-barang tenung seperti jarum, benang dan lain-lain ke dalam mulutnya. Entah mengapa benda-benda itu seperti terpental, tidak mau masuk, walaupun saya sudah menekannya dalam-dalam. Benda-benda itu selalu kembali keluar. Saya coba lagi begitu seterusnya berulang-ulang.
Akhirnya, emosi saya memuncak, saya masukkan benda itu dan saya jahit mulutnya. Cuma itu dosa yang saya lakukan." Mendengar penuturan Sarah yang datar dan tanpa rasa dosa, ulama itu berteriak marah. "Cuma itu yang kamu lakukan ?". "Masya Allah....!!! Saya tidak bisa
bantu anda. Saya angkat tangan". Ulama itu amat sangat terkejutnya mengetahui perbuatan Sarah. Tidak pernah terbayang dalam hidupnya ada seorang manusia, apalagi ia adalah wanita,
yang memiliki nurani begitu tega, begitu keji. Tidak pernah terjadi dalam hidupnya, ada wanita yang melakukan perbuatan sekeji itu. Akhirnya ulama itu berkata, "Anda harus memohon ampun kepada Allah, karena hanya Dialah yang bisa mengampuni dosa Anda."

Bumi menolaknya. Setelah beberapa lama, sekitar tujuh hari kemudian ulama tidak mendengar kabar selanjutnya dari Sarah. Akhirnya ia mencari tahu dengan menghubunginya melalui telepon. Ia berharap Sarah telah bertobat atas segala yang telah diperbuatnya. Ia berharap Allah akan mengampuni dosa Sarah, sehingga Rahmat Allah datang kepadanya. Karena tak juga
memperoleh kabar, ulama itu menghubungi keluarga Hasan di mesir. Kebetulan yang menerima telepon adalah Hasan sendiri. Ulama menanyakan kabar Sarah, ternyata kabar duka yang diterima ulama itu.

"Ummi sudah meninggal dua hari setelah menelpon ustad," ujar Hasan. Ulama itu terkejut mendengar kabar tersebut. "Bagaimana ibumu meninggal, Hasan ?". tanya ulama itu. Hasanpun akhirnya bercerita :

Setelah menelpon sang ulama, dua hari kemudian ibunya jatuh sakit dan meninggal dunia. Yang mengejutkan adalah peristiwa penguburan Sarah. Ketika tanah sudah digali, untuk kemudian dimasukkan jenazah atas ijin Allah, tanah itu rapat kembali, tertutup dan mengeras. Para penggali mencari lokasi lain untuk digali. Peristiwa itu terulang kembali. Tanah yang sudah
digali kembali menyempit dan tertutup rapat. Peristiwa itu berlangsung begitu cepat, sehingga tidak seorangpun pengantar jenazah yang menyadari bahwa tanah itu kembali rapat. Peristiwa itu terjadi berulang-ulang. Para pengantar yang menyaksikan peristiwa itu merasa ngeri dan
merasakan sesuatu yang aneh terjadi. Mereka yakin, kejadian tersebut pastilah berkaitan dengan perbuatan si mayit. Waktu terus berlalu, para penggali kubur putus asa dan kecapaian karena pekerjaan mereka tak juga usai. Siangpun berlalu, petang menjelang, bahkan sampai hampir maghrib, tidak ada satupun lubang yang berhasil digali. Mereka akhirnya pasrah, dan beranjak pulang. Jenazah itu dibiarkan saja tergeletak di hamparan tanah kering kerontang. Sebagai anak yang begitu sayang dan hormat kepada ibunya, Hasan tidak tega meninggalkan jenazah orang tuanya ditempat itu tanpa dikubur. Kalaupun dibawa pulang, rasanya tidak mungkin. Hasan termenung di tanah perkuburan seorang diri.. Dengan ijin Allah, tiba-tiba berdiri seorang laki-laki yang berpakaian hitam panjang, seperti pakaian khusus orang Mesir. Lelaki itu tidak tampak wajahnya, karena terhalang tutup kepalanya yang menjorok ke depan. Laki-laki itu mendekati Hasan kemudian berkata padanya," Biar aku tangani jenazah ibumu, pulanglah!". kata orang itu. Hasan lega mendengar bantuan orang tersebut, Ia berharap laki-laki itu akan menunggu jenazah ibunya. Syukur-syukur mau menggali lubang untuk kemudian mengebumikan ibunya. "Aku minta supaya kau jangan menengok ke belekang,sampai tiba di rumahmu, "pesan lelaki itu. Hasan mengangguk, kemudian ia meninggalkan pemakaman. Belum sempat ia di luar lokasi pemakaman, terbersit keinginannya untuk mengetahui apa yang terjadi dengan kenazah ibunya. Sedetik kemudian ia menengok ke belakang. Betapa pucat wajah Hasan,
melihat jenazah ibunya sudah dililit api, kemudian api itu menyelimuti seluruhtubuh ibunya. Belum habis rasa herannya, sedetik kemudian dari arah yang berlawanan, api menerpa wajah Hasan. Hasan ketakutan. Dengan langkah seribu, ia pun bergegas meninggalkan tempat itu.

Demikian yang diceritakan Hasan kepada ulama itu. Hasan juga mengaku, bahwa separuh wajahnya yang tertampar api itu kini berbekas kehitaman karena terbakar. Ulama itu mendengarkan dengan seksama semua cerita yang diungkapkan Hasan. Ia menyarankan, agar Hasan segera beribadah dengan khusyuk dan meminta ampun atas segala perbuatan atau dosa-dosa yang pernah dilakukan oleh ibunya. Akan tetapi, ulama itu tidak menceritakan kepada Hasan, apa yang telah diceritakan oleh ibunya kepada ulama itu.
Ulama itu meyakinkan Hasan, bahwa apabila anak yang soleh itu memohon ampun dengan sungguh-sungguh, maka bekas luka di pipinya dengan ijin Allah akan hilang. Benar saja, tak berapa lama kemudian Hasan kembali mengabari ulama itu, bahwa lukanya yang dulu amat terasa sakit dan panas luar biasa, semakin hari bekas kehitaman hilang. Tanpa tahu apa yang telah dilakukan ibunya selama hidup, Hasan tetap mendoakan ibunya. Ia berharap, apapun
perbuatan dosa yang telah dilakukan oleh ibunya, akan diampuni oleh Allah SWT.

Semoga kisah nyata dari Mesir ini bisa menjadi pelajaran bagi kita semua. Uang Rp 50.000 atau S$50 kelihatan begitu besar bila dibawa ke kotak derma masjid, tetapi begitu kecil bila kita bawa ke supermarket. .. 45 menit terasa gampang kita habiskan.selain itu terlalu lama untuk berzikir tapi betapa pendeknya waktu itu untuk pertandingan bola sepak..berkumpul bersama sahabat,dugem dll, Semua insan ingin memasuki syurga tetapi tidak banyak yang berfikir dan berbicara tentang bagaimana untuk memasukinya.
Kita mengirimkan ribuan 'jokes' dan 'suratberantai' yg penuh maksiat melalui e-mail tetapi bila! mengirimkan yang berkaitan dengan ibadah seringkali berfikir 2 atau 3 kali.
OLEH ITU JANGAN BIARKAN DIRI KITA INI MENJADI SEBAHAGIAN DARI KELUCUAN ini TERSEBUT, INSYA'ALLAH. Wassalamualaikum Wr.Wb.

MALAM LAILATUL QADAR

2008-09-07T08:59:00.000-07:00

Oleh :
Syaikh Salim bin 'Ied
Al-Hilaaly
Syaikh Ali Hasan Ali Abdul Hamid

Keutamaannya sangat besar, karena malam ini menyaksikan turunnya Al-Qur'an yang membimbing orang-orang yang berpegang dengannya ke jalan kemuliaan dan mengangkatnya ke derajat yang mulia dan abadi. Umat Islam yang mengikuti sunnah Rasulnya tidak memasang tanda-tanda tertentu dan tidak pula menancapkan anak-anak panah untuk memperingati malam ini, akan tetapi mereka berloma-lomba untuk bangun di malam harinya dengan penuh iman dan mengharap pahala dari Allah.
Inilah wahai saudaraku muslim, ayat-ayat Qur'aniyah dan hadits-hadits nabawiyah yang shahih menjelaskan tentang malam tersebut.

1. Keutamaan Malam Lailatul Qadar Cukuplah untuk mengetahui tingginya kedudukan Lailatul Qadar dengan mengetahui bahwasanya malam itu lebih baik dari seribu bulan, Allah berfirman.
"Artinya : Sesungguhnya Kami menurunkan Al-Qur'an pada malam Lailatul Qadar,tahukah engkau apakah malam Lailatul Qadar itu ? Malam Lailatul Qadar itu lebih baik dari seribu bulan, pada malam itu turunlah melaikat-malaikat dan Jibril dengan izin Allah Tuhan mereka (untuk membawa) segala usrusan, selamatlah malam itu hingga terbit fajar" [Al-Qadar : 1-5]
Dan pada malam itu dijelaskan segala urusan yang penuh hikmah.
"Artinya : Sesungguhnya Kami menurunkannya pada suatu malam yang diberkahi dan sesungguhnya Kami-lah yang memberi peringatan. Pada malam itu dijelaskan segala urusan yang penuh hikmah, (yaitu) urusan yang besar dari sisi Kami. Sesungguhnya
Kami adalah Maha mendengar lagi Maha Mengetahui" [Ad-Dukhan : 3-6]

2. Waktunya
Diriwayatkan dari Nabi Shallallahu 'alaihi wa sallam bahwa malam tersebut terjadi pada tanggal malam 21,23,25,27,29 dan akhir malam bulan Ramadhan. [1]

Imam Syafi'i berkata : "Menurut pemahamanku. wallahu 'alam, Nabi Shallallahu 'alaihi wa sallam menjawab sesuai yang ditanyakan, ketika ditanyakan kepada beliau : "Apakah kami mencarinya di malam ini?", beliau menjawab : "Carilah di malam tersebut" [Sebagaimana dinukil Al-Baghawi dalam Syarhus Sunnah 6/386]

Pendapat yang paling kuat, terjadinya malam Lailatul Qadar itu pada malam terakhir bulan Ramadhan berdasarkan hadits Aisyah Radhiyallahu 'anha, dia berkata Rasulullah Shallallahu 'alaihi wa sallam beri'tikaf di sepuluh hari terkahir bulan Ramadhan dan beliau bersabda.
"Artinya : Carilah malam Lailatul Qadar di (malam ganjil) pada 10 hari terakhir bulan Ramadhan" [Hadits Riwayat Bukhari 4/225 dan Muslim 1169]

Jika seseorang merasa lemah atau tidak mampu, janganlah sampai terluput dari tujuh hari terakhir, karena riwayat dari Ibnu Umar, (dia berkata) : Rasulullah Shallallahu 'alaihi wa sallam bersabda.
"Artinya : Carilah di sepuluh hari terakhir, jika tidak mampu maka jangan sampai terluput tujuh hari sisanya" [Hadits Riwayat Bukhari 4/221 dan Muslim 1165]

"Artinya : Aku melihat mimpi kalian telah terjadi, barangsiapa yang mencarinya carilah pada tujuh hari terakhir" [Lihat Maraji' tadi] Telah diketahui dalam sunnah, pemberitahuan ini ada karena perdebatan parasahabat. Dari Ubadah bin Shamit Radhiyallahu 'anhu, ia berkata : Rasulullah Shallallahu 'alaihi wa sallam ke luar pada malam Lailatul Qadar, ada dua orang
sahabat berdebat, beliau bersabda. "Artinya : Aku keluar untuk mengkhabarkan kepada kalian tentang malam Lailatul Qadar, tapi ada dua orang berdebat hingga tidak bisa lagi diketahui kapannya mungkin ini lebih baik bagi kalian, carilah di malam 29. 27. 25
(dan dalam riwayat lain : tujuh, sembilan dan lima)" [Hadits Riwayat Bukhari 4/232] Telah banyak hadits yang mengis yaratkan bahwa malam Lailatul Qadar itu pada sepuluh hari terakhir, yang lainnya menegaskan, di malam ganjil sepuluh hari terakhir. Hadits yang pertama sifatnya umum sedang hadits kedua adalah khusus, maka riwayat yang khusus lebih diutamakan dari pada yang umum, dan telah banyak hadits yang lebih menerangkan bahwa malam Lailatul Qadar itu ada pada tujuh hari terakhir bulan Ramadhan, tetapi ini dibatasi kalau tidak mampu dan lemah, tidak ada masalah, dengan ini cocoklah hadits-hadits tersebut tidak saling
bertentangan, bahkan bersatu tidak terpisah.

Kesimpulannya
Jika seorang muslim mencari malam lailatul Qadar carilah pada malam ganjil sepuluh hari terakhir : 21, 23,25,27 dan 29. Kalau lemah dan tidak mampu mencari pada sepuluh hari terakhir, maka carilah pada malam ganjil tujuh hari terakhir yaitu 25,27 dan 29. Wallahu 'alam

3. Bagaimana Mencari Malam Lailatul Qadar.?
Sesungguhnya malam yang diberkahi ini, barangsiapa yang diharamkan untuk mendapatkannya, maka sungguh telah diharamkan seluruh kebaikan (baginya). Dan tidaklah diharamkan kebaikan itu, melainkan (bagi) orang yang diharamkan (untuk mendapatkannya). Oleh karena itu dianjurkan bagi muslimin (agar) bersemangat dalam berbuat ketaatan kepada Allah untuk menghidupkan malam Lailatul Qadar dengan penuh keimanan dan mengharapkan pahala-Nya yang besar, jika (telah) berbuat demikian (maka) akan diampuni Allah dosa-dosanya yang telah lalu. Rasulullah Shallallahu 'alaihi wa sallam bersabda.

"Artinya : Barang siapa berdiri (shalat) pada malam Lailatul Qadar dengan penuh keimanan dan mengharap pahala dari Allah, maka diampuni dosa-dosanya yang telah lalu" [Hadits Riwayat Bukhari 4/217 dan Muslim 759] Disunnahkan untuk memperbanyak do'a pada malam tersebut. Telah diriwayatkan dari Sayyidah Aisyah Radhiyallahu 'anha, (dia) berkata : "Aku bertanya, "Ya
Rasulullah ! Apa pendapatmu jika aku tahu kapan malam Lailatul Qadar (terjadi), apa yang harus aku ucapkan ?" Beliau menjawab, "Ucapkanlah : "Allahumma innaka 'afuwwun tuhibbul afwa fa'fu'annii" "Ya Allah Engkau Maha Pengampun dan mencintai orang yang meminta ampunan, maka ampunilah aku" [2] Saudaraku -semoga Allah memberkahimu dan memberi taufiq kepadamu untuk mentaati-Nya- engkau telah mengetahui bagaimana keadaan malam Lailatul Qadar (dan keutamaannya) maka bangunlah (untuk menegakkan shalat) pada sepuluh malam terakhir, menghidupkannya dengan ibadah dan menjauhi wanita, perintahkan kepada
isterimu dan keluargamu untuk itu, perbanyaklah perbuatan ketaatan.
Dari Aisyah Radhiyallahu 'anha.

"Artinya : Adalah Rasulullah Shallallahu 'alaihi wa sallam, apabila masuk pada sepuluh hari (terakhir bulan Ramadhan), beliau mengencanngkan kainnya[3] menghidupkan malamnya dan membangunkan keluarganya" [Hadits Riwayat Bukhari 4/233 dan Muslim 1174] Juga dari Aisyah, (dia berkata) :

"Artinya : Adalah Rasulullah Shallallahu 'alaihi wa sallam bersungguh-sungguh (beribadah apabila telah masuk) malam kesepuluh (terakhir) yang tidak pernah beliau lakukan pada malam-malam lainnya" [Hadits Riwayat Muslim 1174]

4. Tanda-Tandanya
Ketahuilah hamba yang taat -mudah-mudahan Allah menguatkanmu degan ruh dari-Nya dan membantu dengan pertolongan-Nya- sesungguhnya Rasulullah Shallallahu 'alaihi wa sallam menggambarkan paginya malam Lailatul Qadar agar seorang muslim mengetahuinya.

Dari 'Ubay Radhiyallahu 'anhu, ia berkata : Rasulullah Shallallahu 'alaihi wa
sallam bersabda.
"Artinya : Pagi hari malam Lailatul Qadar, matahari terbit tidak menyilaukan, seperti bejana hingga meninggi" [Hadits Riwayat Muslim 762] Dari Abu Hurairah, ia berkata : Kami menyebutkan malam Lailatul Qadar di sisi Rasulullah Shallallahu 'alaihi wa sallam beliau bersabda. "Artinya : Siapa di antara kalian yang ingat ketika terbit bulan seperti syiqi jafnah" [4] Dan dari Ibnu Abbas Radhiyallahu 'anhuma, ia berkata : Rasulullah Shallallahu 'alaihi wa sallam bersabda. "Artinya : (Malam) Lailatul Qadar adalah malam yang indah, cerah, tidak panas dan tidak juga dingin, (dan) keesokan harinya cahaya sinar mataharinya melemah kemerah-merahan" [Tahayalisi 349, Ibnu Khuzaimah 3/231, Bazzar 1/486, sanadnya Hasan]

Disalin dari Kitab Sifat Shaum Nabi Shallallahu 'alaihi wa Sallam Fii Ramadhan, edisi Indonesia Sipat Puasa Nabi Shallallahu 'alaihi wa sallam oleh Syaikh Salim bin Ied Al-Hilaaly, Syaikh Ali Hasan Abdul Hamid, terbitan Pustaka Al-Haura, penerjemah Abdurrahman Mubarak Ata.

Foote Note.
1.. Pendapat-pendapat yang ada dalam masalah ini berbeda-neda, Imam Al-Iraqi telah mengarang satu risalah khusus diberi judul Syarh Shadr Bidzikri Lailatul Qadar, membawakan perkataan para ulama dalam masalah ini, lihatlah...
2.. Hadits Riwayat Tirmidzi 3760, Ibnu Majah 3850 dari Aisyah, sanadnya Shahih. Lihat syarahnya Bughyatul Insan fi Wadhaifi Ramadhan hal. 55-57 karya Ibnu Rajab Al-Hambali.
3.. Menjauhi wanita (yaitu istri-istrinya) karena ibadah, menyingisngkan badanuntuk mencarinya
4.. Muslim 1170. Perkataan : "Syiqi jafnah" syiq artinya setengah, jafnah artinya bejana. Al-Qadhi 'Iyadh berkata : "Dalam hadits ini ada isyarat bahwa malam Lailatul Qadar hanya terjadi di akhir bulan, karena bulan tidak akan seperti demikian ketika terbit kecuali di akhir-akhir bulan".

Tips Ibadah di bulan Ramadhan

2008-09-05T12:22:00.000-07:00

Ibarat sebuah Sekolah, bulan Ramadhan merupakan sebuah sarana dan tempat untuk menempa diri. Tidak tanggung-tanggung didikan di bulan Ramadhan langsung dari sang Maha Pencipta. Kita, yang menjalankan puasa, sebagai “murid” tentunya ingin berhasil dan lulus dengan baik.

Berikut ini beberapa kiat yang dapat dilakukan agar kita menjadi “alumni” Ramadhan yang teladan. Teladan bagi kita semua terutama bagi diri sendiri.

1. Tanamkan dalam diri kita bahwa Ramadhan kali ini merupakan yang terakhir bagi kita, karena kita tidak tahu apakah kita masih bisa bertemu dengan Ramadhan tahun depan. Dengan demikian kita akan berusaha mempersembahkan Ramadhan kali ini adalah Ramadhan yang terbaik yang pernah dilalui. Lebih baik dari tahun-tahun yang telah lewat.

2. Buatlah daftar kegiatan atau agenda yang akan dilakukan selama Ramadhan. Termasuk didalamnya adalah target-an ibadah yang ingin di capai. Misalnya selama Ramadhan mau khatam Al-Quran berapa kali. Selain itu buat juga aktivitas harian yang terperinci dari bangun tidur sampai tidur lagi. Dengan demikian ibadah yang kita lakukan akan lebih efektif dan efisien.

3. Tidak menunda-nunda dan tidak mudah lelah melaksanakan aktivitas yang telah disusun terutama yang menyangkut masalah ibadah. Sekali kita menunda maka akan berdampak pada agenda yang lain, akibatnya banyak agenda kegiatan yang terbengkalai.

4. Lakukan evaluasi harian terhadap kegiatan yang telah dilakukan pada hari itu. Mengevaluasi bisa dilakukan ketika menjelang tidur malam. Dengan mengevaluasi kita bisa tahu sejauh mana target yang telah kita susun tercapai, atau jika ada kegiatan yang tidak terlaksana bisa diganti pada hari yang lain. Dengan demikian kita masih berada pada jalur yang telah direncanakan dan berusaha lebih baik pada hari-hari berikutnya.

5. Mengefisienkan kerja pada siang hari dengan tidak terlalu menguras tenaga karena pada malam harinya kita masih akan melakukan ibadah yang padat seperti shalat Tarawih atau Tahajjud. Kondisi badan yang terlalu lelah gampang sekali dimasuki dan dipengaruhi setan sehingga kita menjadi malas beribadah.

6. Mengurangi atau meniadakan aktivitas yang tidak ada hubungannya dengan Ramadhan, aktivitas yang dapat mengganggu nilai ibadah dan puasa itu sendiri.

7. Menjaga kualitas makanan yang masuk ketika berbuka dan bersahur. Pada saat berbuka, hindari makan terlalu kenyang atau langsung makan “berat”. Lebih baik saat berbuka makan-makanan yang manis karena mudah sekali dicerna tubuh dan cepat menggantikan kalori yang hilang. Dengan langsung makan berat (baca:nasi) saat berbuka, organ pencernaan akan merasa “kaget” dan tidak siap melakukan tugas yang berat setelah seharian istirahat, akibatnya makanan yang kita makan tidak tercerna dan terabsorbsi dengan maksimal. Pada waktu sahur, usahakan makan makanan yang banyak mengandung protein seperti daging. Tidak makan makanan yang mengandung asam karena dapat mempengruhi kondisi asam lambung yang berakibat perut perih, sakit dan mual, terutama bagi penderita maag.

8. Perbanyak silaturahim dengan orang-orang yang dapat menambah keimanan dan meningkatkan kualitas puasa kita.

9. Pada sepuluh hari terakhir, usahakan i’tikaf di masjid, kalau tidak bisa usahakan pada waktu malam hari kita berada di masjid. Dengan i’tikaf lebih mendekatkan diri dengan Allah.

Semoga kita menjadi Alumni Ramadhan yang Teladan, yang memberikan dampak positif mengarungi hidup di 11 bulan lainnya. Amin.

Wassalam

copy from http://naqshbandibatam.org

Materi Ramadhan

2008-09-02T03:17:00.000-07:00

A. Makan Sahur
Orang yang berpuasa sangat dianjurkan untuk makan sahur. Hal ini berdasarkan hadits dari ‘Amru bin Al-‘Ash z bahwa Rasulullah n bersabda:

فَصْلُ مَا بَيْنَ صِيَامِنَا وَصِيَامِ أَهْلِ الْكِتَابِ أَكْلَةُ السَّحُوْرِ

“Perbedaan antara puasa kami dengan puasa ahli kitab adalah makan sahur.” (HR. Muslim)
Dari Salman z, Rasulullah n bersabda:

الْبَرَكَةُ فِيْ ثَلاَثَةٍ: الْجَمَاعَةِ وَالثَّرِيْدِ وَالسَّحُوْرِ

“Berkah ada pada 3 hal: berjamaah, tsarid (roti remas yang direndam dalam kuah), dan makan sahur.” (HR. Ath-Thabrani, 6/251, dengan sanad yang hasan dengan penguatnya, lihat Shifat Shaum An-Nabi oleh Ali Al-Halabi, hal. 44)
Disukai untuk mengakhirkan makan sahur berdasarkan hadits Anas dari Zaid bin Tsabit z, ia berkata:
Kami makan sahur bersama Rasulullah n kemudian beliau bangkit menuju shalat. Aku (Anas) bertanya: “Berapa jarak antara adzan1 dan sahur?” Beliau menjawab: “Kadarnya (seperti orang membaca) 50 ayat.” (Muttafaqun ‘alaih)
Namun apa yang diistilahkan oleh kebanyakan kaum muslimin dengan istilah imsak, yaitu menahan (tidak makan) beberapa saat sebelum adzan Shubuh adalah perbuatan bid’ah karena dalam ajaran nabi n tidak ada imsak (menahan diri) kecuali bila adzan fajar dikumandangkan. Rasulullah n bersabda:

إِذَا أَذَّنَ بِلاَلٌ فَكُلُوا وَاشْرَبُوا حَتَّى يُؤَذِّنَ ابْنُ أُمِّ مَكْتُوْمٍِ

“Apabila Bilal mengumandangkan adzan (pertama), maka (tetap) makan dan minumlah hingga Ibnu Ummi Maktum mengumandangkan adzan.” (Muttafaqun ‘alaih)
Bahkan bagi orang yang ketika adzan dikumandangkan masih memegang gelas dan semisalnya untuk minum, diberikan rukhshah (keringanan) khusus baginya sehingga dia boleh meminumnya.
Abu Hurairah z meriwayatkan bahwa Rasulullah n bersabda:

إِذَ سَمِعَ أَحَدُكُمُ النِّدَاءُ وَاْلإِنَاءُ عَلَى يَدِهِ فَلاَ يَضَعْهُ حَتَّى يَقْضِيَ حَاجَتَهُ مِنْهُ

“Jika salah seorang kalian mendengar panggilan (adzan) sedangkan bejana (minumnya) ada di tangannya, maka janganlah dia meletakkannya hingga menunaikan keinginannya dari bejana (tersebut).” (HR. Ahmad dan Abu Dawud dan dihasankan oleh Syaikhuna Muqbil bin Hadi Al-Wadi’i t dalam Al-Jami’ Ash-Shahih, 2/418-419)
Hukum makan sahur adalah sunnah muakkadah. Berkata Ibnul Mundzir: “Umat ini telah bersepakat bahwa makan sahur hukumnya sunnah dan tidak ada dosa bagi yang tidak melakukannya berdasarkan hadits Anas bin Malik z bahwa Rasulullah n bersabda:

تَسَحَّرُوا فَإِنَّ فِي السَّحُوْرِ بَرَكَةً

“Makan sahurlah, karena sesungguhnya pada makan sahur itu ada barakahnya.” (HR. Al-Bukhari dan Muslim)
Dianjurkan makan sahur dengan buah kurma jika ada, dan boleh dengan yang lain berdasarkan hadits Abu Hurairah z, bahwa Rasulullah n bersabda:

نِعْمَ السَّحُوْرِ الْمُؤْمِنِ التَّمْرُ

“Sebaik-baik sahur seorang mukmin adalah buah kurma.” (HR. Abu Dawud, 2/2345, dan Ibnu Hibban, 8/3475, Al-Baihaqi, 4/236, dan dishahihkan oleh Asy-Syaikh Al-Albani t)
Jika seseorang ragu apakah fajar telah terbit atau belum, maka boleh dia makan dan minum sampai dia yakin bahwa fajar telah terbit.
Firman Allah k:

وَكُلُوا وَاشْرَبُوا حَتَّى يَتَبَيَّنَ لَكُمُ الْخَيْطُ اْلأَبْيَضُ مِنَ الْخَيْطِ اْلأَسْوَدِ مِنَ الْفَجْرِ

“Makan dan minumlah kalian hingga jelas bagimu benang putih dan benang hitam, yaitu fajar ….” (Al-Baqarah: 187)
Berkata As-Sa’di t: “Padanya terdapat (dalil) bahwa jika (seseorang) makan dan semisalnya dalam keadaan ragu akan terbitnya fajar maka (yang demikian) tidak mengapa.” (Taisir Al-Karim Ar-Rahman hal. 87)

B. Berbuka Puasa
Orang yang berpuasa dianjurkan untuk mempercepat berbuka jika memang telah masuk waktu berbuka. Tidak boleh menundanya meski ia merasa masih kuat untuk berpuasa. ‘Amr bin Maimun Al-Audi meriwayatkan:

كَانَ أَصْحَابُ مُحَمَّدٍ صَلَّى اللهُ عَلَيْهِ وَسَلَّمَ أَعْجَلَ النَّاسِ إِفْطًارًا وَأَبْطَأَهُمْ سُحُوْرًا

“Para shahabat Muhammad n adalah orang yang paling cepat berbukanya dan paling lambat sahurnya.” (HR. Al-Baihaqi, 4/238, dan Al-Hafidz Ibnu Hajar t menshahihkan sanadnya)
Berkata Asy-Syaikh Ibnu ‘Utsaimin t:
“Cepat-cepat berbuka puasa (dianjurkan) bila telah terbenam matahari, bukan karena adzan. Namun di waktu sekarang (banyak) manusia menyesuaikan adzan dengan jam-jam mereka. Maka bila matahari telah terbenam boleh bagi kalian berbuka walaupun muadzdzin belum mengumandangkan adzan.” (Asy-Syarh Al-Mumti’)
Buka puasa dilakukan dalam keadaan ia mengetahui dengan yakin bahwa matahari telah terbenam. Hal ini bisa dilakukan dengan melihat di lautan dan semisalnya. Adapun hanya sekedar menduga dengan kegelapan dan semisalnya, maka bukan dalil atas terbenamnya matahari. Wallahu a’lam.
Mempercepat buka puasa adalah mengikuti Sunnah Rasulullah n. Sahl bin Sa’ad z meriwayatkan Rasulullah n bersabda:

لاَ تَزَالُ أُمَّتِيْ عَلَى سُنَّتِيْ مَا لَمْ تَنْتَظِرْ بِفِطْرِهَا النُّجُوْمَ

“Senantiasa umatku berada di atas Sunnahku selama mereka tidak menunggu (munculnya) bintang ketika hendak berbuka.” (HR. Al-Hakim, 1/599, Ibnu Hibban, 8/3510, dengan sanad yang shahih. Lihat Shifat Shaum An-Nabi hal. 63)
Mempercepat berbuka puasa akan mendatangkan kebaikan bagi pelakunya. Seperti yang diriwayatkan Sahl bin Sa’ad z bahwa Rasulullah n bersabda:

لاَ يَزَالُ النَّاسُ بِخَيْرٍ مَا عَجَّلُوا الفِّطْرَ

“Senantiasa manusia berada dalam kebaikan selama mereka mempercepat buka puasa.” (HR. Al-Bukhari, 2/1856, dan Muslim, 2/1098)
Mempercepat berbuka puasa adalah perbuatan menyelisihi Yahudi dan Nashara. Abu Hurairah z berkata, Rasulullah n bersabda:

لاَ يَزَالُ هَذَا الدِّيْنُ ظَاهِرًا مَا عَجَّلَ النَّاسُ الْفِطْرَ لأَنَّ الْيَهُوْدَ وَالنَّصَارَى يُؤَخِّرُوْنَ

“Senantiasa agama ini nampak jelas selama manusia mempercepat buka puasa karena Yahudi dan Nashara mengakhirkannya.” (HR. Abu Dawud, 2/2353, Ibnu Majah, 1/1698, An-Nasai dalam Al-Kubra, 2/253, dan Ibnu Hibban, 8/3503, dan dihasankan oleh Asy-Syaikh Al-Albani t)
Selain itu, mempercepat buka puasa termasuk akhlak kenabian. Sebagaimana dikatakan ‘Aisyah x:

ثَلاَثٌ مِنْ أَخْلاَقِ النُّبُوَّةِ: تَعْجِيْلُ اْلإِفْطَارِ وَالتَّأْخِيْرُ السُّحُوْرِ وَوَضْعُ الْيَمِيْنِ عَلَى الشِّمَالِ فِي الصَّلاَةِ

“Tiga hal dari akhlak kenabian: mempercepat berbuka, mengakhirkan sahur, dan meletakkan tangan kanan di atas tangan kiri dalam shalat.” (HR. Ad-Daruquthni, 1/284, dan Al-Baihaqi, 2/29)
Orang harus berbuka puasa lebih dahulu sebelum shalat Maghrib, berdasarkan hadits Anas z bahwa Rasulullah n berbuka puasa sebelum shalat (Maghrib) dan makanan yang paling dianjurkan untuk berbuka puasa adalah kurma. Anas bin Malik z berkata:

كَانَ النَّبِيُّ صَلَّى اللهُ عَلَيْهِ وَسَلَّمَ يُفْطِرُ قَبْلَ أَنْ يُصَلِّيَ عَلَى رُطَبَاتٍ فَإِنْ لَمْ تَكُنْ رُطَبَاتٍ فَتُمَيْرَاتٍ فَإِنْ لَمْ تَكُنْ تُمَيْرَاتٍ حَسَا حَسَوَاتٍ مِنْ مَاءٍ

“Adalah Nabi n berbuka dengan ruthab (kurma muda) sebelum shalat (Maghrib), bila tidak ada ruthab maka dengan tamr (kurma yang matang), bila tidak ada maka dengan beberapa teguk air.” (HR. Abu Dawud, 2/2356, dan At-Tirmidzi, 3/696, Ad-Daruquthni, 2/185, dengan sanad yang shahih, dishahihkan oleh Asy-Syaikh Al-Albani t)
Jangan lupa, berdoa sebelum berbuka puasa dengan doa:

ذَهَبَ الظَّمَأُ وَابْتَلَتِ الْعُرُوْقُ وَثَبَتَ اْلأَجْرُ إِنْ شَاءَ اللهُ تَعَالَى

“Telah hilang dahaga dan telah basah urat-urat dan telah tetap pahala insya Allah k.” (HR. Abu Dawud, 2/306 no. 2357, An-Nasai dalam As-Sunan Al-Kubra, 2/255, Ad-Daruquthni, 2/185, Al-Baihaqi, 4/239, dari hadits Ibnu ‘Umar c dan dihasankan oleh Asy-Syaikh Al-Albani t)
Orang yang menjalankan ibadah puasa diharuskan menjauhkan perkataan dusta sebagaimana yang terdapat dalam hadits Abu Hurairah z, bersabda Rasulullah n:

مَنْ لَمْ يَدَعْ قَوْلَ الزُّوْرِ وَالْعَمَلَ بِهِ فَلَيْسَ للهِ حَاجَةٌ فِيْ أَنْ يَدَعَ طَعَامَهُ وَشَرَابَهُ

“Siapa yang tidak meninggalkan perkataan dusta dan mengamalkannya, maka tidak ada keinginan Allah pada puasanya” (HR. Bukhari no. 1804)

1 Yang dimaksud adalah iqomah, karena terkadang iqomah disebut adzan, wallahu a’lam. Yang dimaksud dengan sahur adalah akhir waktu sahur yaitu ketika masuk waktu shubuh, sebagaimana akan lebih jelas pada artikel 'Sahur dan Berbuka', -red.

Pembatal Puasa

a. Makan dan minum dengan sengaja
Allah k berfirman:

وَكُلُوا وَاشْرَبُوا حَتَّى يَتَبَيَّنَ لَكُمُ الْخَيْطُ اْلأَبْيَضُ مِنَ الْخَيْطِ اْلأَسْوَدِ مِنَ الْفَجْرِ ثُمَّ أَتِمُّوا الصِّيَامَ إِلَى اللَّيْلِ

“Makan dan minumlah hingga jelas bagi kalian benang putih dari benang hitam dari fajar kemudian sempurnakanlah puasa hingga malam.” (Al-Baqarah: 187)
Namun jika seseorang lupa maka puasanya tidak batal, berdasarkan hadits Rasulullah n:

إِذَا نَسِيَ فَأَكَلَ وَشَرِبَ فَلْيُتِمَّ صَوْمَهُ فَإِنَّمَا أَطْعَمَهُ اللهُ وَسَقَاهُ

“Jika ia lupa lalu makan dan minum maka hendaklah dia sempurnakan puasanya karena sesungguhnya Allah yang memberinya makan dan minum.” (HR. Al-Bukhari no. 1831 dan Muslim no. 1155)

b. Keluar darah haidh dan nifas
Hal ini sebagaimana dikatakan ‘Aisyah x:
“Adalah kami mengalami (haidh), maka kami diperintahkan untuk meng-qadha puasa dan tidak diperintahkan meng-qadha shalat.” (HR. Al-Bukhari dan Muslim)
Para ulama telah sepakat dalam perkara ini.

c. Melakukan hubungan suami istri di siang hari Ramadhan
Hal ini berdasarkan dalil Al Qur’an, As Sunnah, dan kesepakatan para ulama. Bagi yang melakukannya diharuskan membayar kaffarah yaitu membebaskan budak, bila tidak mampu maka berpuasa dua bulan secara terus-menerus, dan bila tidak mampu juga maka memberi makan 60 orang miskin. Tidak ada qadha baginya menurut pendapat yang kuat. Hukum ini berlaku secara umum baik bagi laki-laki maupun perempuan.
Adapun bila seseorang melakukan hubungan suami istri karena lupa bahwa dia sedang berpuasa, maka pendapat yang kuat dari para ulama adalah puasanya tidak batal, tidak ada qadha dan tidak pula kaffarah. Hal ini sebagaimana hadits Abu Hurairah z bahwa Rasulullah n bersabda:

مَنْ أَفْطَرَ يَوْمًا مِنْ رَمَضَانَ نَاسِيًا فَلاَ قَضَاءَ عَلَيْهِ وَلاَ كَفَّارَةَ

“Barangsiapa yang berbuka sehari di bulan Ramadhan karena lupa, maka tidak ada qadha atasnya dan tidak ada kaffarah (baginya).” (HR. Al-Baihaqi, 4/229, Ibnu Khuzaimah, 3/1990, Ad-Daruquthni, 2/178, Ibnu Hibban, 8/3521, dan Al-Hakim, 1/595, dengan sanad yang shahih)
Kata ifthar mencakup makan, minum dan bersetubuh. Inilah pendapat jumhur ulama dan dikuatkan oleh Syaikhul Islam Ibnu Taimiyyah dan Asy-Syaukani rahimahumallah.

d. Berbekam
Ini termasuk perkara yang membatalkan puasa menurut pendapat yang rajih, berdasarkan hadits Rasulullah n:

أَفْطَرَ الْحَاجِمُ وَالْمَحْجُوْمُ

“Telah berbuka (batal puasa) orang yang berbekam dan yang dibekam.” (HR. At-Tirmidzi, 3/774, Abu Dawud, 2/2367;2370;2371, An-Nasai, 2/228, Ibnu Majah no. 1679,dan lainnya)
Hadits ini shahih dan diriwayatkan dari kurang lebih 18 orang shahabat dan dishahihkan oleh para ulama seperti Al-Imam Ahmad, Al-Bukhari, Ibnul Madini dan yang lainnya. Ini merupakan pendapat Al-Imam Ahmad dan Ishaq bin Rahuyah serta dikuatkan oleh Ibnul Mundzir.
Ada beberapa perkara lain yang juga disebutkan sebagian para ulama bahwa hal tersebut termasuk pembatal puasa, di antaranya:

a. Muntah dengan sengaja
Namun yang rajih dari pendapat ulama bahwa muntah tidaklah membatalkan puasa secara mutlak sengaja atau tidak sengaja. Sebab asal puasa seorang muslim adalah sah, tidaklah sesuatu itu membatalkan kecuali dengan dalil. Adapun hadits Abu Hurairah z bahwa Rasulullah n bersabda:

مَنْ ذَرَعَهُ الْقَيْءُ فَلاَ قَضَاءَ عَلَيْهِ وَمَنِ اسْتَقَاءَ فَلْيَقْضِ

“Barangsiapa yang dikalahkan oleh muntahnya maka tidak ada sesuatu atasnya dan barangsiapa yang sengaja muntah maka hendaklah dia meng-qadha (menggantinya).” (HR. Ahmad, 2/498, At-Tirmidzi, 3/720, Abu Dawud, no. 2376 dan 2380, Ibnu Majah no. 1676)
Hadits ini dilemahkan oleh para ulama, di antaranya Al-Bukhari dan Ahmad. Juga dilemahkan oleh Asy-Syaikh Muqbil bin Hadi t.
Namun jika muntah tersebut keluar lalu dia sengaja memasukkannya kembali maka hal ini membatalkan puasanya.

b. Menggunakan cairan penngganti makanan seperti infus
Terjadi perselisihan di kalangan para ulama, dan yang rajih bahwa suntikan terbagi menjadi dua bagian:
1). Suntikan yang kedudukannya sebagai pengganti makanan maka hal ini membatalkan puasanya, sebab nash-nash syari’at bila didapatkan pada sesuatu yang termasuk dalam penggambaran yang sama maka dihukumi sama seperti yang terdapat dalam nash.
2).Suntikan yang tidak berkedudukan sebagai pengganti makanan, maka hal ini tidaklah membatalkan puasa sebab gambarannya tidak seperti yang terdapat dalam nash baik lafadz maupun makna, tidak dikatakan makan dan tidak pula minum dan tidak pula termasuk dalam makna keduanya. Dan asalnya adalah sahnya puasa seorang muslim sampai meyakinkan pembatalnya berdasarkan dalil yang syar’i. (lihat fatwa Asy-Syaikh Ibnu Utsaimin t dalam Fatawa Islamiyyah: 2/130, fatwa Asy-Syaikh Bin Baaz t dalam Fatawa Ramadhan: 2/485, dan Fatwa Lajnah Da’imah: 2/486, dan fatwa Syaikhul Islam t dalam Haqiqotus Shiyam: 54-60).
Namun Asy-Syaikh Muqbil t menasehatkan bagi orang yang sakit untuk berbuka dan tidak berpuasa agar tidak terjatuh ke dalam sesuatu yang menimbulkan syubhat. (Min Fatawa Ash-Shiyaam: 6)

c. Onani
Pendapat yang rajih dari pendapat para ulama bahwa onani tidaklah membatalkan puasa, namun termasuk perbuatan dosa yang diharamkan melakukannya baik ketika berpuasa maupun tidak. Allah k berfirman menyebutkan di antara ciri-ciri orang mukmin:

وَالَّذِيْنَ هُمْ لِفُرُوْجِهِمْ حَافِظُوْنَ. إِلاَّ عَلَى أَزْوَاجِهِمْ أوْ مَا مَلَكَتْ أَيْمَانُهُمْ فَإِنَّهُمْ غَيْرُ مَلُوْمِيْنَ. فَمَنِ ابْتَغَى وَرَاءَ ذَلِكَ فَأُولَئِكَ هُمُ الْعَادُوْنَ

“Dan (mereka adalah) orang yang memelihara kemaluannya, kecuali kepada istri-istrinya atau budak wanita yang mereka miliki. Maka sesungguhnya (hal itu) tidak tercela. Maka barangsiapa yang mencari selain itu, mereka itulah orang-orang yang melampaui batas.” (Al-Mu’minun: 5-7)

Hal-Hal yang Diperbolehkan Bagi Orang yang Berpuasa

a. Bersiwak
Rasulullah n bersabda:

لَوْ لاَ أَنْ أَشُقَّ عَلَى أُمَّتِي لأَمَرْتُهُمْ بِالسِّوَاكِ عِنْدَ كُلِّ صَلاَةٍ

“Jika aku tidak memberatkan umatku, niscaya akan kuperintahkan mereka bersiwak setiap hendak shalat.” (Muttafaq ‘alaih)

b. Masuknya waktu fajar dalam keadaan junub
Hal ini berdasarkan hadits ‘Aisyah dan Ummu Salamah c bahwa Nabi n mendapati waktu fajar dalam keadaan junub setelah (bersetubuh dengan) istrinya, kemudian beliau mandi dan berpuasa. (Muttafaq ‘alaihi)

c. Berkumur-kumur dan memasukkan air ke dalam hidung asal tidak berlebihan
Laqith bin Shabirah meriwayatkan bahwa Rasulullah n bersabda:

وَبَالِغْ فِي اْلإِسْتِنْشَاقِ إِلاَّ أَنْ تَكُوْنَ صَائِمًا

“Dan bersungguh-sungguhlah kalian dalam ber-istinsyaq (memasukkan air ke dalam hidung) kecuali bila kalian berpuasa.” (HR. Abu Dawud, 1/132, dan At-Tirmidzi, 3/788, An-Nasai, 1/66, dan dishahihkan oleh Asy-Syaikh Al-Albani t)

d. Menggauli istri selain bersetubuh
Sebagaimana yang dikatakan oleh ‘Aisyah x:
“Adalah Rasulullah nmencium (istrinya) dan beliau berpuasa, menggaulinya (bukan jima’) dan beliau berpuasa.” (Muttafaqun ‘alaihi)

e. Mencicipi makanan dan menciumnya asal tidak memasukkan ke dalam kerongkongannya
Berkata Ibnu ‘Abbas c:
“Tidak mengapa seseorang mencicipi cuka atau sesuatu (yang lain) selama tidak masuk kerongkongannya dalam keadaan dia berpuasa.” (Diriwayatkan Al-Bukhari secara mu’allaq dan disambung sanadnya oleh Ibnu Abi Syaibah dan Al-Baihaqi)

f. Mandi di siang hari
Sebagaimana yang terdapat pada kisah junub Nabi n yang telah lalu.

Perbuatan yang Dianjurkan di bulan Ramadhan

a. Memperbanyak shadaqah
b. Memperbanyak bacaan Al Qur’an, dzikir, doa, dan shalat
Ibnu ‘Abbas c meriwayatkan:

كَانَ رَسُوْلُ اللهِ صَلَّى اللهُ عَلَيْهِ وَسَلَّمَ أَجْوَدَ النَّاسِ وَكَانَ أَجْوَدَ مَا يَكُوْنُ فِيْ رَمَضَانَ حِيْنَ يَلْقَاهُ جِبْرِيْلُ فَيُدَارِسُهُ الْقُرْآنَ

“Rasulullah n adalah orang yang paling dermawan, dan beliau lebih dermawan lagi di bulan Ramadhan ketika Jibril menemuinya lalu membacakan padanya Al Qur`an.” (HR. Al-Bukhari)

c. Memberikan makan kepada orang yang berbuka puasa
Rasulullah n bersabda:

مَنْ فَطَّرَ صَائِمًا كَانَ لَهُ مِثْلُ أَجْرِهِ غَيْرَ أَنَّهُ لاَ يَنْقُصُ مِنْ أَجْرِ الصَّائِمِ شَيْئًا

“Barangsiapa yang memberi makan orang yang berpuasa, maka baginya seperti pahala (yang berpuasa) dalam keadaan tidak berkurang sedikitpun dari pahala orang yang berpuasa itu.” (HR. Ahmad, 4/114, At-Tirmidzi, 3/807, Ibnu Majah, 1/1746, Ad-Darimi no. 1702, dan dishahihkan oleh Asy-Syaikh Al-Albani t dalam Shahih At-Tirmidzi).

Wallahul muwaffiq.

Keutamaan Puasa dan Keutamaan Bulan Ramadhan

2008-08-31T14:42:00.000-07:00

Banyak sekali ayat dalam al Qur’an yang memberikan anjuran untuk berpuasa sebagai sarana bertaqarrub (mendekatkan diri) kepada Allah dan menjelaskan keutamaan-keutamaannya, seperti firman Allah:

“Dan berpuasa lebih baik bagimu jika kamu mengetahui”. (QS. Al baqarah:184)

Firman Allah :

“Sesungguhnya laki-laki dan perempuan yang muslim, laki-laki dan perempuan yang mukmin, laki-laki dan perempuan yang tetap dalam ketaatannya, laki-laki dan perempuan yang benar, laki-laki dan perempuan yang sabar, laki-laki dan perempuan yang khusyuk, laki-laki dan perempuan yang bersedekah, laki-laki dan perempuan yang berpuasa, laki-laki dan perempuan yang memelihara kehormatannya, laki-laki dan perempuan yang banyak menyebut (nama) Allah, Allah telah menyediakan untuk mereka ampunan dan pahala yang besar.”(QS. Al Ahzab:35)

Rasulullah Shalallahu ‘Alaihi Wassalam telah menjelaskan dalam hadits-hadits shahih tentang keutamaan-keutamaan puasa, yang dijelaskan secara rinci dalam hadits-hadits shahih berikut ini.

1. Puasa adalah Perisai atau Pelindung

Rasulullah Shalallahu ‘Alaihi Wassalam menyuruh orang yang kuat dan besar dorongan syahwatnya dan belum mampu untuk menikah agar berpuasa. Beliau Shalallahu ‘Alaihi Wassalam bersabda:

“Wahai sekalian para pemuda, barangsiapa diantara kamu telah mampu baa’ah (mampu menikah dengan berbagai macam persiapannya) hendaklah menikah, karena menikah lebih menundukkan pandangan dan lebih menjaga kehormatan. Barangsiapa yang belum mampu menikah, hendaklah berpuasa karena puasa merupakan pelemah syahwat baginya.” (HR. Bukhari dan Muslim)

Rasulullah Shalallahu ‘Alaihi Wassalam telah menjelaskan bahwa puasa adalah benteng dan perisai yang menghalangi seseorang dari neraka. Bersabda Rasulullah Shalallahu ‘Alaihi Wassalam : “Puasa adalah perisai, seorang hamba berperisai dengannya dari api neraka.” (HR. Ahmad, ini adalah hadits shahih)

2. Puasa Menyebabkan Seorang Hamba Masuk ke Dalam Surga

Dari Abu Umamah radhiallahu ‘anhu berkata: “Aku bertanya: “Ya Rasulullah, tunjukkan padaku amalan yang bisa memasukkanku ke surga.” Beliau Shalallahu ‘Alaihi Wassalam menjawab: “Hendaklah kamu berpuasa, tidak ada (amalan) yang semisal dengan itu.” (HR. An- Nasa’i, Ibnu Hibban, Al Hakim, dg sanad yg shahih)

3. Orang Berpuasa Diberi Pahala yang Tidak Terhitung

4. Orang yang berpuasa Mempunyai Dua Kegembiraan

5. Bau Mulut Orang Berpuasa Lebih Wangi di Sisi Allah dari Bau Misk

Point 3,4,dan 5 dalilinya ada pada hadits berikut, yaitu Dari Abu Hurairah radhiallahu ‘anhu: Rasulullah Shalallahu ‘Alaihi Wassalam bersabda:”Allah berfirman:’ Semua amalan bani Adam untuknya kecuali puasa (yakni baginya palaha terbatas, kecuali puasa karena pahalanya tidak terbatas), karena puasa itu untuk Aku dan Aku akan membalasnya’. Puasa adalah perisai, jika salah seorang dari kamu sedang berpuasa janganlah berkata keji dan berteriak-teriak, jika ada orang yang mencercanya atau memeranginya, ucapkanlah :”Aku sedang berpuasa”, demi Dzat yang jiwa Muhammad di tangan-Nya sesungguhnya bau mulut orang yang berpuasa lebih wangi di sisi Allah daripada bau minyak misk (parfum yang wangi). Orang yang berpuasa mempunyai dua kegembiraan, jika berbuka dia bergembira dan jika bertemu Rabbnya dia bergembira karena puasa yang dilakukannya.” (HR. Bukhari, Muslim, ini lafadz Bukhari)

6. Puasa dan Al Qur’an akan Memberikan Syafa’at (Pertolongan) kepada Ahlinya

Rasulullah Shalallahu ‘Alaihi Wassalam bersabda: “Puasa dan Al Qur’an akan memberikan syafa’at kepada hamba di hari kiamat. Puasa akan berkata: “Wahai Rabbku, aku menghalanginya dari makan dan syahwat, berilah dia syafaat karenaku, dan Al Qur’an pun berkata: “Aku telah menghalanginya dari tidur di malan hari, berilah dia syafaat karenaku.” Rasulullah Shalallahu ‘Alaihi Wassalam bersabda:”Maka keduanya memberi syafaat.” (HR. Ahmad, Al Hakim, Abu Nu’aim, dg sanad yg hasan)

7. Puasa Merupakan Kafarat (Tebusan atas kesalahan atau kekurangan)

Diantara keistimewaan puasa, yang tidak ada dalam amalan lain adalah Allah menjadikannya sebagai kafarat bagi orang yang memotong rambut kepalanya (ketika Haji) karena ada udzur sakit atau penyakit di kepalanya dan kafarat nagi yang tidak mampu untuk membeli kurban (QS. Al Baqarah:196).

Kafarat bagi pembunuh orang orang kafir (kafir dzimmi) yang mempunyai perjanjian karena tidak sengaja (QS. An Nisaa’:92)

Juga sebagai kafarat bagi yang membatalkan sumpah (QS. Al Maidah:89) atau membunuh binatang buruan di tanah haram (QS. Al Maidah:95) dan sebagai kafarat dhihar. (QS. Al Mujadalah:3-4)

8. Ar Rayyan Bagi Orang yang Berpuasa

Dari Sahl bin Sa’ad radhiallahu anhu, dari Nabi Shalallahu ‘Alaihi Wassalam bersabda: “Sesungguhnya dalam surga ada satu pintu yang disebut dengan Ar Rayyan, orang-orang yang berpuasa akan masuk pada hari kiamat nanti dari pintu tersebut, tidak ada orang selain mereka yang memasukinya. Jika telah masuk orang terakhir dari mereka yang berpuasa ditutuplah tersebut, barangsiapa yang masuk akan minum dan barangsiapa yang minum tidak akan merasa haus untuk selamanya.”(HR. Bukhari, Muslim)

KEUTAMAAN BULAN RAMADHAN

Ramadhan adalah bulan kebaikan dan berkah. Allah memberkahinya dengan banyak keutamaan, diantaranya:

1. Bulan Al Qur’an

Allah menurunkan kitab-Nya yang mulia sebagai hidayah bagi manusia, obat bagi kaum mukminin, membimbing kepada yang lebih lurus, menjelaskan jalan petunjuk, diturunkan pada malam Lailatul Qadr, satu malam pada bulan Ramadhan. Allah Ta’ala berfirman:

“Bulan Ramadhan itulah bulan yang didalamnya diturunkan Al Qur’an yang menjadi petunjuk bagi manusia, dan menjadi keterangan-keterangan dari petunjuk itu dan membedakan antara yang haq dan yang bathil. Maka barangsiapa di anatar kamu melihat bulan itu hendaklah ia berpuasa.” (QS. Al-Baqarah:185)

2. Syaitan-syaitan Dibelenggu, Pintu-pintu Neraka Ditutup dan Pintu-pintu Surga Dibuka

Rasulullah Shalallahu ‘Alaihi Wassalam bersabda: “Apabila datang bulan Ramadhan dibukalah pintu-pintu surga (dalam riwayat lain, dibukalah pintu-pintu rahmat), dan ditutup pintu-pintu neraka, dan dibelenggulah syaitan-syaitan.” (HR. Bukhari dan Muslim)

Semua itu telah sempurna semenjak malam pertama bulan Ramadhan yang diberkahi, berdasarkan sabda Rasulullah Shalallahu ‘Alaihi Wassalam: ”Apabila telah datang malam pertama bulan Ramadhan, diikatlah syaitan-syaitan dan jin-jin yang jahat, ditutup pintu-pintu neraka tidak ada satu pintu pun yang dibuka, dan dibukalah pintu-pintu surga tidak ada satu pun yang tertutup, dan menyerulah seorang penyeru: “Wahai orang yang ingin kebaikan lakukanlah, wahai orang yang ingin kejelekan kurangilah.” Dan Allah mempunyai orang-orang yang dibebaskan dari neraka, itu terjadi setiap malam.” (HR. Tirmidzi, Ibnu Majah, dan Ibnu Khuzaimah. Sanad ini hasan)

3. Malam Lailatul Qadr

Allah berfirman:

“Lailatul Qadr itu lebih baik dari seribu bulan.” (QS. Al Qadr:3)

Hal ini akan dijelaskan secara rinci dalam pembahasan malam Lailatul Qadr, Insya Allah.

Maraji’: Kitab Fiqih Ramadhan, oleh Ustadz Abdullah Sholeh Al Hadrami, penerbit Majelis Taklim dan Dakwah Husnul Khatimah, Malang

Puasa Ramadhan Dan Al-Qur'an (Refleksi Nuzulul Quran)

2008-08-31T08:26:00.000-07:00

Eksistensi historis Al-Qur'an merupakan entitas yang tidak terpisahkan di bulan Ramadhan. Sebuah pertanyaan mendasar, namun jarang diutarakan. Kenapa Allah Swt mewajibkan puasa pada bulan Ramadhan?. Padahal banyak bulanbulan suci lain dalam Islam seperti Rabiul Awal bulan kelahiran nabi, atau Muharram bulan hijrah (ke Yatsrib), atau Rajab –bulan peristiwa Isra’ dan Mi’raj misalnya. Allah Swt sendiri menjawabnya: ”Bulan Ramadhan adalah bulan diturunkannya Al-Qur'an sebagai petunjuk bagi manusia dan penjelas sekaligus pembeda (antara hak dan batil) bagi manusia”. (QS. Al-Baqarah: 185).Ayat ini menjelaskan, ternyata Ramadhan dipilih sebagai bulan diwajibkannya puasa karena di situ Al-Qur'an, kitab suci terakhir, pedoman hidup bagi seluruh manusia, diturunkan (unzila fiihi –alqur’an). Bisa dikatakan, puasa merupakan serangkaian ‘penghargaan’ dan ‘peringatan’ turunnya Al-Qur'an. Jadi, penekanannya sebenarnya bukan pada syari’at puasa, tetapi pada Al-Qur'annya.

Allah sepertinya menginginkan manusia menyambut (bulan) Al-Qur'an dengan ibadah puasa. Dan sekaligus agar manusia memahami bahwa ada keterkaitan erat antara puasa Ramadhan dan Al-Qur'an. Konsekuensi logis ini semakin sejalan, jika kita melihat aktifitas Ramadhan Rasulullah dan para sahabat. Setidaknya, ada dua hal yang mereka lakukan dalam menyikapi Al-Qur'an ketika Bulan Suci Ramadhan. Pertama, mereka senantiasa memperbanyak membaca Al-Qur'an pada bulan tersebut untuk mengulang bacaan Al-Qur'an. Tepatnya, Ramadhan menjadi bagian yang tidak terpisahkan sebagai ajang penyampaian informasi wahyu baru yang diterima secara berkesinambungan. Sehingga cara seperti ini membantu para sahabat dalam menghapal Al-Qur'an, di mana Rasul sebagai korektor kesalahan qira’ah (bacaan) mereka. Pada akhirnya, Al-Qur'an terpatri kuat dalam setiap hafalan para sahabat.

Kedua, moment Ramadhan juga mereka jadikan sebagai ajang forum diskusi dengan Rasulullah Saw tentang berbagai masalah hukum dalam kehidupan, sekaligus memahami makna ayat-ayat Al-Qur'an secara detail dan akurat. Dengan demikian, dari sisi historis, ada dua aktifitas yang dilakukan Rasulullah dan para sahabat, aspek tilawah juga tela’ah. Namun ironisnya, semangat memadukan dua aspek ini masih minim dalam kontek kekinian, khususnya di bulan Ramadhan. Penciutan makna tadarus Al-Qur'an hanya sebatas membaca dan menyimak, belum pada aspek memahami, yang melibatkan kekuatan rasionalitas dalam bentuk kajian ilmiah. Walaupun aspek tilawah saja tidaklah salah, sebab dalam pandangan Islam, membaca Al-Qur'an adalah zikir dan ibadah. Bahkan sebaik-baik zikir adalah membaca Al-Qur'an. Karena semua zikir ada di dalamnya. Sabda populer nabi juga memang ada menyebutkan: “Terangilah rumah tangga kalian dengan membaca Al-Qur'an”, tetapi kesempurnaan akan semakin tercapai, jika dua aspek ini berlaku seimbang. Membaca Al-Qur'an (Tilawatil Quran) akan semakin sempurna dengan aspek kajian dan kupasan Al-Qur'an (Thilawa’atil Quran), sehingga Al-Qur'an dapat dipahami secara konprehensif. Kalau dua hal ini diterapkan, akhirnya, tujuan Al-Qur'an bagi seorang Muslim menyentuh substansi kehidupan, yakni sebagai pedoman hidup dan tolak ukur dalam bersikap. Sebab Rasululullah Saw sendiri ada menyebutkan:”Sebaik-baik kamu adalah orang yang mempelajari Al-Qur'an dan menyampaikannya kepada orang lain” (HR.Muslim).

Puasa Ramadhan dan Al-Qur'an
Keterkaitan Ramadhan dengan Al-Qur'an sangatlah erat. Hubungan tersebut ibaratkan membentuk satu hubungan siklikal. Yakni hubungan melingkar yang berputar tanpa putus-putus. Hal ini dapat kita amati dalam beberapa hal. Pertama, yang dipanggil Tuhan untuk menjalankan ibadah puasa Ramadhan, terbatas hanya pada mereka yang beriman. Al-Qur'an menyebutkan:”Wahai orang-orang yang beriman, diwajibkan atas kalian berpuasa sebagaimana yang diwajibkan atas orang-orang sebelum kamu supaya kamu bertakwa”(QS.Al-Baqarah:183). Kedua, Tujuan ritual dan spiritual puasa adalah takwa. Al-Qur'an menyebutkan, la’allakum tattaquun, “mudah-mudahan (dengan puasa itu) kalian bertakwa”(QS.2:183). Hal yang bisa menjadikan Al-Qur'an sebagai pedoman hidup (way of life hudan ), yaitu bisa menaklukkan dan mengorbankan seluruh kepentingan pribadi, suku, golongan, partai dan mazhabnya dihadapan altar kebenaran lalu bertindak menurut Al-Qur'an hanyalah orang yang bertakwa. Sikap takwa merupakan driving force (kekuatan pendorong) yang menjadikan Al-Qur'an sebagai pedoman hidup (way of life) dalam kehidupan Muslim. Al-Qur'an menyebutkan: “Itulah Kitab Suci (Al-Qur’an) yang tidak ada keraguan di dalamnya, hudan (petunjuk) bagi orang-orang yang bertakwa.”(QS.2: 2).
Fakta-fakta ini menjelaskan, betapa erat kaitannya antara puasa Ramadhan dan Al-Qur'an. Sistem siklikal antara Al-Qur'an dan puasa menimbulkan iman dan takwa, ibaratkan roda yang senantiasa berputar. Semakin lama roda berputar, semakin kuat pula bagian-bagian sistem tersebut. Paling tidak inilah idealnya. Dan selama idealitas itu belum terwujud, maka selama itu pula ada sesuatu yang salah dalam Ramadhan kita. Dalam prosesnya, puasa Ramadhan merangsang kita menjadi seorang Muslim yang hanif melalui kesadaran kembali kepada Al-Qur'an. Artinya, Ramadhan ingin ‘membumikan’ tujuan Al-Qur'an dalam tiap detak langkah kehidupan Muslim secara bertahap. Saya sengaja memblok tebal kata-kata yang berhubungan dengan fungsi-fungsi Al-Qur'an yang ada disebutkan dalam Kitab Suci kita tersebut. Ketika seorang Muslim menjadikan Kitab Suci sebagai quran (bacaan) yang dibutuhkan, maka akan lahirlah hubungan emosional. Hubungan emosional ini menyebabkan iman seorang muslim semakin bertambah manakala mendengar ayat-ayat dari Kitab Suci dibacakan, sehingga Kitab Suci baginya menjadi syifaa’ (penawar berbagai penyakit hati).Pada akhirnya, muncul dalam diri orang yang berpuasa suatu kekuatan moral dan akhlak yang disebut furqan, yakni kemampuan untuk bersikap komit, konsisten dan konsekuen dalam menyikapi yang hak dan batil, yang halal dan yang haram, yang baik dan yang buruk.

Dengan demikian, puasa Ramadhan merupakan dua hal yang tidak bisa dipisahkan satu sama lain. Alangkah anehnya, jika di bulan Ramadhan sekalipun yang dikenal sebagi bulan Al-Qur'an, kita tidak membaca Al-Qur'an. Bahkan lebih aneh lagi kalau kita senantiasa berpuasa Ramadhan, namun ‘penghargaan’ atas diturunkannya Al-Qur'an di bulan Ramadhan, yakni kegiatan membaca Al-Qur'an kita abaikan. Ramadhan yang diperingati sebagai bulan turunnya Al-Qur'an, seyogyanya kita hidupkan dengan memperbanyak melakukan kegiatan Al-Qur'an. Dari akar kata yang satu dengan iqra’ (bacalah), yaitu dengan fi’il amr (kata kerja perintah) dari kata qara’a (membaca), kita seharusnya sudah paham, bahwa Al-Qur'an memang untuk dibaca dalam kehidupan Muslim. Alangkah naifnya kita menamakan dan mengakui Al-Qur'an sebagai kitab suci kita, tetapi kita tidak pernah membacanya. Al-Qur'an bukan hanya baru dibaca ketika ada hajatan seperti perkawinan, syukuran dan kematian, melainkan menjadikan Al-Qur'an sebagai kebutuhan dalam menyirami kegersangan hati kita. Sudah tentu, membaca Al-Qur'an sebaiknya dengan memahaminya dari berbagai segi. Aspek tela’ah mampu memberikan kita pencerahan keimanan dalam kehidupan. Wallahu a’lam bisshawab.
Oleh M. Lukman Hakim Hasibuan, MA

Kegembiraan

2008-08-17T08:00:00.001-07:00

KEGEMBIRAAN
yang dirasakan semua Tim Pemenang Perlombaan yang di laksanakan pada hari Sabtu,16 Agustus 2008 di Halaman Mahameru Hutama probolinggo saat menerima Hadiah yang di berikan langsung oleh General Manager(Bu.Nanik K)kepada para peserta...nah liat aja wajahnya pada semringah kalau pas lagi terima hadiah ...hahaha pak wahyou kenapa sakit ya kakinya......waduh aku sampek g katut di photo iku .....hehehe tp gpp uang dan hadiahnya tak bawa entar kalau g di photo lagi g tak kasih...wekkkkkkkkkkk....wah tamat dah perlombaan ini semoga kita masih bisa berlomba lagi di tahun depan dan semoga yang belum berhasil menjadi pemenangnya bisa menjadi pemenang di tahun mendatang. ok maju terus Mahameru Hutama dan semangat Bagi Semua Karyawan Layaknya pejuang yang telah memberikan semangat,cucuran darah dan keringatnya untuk meraih kemerdekaan ini....

AKHIRNYA

2008-08-17T07:45:00.000-07:00

Akhirnya Tim IT Mahameru
mendapatkan Juara I sebanyak III perlombaan dan Mendapatkan Juara II dan III wah ini lagi aku pamerin hadiah2nya...hahaha cukup nih buat makan di alun - alun dan traktir semua Tim IT Mahameru....selamat deh buat kekompakan kita
dan Buat Pak. DWI pak iki olene arek2 IT memenangkan Medali mas untuk Tim IT hahahaha kya' olimpiade Beijing aja....hahahahaa

SEMANGAT KEMERDEKAAN

2008-08-17T07:30:00.000-07:00

SEMANGAT KEMERDEKAAN
itu yang Rasakan oleh General Manager dan Manager Keuangan Saat Menyaksikan Perlombaan yang di gelar di Mahameru Hutama...di tengah kesibukannya bekerja untuk masa depan Mahameru hutama beliau menyempatkan diri untuk memberikan semangat dan dukungan kepada para karyawan yang sedang mengikuti perlombaan...saya dan temen2 mengucapkan terimakasih banyak atas bimbingan dan dukungannya....
dan maapin kita atas kesalah2an kta ya..buuuuu

PAPA Temon yang Malang

2008-08-17T07:20:00.000-07:00

Kasian papa
andai anak ini bisa bicara pasti dia berteriak kasian papa saat papanya alias si Temon ber adu kepala saat memperebutkan koin yang ada di dalam tepung dengan lawannya banteng merah Plaza namu apa yang terjadi sitemon belum berhasil mengalahkan si banteng merah ini wah jd kewa si anak....emang tu nak pak temon emang gitu....hahahaha sori mon..

Kasian Balonku

2008-08-17T07:15:00.000-07:00

Wah ini Baru seru
banyangin aja gmana rasanya jd balon eh salah...
gmana cara berjalan dengan membawa balon di tengah2 kaki kita dan jngan lupa masih menaruh topi panjang dan balon2 itu g boleh terlepas...hahahaha ada2 aja panitia itu hehe...
ok. semangat ya buat kalian....

Lebih Sulit Dari Menghitung UANG

2008-08-17T06:09:00.000-07:00

Lebih Sulit Dari Menghitung UANG
kata2 itu yang di rasakan oleh Bu Wahyu Div.Keuangan Mahameru hutama saat mengikuti lomba memasukan air dalam botol bersama rekan mas ARIE (EO) liat saja wajahnya yang merasa kelelahan dan kesulitan memegang gabus yang telah berisi air.
yah,,,,bu wahyu hmmm....mending aku g banyak komentar kali ya ntar malah g bisa KAS BON deh...heheheheee ma'apin saya bu wahyu...!!!

Lipstik Menakutkan

2008-08-17T05:44:00.000-07:00

Lipstik Menakutkan
mungkin itu yang di alami anak ini saat dia melihat sebuah lipstik yang akan di tempelkan dibibirnya...hhahah mak tolong aku mau di rias hahaha.....aku ter aniaya mak...mungkin dia akan menjerit seperti itu kali ya...hehehee ya dah mas di nikmati aja ya.............

Bangganya AKU

2008-08-16T10:30:00.000-07:00

Bangganya Aku
itulah yang terus di ucapkan oleh istri dari pak anas saat memenangkan Lomba menusuk...begitu bahagianya sang istri ternyata suaminya masih mampu menang dalam urusan menusuk....et,jngan keburu napsu dulu menusuk air maksudnya...hahahaha
wah pak anas kalau nusuk pelan2 donx mentang ada istrinya....oke deh buat pak anas selamat ya..!!!

Kau Hancurkan Mukaku

2008-08-16T10:24:00.000-07:00

Lomba Merias Wajah Dengan Mata Tertutup.
waahwahwah bukan ibro namanya kalau g banyol dengan rekan timnya Vita dia mengikuti lomba ini dengan tenang dan senang karna yang merias vita...hahahaha nah selanjutnya niya si ibro terpilih untuk masuk dalam kehidupan malam...dan di ganti nama menjadi RUBBi wah selamat deh untuk pak ibro dan buat bak vita laen kali kalu rias wajah yang bener donx obsesi banget sih jd perias. hahahahahahhhhhha

TUSUK LAGI

2008-08-16T10:18:00.001-07:00

LOMBA TUSUK AIR DENGAN MATA TERTUTUP
nah itu dia yang di si gondronx lagi bersemangat untuk menusuk air di atasnya....tp g tau kenapa mungkin gondronx lagi ngelamun eh...ternyata kalau sama om Anas(pakai baju merah) wah gmana sih kamu dronk kok kalah sama om2 :)) hahaha.....tp gpp IT Mahameru masih mendapatkan juara II utnuk lomba ini dengan perwakilan Gondronx

Malu Bukanlah Tipeku

2008-08-16T09:54:00.000-07:00

Lomba Mengambil Koin di dalam Tepung
nah lomba ini nih yang bikin orang cantik jd jelek apa lagi yang jelek...liat aja yang nonton pada ketawa semua....emang dasar penonton.
tp lucu juga ya kya'e emang keliatan jelek banget kalau pas gini..hahahaha.....
tp selamat deh untuk semangat dan keberanianmu.laik kali kalau mau ikut lomba beginian lagi jngan luapa bawa kanebo ya yang untuk cuci motor itu luch...jd biar langsung di bersikan hahahahahah....
wah cak. robBEX ntar pada marah2 nih yang laen
ya juga ya akukan g ikutan lomba ini takut ada oprasi orang jelek abis ikut lomba....hehehehe

KLERENG BIKIN MULUT SAKIT

2008-08-16T09:42:00.000-07:00

LOMBA KLERENG
Nah kalau ini bukan kekompakan namanya tp keterampilan memkan sendok et...salah ketenangan dengan penuh kosentrasi maka keberhasilan pasti kita dapatkan.
liat aja wajah kepanasan dan penuh kosentarasi....tp hasilnya tetep lagi juara I untuk tim IT Mahameru dengan perwakilan cak.robBEX
tdtuh aku ngerasain laper bnget karna harus bangun pagi jm7 kekantor jd g sempat sarapan deh...mungkin liat sendok jd laper dan teringat makan kali ya...hahahaha....apapun kegiatannya keberhasilan adalah kepuasan terbesar di dalam hari2 kita itu yang penting.

MASUK ME MASUKKAN

2008-08-16T09:27:00.000-07:00

LOMBA MEMASUKKAN PAKU DALAM BOTOL
Cilot ma diaz juga g kalah hebatnya kedua temen kita ini udah pandai dan mahir sekali untuk hal masuk memasukan,wah jd g enak nih sama temen yang laen soalnya juara pertama lagi2 jatuh di Tim IT Mahameru dengan perwakilan Cilot ma Diaz...emang bener2 kompak deh...apa mereka bedua emang udah hafal ya cara masukinnya...hahaha,et jngan berpikiran jorok dulu masukin paku maksudnya. selamat deh untuk kalian berdua.untuk yang belum berhasil maapin ya...kalian harus lebih semangat dan kompak dong seperti pahlawan2 yang telah memberikan kemerdekaan untuk kita.....bukan begitu teman.

Kakiku Sakit Hatiku Sakit

2008-08-16T09:16:00.000-07:00

Lomba memasukan Air dalam BOTOL

ada2 aja panitianya memasukan air ke dalam botol dengan kaki terikat model beginian siapa yag bilang gampang kalou bukan Gondronx sama robBEX.ketenangan dan kosentrasi serta kekompakan dengan timnya itu sangatlah diperlukan...apalagi membawa airnya pakai gabus nah kalau g kompak kya' gini nich..udah kaki pada sakit melihat kekalahan juga hati merasa kagak nyaman deh...
dan tau g siapa pemenangnya
tim IT Mahameru dengan perwakilan mas arie dan tentunya cak.robBEX
hahaha...4x urusah beginian udah jagonya.et g boleh marah untuk yang belum berhasil kan masih ada taon depan. ya g dronx

CREW

2008-08-16T08:57:00.000-07:00

CREW MAHAMERU
16 Agustus 2008 mahameru menggelar perlombaan untuk menyambut sekaligus memperingati hari kemerdekaan bangsa indonesia. nah ini dia para crew yang pada kocak dan lucu....
apa lagi yang pada pakai topi tuh...sok kegantengan wes...
hahaha...eh..salah sok Keren pada hal..:D!!

Lagu Wajib Nasional

2008-08-16T08:49:00.000-07:00

Tanpa mengurangi rasa hormat untuk para pahlawan yang telah mendahului kita yang membawa kita ke pintu kemerdekaan.
marilah kepada semua memanjatkan puja dan puji sukur kehadirat tuhan yang Maha Esa(ALLAH) karna sampai hari ini kita masih merasakan kemerdekan itu.
marilah kita menyanyikan lagu kemerdekaan kita.untuk mengenang jasa dan keringat para pahlawan2 kita.
----------------------------------------

Tujuh belas agustus tahun empat lima
Itulah hari kemerdekaan kita
Hari merdeka nusa dan bangsa
Hari lahirnya bangsa Indonesia
Merdeka

Sekali merdeka tetap merdeka
Selama hayat masih di kandung badan
Kita tetap setia tetap setia
Mempertahankan Indonesia
Kita tetap setia tetap setia
Membela negara kita

GETRAS

2008-08-16T08:36:00.000-07:00

Sep 1, '07 02:00a

PAITON PROBOLINGGO
Hari ini saptu 1 September akan di laksanakan Gerak Jalan Tradisional yang STAT akan di mulai dari PLTU Paiton dan FINIS di Kota Probolinggo dimana Getrras itu di ikuti oleh peserta, Beregu atau perorangan dan para pejabat Pemeritah Kabupaten dan Pemerintah kota probolinggo. malahan Walikota dan Bupati ikut juga dalam Getras.Getras di mulai jam 2 siang. dan perjalanan Paiton Probolinggo di tempuh 2 jam bila naik mobil dan untuk berapa jauhnya kurang lebihnya 45km tp ntar deh kita ukur dengan ber anggotakan 20orang yang terbagi menjadi 2regu kami sangat bahagia sekali saat masih dalam perjalan akan tetapi setelah dalam perjalanan dan melewati pos demi pos kamipun merasa se-akan2 kaki ini terbakar......
kami dapat no.147 dan 148 tp bersemangat lagi untuk GETRAS taon depan.kami siap bersaing dengan ribuan orang untuk mempertahankan gelar kami...hahahaha3x sebagai peserta yang punya semangat dan kekompakan yang tinggi.

robBEX

2008-08-16T07:30:00.000-07:00

robBEX
waduh iki sing repot....kate ngomentari sing apik2 g enak karo konco2 tp pancen wonge apik'an kok yen kon mangan delo'en gayaku lak keren pancen ganteng jare ibuku sing liane ngomong elek tp opo iyo' tah aku elek...hahaha...3x
kalau di rumah ada banyak makanan jngan lupa undang2 saya,,,,,,:D

PAK WEK

2008-08-16T07:16:00.000-07:00

Dwi Sulistyo H
lah yen iki gak wani komen aku..wedi g di pejeti maneh,pak gegerku wes loro iki kapan jet pijet maneh.waduh g sopan kali ya masak minta pijet sama pak bos....
rokok 76 kopi pait wah pasti seneng ntar kalau kerumah pasti aku suguhin deh tp...kalau pas kerumah pak dwi ada sambel enak dan kita bisa makan sampai puas baget
perutku serasa mau pecah he..3x(kok makan terus pak robbEX ntar perutnya robBEX loh...)hmmm....udah ah jngan banyak komen ntar orangnya denger bisa2 g di pijet lagi nih...!!!!

GEMBEL

2008-08-16T07:11:00.000-07:00

SATRIA TEGUH P
waduh onok apane neng irunge mas....wah iki wes mabuk UBUNTU....sampai2 jarinya dia kira sosis....
btw gmn Bel apa udah punya pacar pa belm nih...di tunggu sama yang di koprasi tuh..!!!
enakkan bisa nGopi gratis tiap hari.....
hahaha..3x sori bel...aku jare arek2 sih tp opo pancen bener yo?

DIAZ COOL

2008-08-16T07:06:00.000-07:00

DIAZ
iki meneng dan bicaranya juga santai mamlum wong jogja...
pak diaz kalau istrinya pak.Ngatno di jogja di panggil siapa pak...Jeng Ngatno ya...
hahaha... orang jogja sopan2 tp sama pak ngatno ga sopan masak Jeng Ngatno
hahahahahaha100x
sesok mangan nang karibun maneh yo

ROBCOIR_1T

2008-08-16T07:01:00.000-07:00

ROMI

nah sakera pasuruan ini udah tertular sama area probolinggo apa lagi dengan gaya bicara kunamnya dia...!!!waduh ampun wes...
dia juga di juluki sibolang karna g pernah pulang dengan linux dan siyumnya dia bunuh kuman bukannya cewek ...ha haha ha4x
pak romi sekrang di mana???
kapan masuk kantor lagi kok keliling terus sich

CILOT

2008-08-16T06:55:00.000-07:00

DAVID KA CD
:)) lucu juga namanya tp lebih lucu lagi panggilannya nih CILOT nah dia pendiem sangking diemnya sampai kadang ketiduran...!!!
nah dengan gayanya yang cool...liat aja!!!
pak mingkem wedi onok laleh melebu
haaaaa hhaaa haa 9x..

ALEX3RNA

2008-08-16T06:50:00.000-07:00

ALEX3RNA
nah kalau yang ini laen kerjanya selalu bikin orang ketawa dengan gayanya yang unik kita2 bisa pada sakit perut deh karna kebanyakan ketawa.....liat aja sendiri
waduh pak alex tumbennya ya bisa gitu...ha.4x
kalau temen2 di mahameru pasti bisa nebak,gitu giman?
sori pak alex....

GONDRONK

2008-08-16T06:39:00.000-07:00

GONDRONK
nah ini namanya arie..kadang dia suka menyiksa aku soalnya kalau di ajak makan dianya sok cuek kadang sampai perutku kagak nahan deh....nunggu satu jam cacingku dah pada pinsan kali' :)) Dengan gayanya yang sok cuek kadang juga nyebelin sih...tp dia juga baik kok :))( jok GR cak iki cuma pura2 baik) ntar kalau aku bilang aneh wah g di ajari lagi sama dia......
sori dronx

Misdit_99

2008-08-16T06:31:00.000-07:00

MISDI
obsesinya dengan Erros bikin otaknya error terus dengan gaya "BISA-BISA"nya kadang bikin orang sekelilingnya suka nertawain dia....
karna dengan gaya Lugunya bikin suasana jd lebih lucu....!!!

SapiderManux

2008-08-16T06:25:00.001-07:00

Hengky
waduh udah sarap kali' ya..dengan gaya bicara yang unik sampai orang laen pada pusing dibuatnya, tp kalau kita santai aja ngadepin nih anak dan harus kosentrasi dengan kata2 yang kamu omongin..kalau g dengan rumus VBnya dia bikin kita jd pusing....:))
bung hengki ini mirip apa ya... ;D

Wahyou_id

2008-08-16T06:18:00.000-07:00

Wahyou_ID
nah kalau yang ini mas wahyou dia salah satu mbah di mahameru dengan bahasa Delphinya dan gayanya yang lucu....bgt.
sampai2 nihya kalau kerja selalu unjuk gigi :)) wes sikatankan pak...!!! dengan rokok 76 dia bisa melewati hari2 dengan sempurna..et jngan salah asbak rokok selalu dia bawa....!!!
sry..Nich pak sekali2 bok yo ganti merk rokoknya

MAHAMERU COMMUNITY

2008-08-16T04:48:00.000-07:00

MAHAMERU HUTAMA
Mahameru Hutama merupakan sebuah badan usaha yang bergerak di bidang perdagangan umum,barang dan jasa. Adapun Perusahaan ini didirikan oleh Didik Hermadi pada tanggal 19 November 1999, berkantor di Jl. Slamet Riyadi no. 97 Probolinggo Jawa Timur. Saat ini Mahameru Hutama sudah berkembang pesat dengan verifikasi usaha yaitu :

1. Penjualan retail dan grosir bidang seluler dan voucher.
2. Callcenter Pulsa Elektronik
3. IT development ( Pembuatan Software )
4. Service Point Center untuk Siemens - Sony Ericsson - Motorola
5. Warung Internet ( warnet ) dan Retail Komputer
6. Event Organizer
7. Pustaka
8. Mini Market

SUSUNAN DIREKSI :

1. Direktur Utama : Didik Hermadi, S.Hut
2. General Manager : Nani Kastip, SH
3. Manager Keuangan : Rossely Ferra H
4. Manager Produksi : Didik Kurnia Wijaya, Dipl
5. Manager IT : Dwi Sulistyo H
6. Manager Pustaka : Dhimas

Nah wes taukan kalau cari saya....ya salah kamar kalau di sini kan bukan termasuk orang petinggi...cuma pekerja doanx :))

MAKAN G' MAKAN

2008-08-10T10:07:00.000-07:00

MAKAN G' MAKAN asal kumpul (seperti lagu slank aja).indahnya saat kita lagi nongkrong n makan bareng2. padahal lagi makan mie aja nich tp seneng banget.....ini tempat dimana aku makan dan nongkrong ma temen2 untuk makan...
N ngobrol2 bercanda...n belajar...!!! TP......belajar apa ya....!! ngerjain tugas kali ya..he3x
abis aku kan lumayan OON tp keren kata ibuku sich..Ha3x

JEMBER TENGGELAM

2008-08-10T09:37:00.000-07:00

JEMBER adalah kota dari kec.PATI yang penah mengalami musibah tanah longsor dan banjir....
hm...berhari2 kita di sana dengan suasana teriakan dan tangisan yang selalu kita dengar.
bersukurlah bagi kita semua yang masih di berikan sehat,dan bisa menikmati keindahan dan ciptaan tuhan.....!!!
jangan pernah kamu sombongkan apa yang kamu miliki karna bisa jadi semua yang kamu miliki akan hilang dengan sekejap.thanks buat Jets Community yang bisa mengajak kita dan memberikan suatu pelajaran2 dan pengalaman yang sangat berarti buat kita. semoga tidak terjadi lagi di alam ini.

GUNUNG BROMO

2008-08-10T09:05:00.000-07:00

GUNUNG BROMO hmmmm.... siapa sih yang g tau gunung bromo yang dingin dan keindahan alam nya T.O.P banget,lautan pasir dan nuansa alam yang begitu indah membuat perjalannanku mengasikan...
apa lagi saat api unggun di nyalakan wih...hangatnya terasa banget...
Maen2 kebromo yuk...dan rasakan dingin dan keindahan alam di sana....sip dah poko'nxa.
Btw udah mau 17 agustus lagi nih gmana jd muncak lagi g....kabari aku ya.

BALI PULAU DEWATA

2008-08-10T07:41:00.000-07:00

BALI satu minggu di bali memberikan kenangan yang tak terlupan.apa lagi saat di Sahid Raya Hotel,Hard rock cafe,Pantai Kute,GWK tempat2 yang menyenangkan banget deh untuk di kunjungi....apa lagi mz goeh yang selalu bikin suasana jadi unik dan mengesankan di setiap perjalananya...
thanks mzgoeh kapan2 kita kebali lagi.....
ntar di Bandara kita mampir di cafe biasanya ceweknya keren lo sekarang ha..3x

NONGKRONG D JALANAN

2008-08-10T07:23:00.000-07:00

SURABAYA bukan surabaya namanya kalau g panas sama macet dengan polusinya..ha.3x
setelah seharian jenuh dengan kerjaan aku ma temen2 nongkrong di Jembatan mer...deketnya STIKOM Surabaya. dengan segelas SUSU Panas cukup dan suasana santai di atas jembatan kita bercanda tawa ma temen2 cukup deh buat ngilangin rasa lelah seharian.....
makasih Bpk. Dimas dan temen2 Mahameru Pustaka Surabaya untuk susu panasnya...
Kapan ya bisa Nongkrong di sana lagi...

PANTAI LUMAJANG

2008-08-10T07:15:00.001-07:00

PANTAI LUMAJANG
lagi main di pantai lumajang nih dengan ombak2 yang gede baget...Pantai Selatan gitu luch.
aku ma Goehzy alias gembel alias teguh...(panjang amat namanya), lg nikmati rasaya ombak dan pemandangan sore di pinggir pantai,...
santai banget rasanya... jd pengen kesana lagi deh
kapan2 kita kesana lagi ya Goeh....

JATIM PARK

2008-08-10T06:37:00.000-07:00

JAWA TIMUR PARK tempat wisata di malang ini memberikan kenangan indah sekaligus buruk buat aku,,abis HandPhone Kesayanganku raib di sana ya ga tau deh....
tp itu pelajaran buat kita agar lebih hati2 saat membawa barang apapun....
di jatim park asik banget loh banyak ilmu yang bisa kita lihat dengan nyata di sana.
Buat Kawan2 di Mahameru kapan nih ke JatimPark Lagi....
tp hati Handphonenya ya...ha..3x

GO TO MAKASSAR

2008-08-10T05:44:00.000-07:00

Makassar kota pedas he..3x, abis mau di bilang apa lagi semua menu masakan di makassar rata2 pedasnya minta ampun deh...
maka di bahari ikan lautnya aneh2 ada yan kotak ada juga ikan hias kalau orang jawa bilang...tp enak banget mantap.
apa lagi SOP soudara,sama COTO makassar..
thanks buat:Bpk. RIFAN,Bpk. ROMMY
dan temen2 di makassar laen kali aku mau coba yang lebih pedas lagi deh...makasih ya.....sampai ketemu lagi :D

JETS N ADJIE

2008-08-10T05:14:00.000-07:00

robBEX N Adjie seru banget liburan bareng sama adjie meskipun acaranya g total liburan sich...
banyak acara yang kita bikin dengan temen JETS COMMUNITY mulai dari acara Bakti Sosial di daerah kabupaten probolinggo untuk 7 kecamatan dengan puluhan desa tertinggal....
Hari - hari itu banyak mengajarkan aku betapa pentingnya memanfaatkan waktu yang kita miliki dan menyisihkan apa yang kita miliki buat mereka.
Mungkin barang yang di anggap kecil dan sering kita abaikan bisa sangat berarti bagi mereka....
thanks ya semua atas pengalaman yang tak terlupakan ini dan buat mas adjie dKK jangan kapok ya nongkrong ma kita2 lagi.... n makasih udah traktir kita makan....kapan nich main2 ke Jets lagi.

JOGJA yang indah

2008-08-10T03:14:00.000-07:00

JOGJA akhirnya Bisa juga Liburan ke jogja, kota yang di idaman memiliki seni dan sejarah ini..
sangking pengennya pergi kejogja di bela-belain nabung berbulan sama temen2 untuk melihat keunikan seni budaya di jogja.....
kita menaiki candi borobudur dan berteriak dengan hati senang...... Mudah2an bisa jalan2 ke Jogja lagi.

JETS RAFTING

2008-08-10T01:20:00.000-07:00

Rafting sama temen Jets di NOARS gila bener arus nya kenceng banget ada acara Game2nya juga yang bikin kita jadi lebih Enjoy di setiap perjalan Belum lagi pas kita lagi melewati Goa Kelelawar2 dan air terjun yang indah banget...
T.O.P banget deh acaranya....
Thanks for All .....

Kapan Lagi Nih dah kangen.....pengen Rafting Lagi. :D

JETS OFFROAD

2008-08-09T23:57:00.000-07:00

JETS OFFROAD Aku sama Mz Goeh Sama Bang Icall lagi nikmatin yang namanya Liburan di Gunung Bromo sambil naikin "Motor Off Road"...ih,, keren banget.!!! jd pengen punya Motor ini... tp gimana ya abis mahal banget tuch motor....
mana cukup gajiku 50 thn jga blm tentu cukup...
ah,,,biarin aja yang penting udah pernah naek...!!!
sampai puas lagi..he..5x kya' XL aja sampai Puas.

Sampai Ketemu lagi Bang Icall
Jangan Kapok Maen2 Sama Anak Jets Community....

Tempant Nongkrong And Inspirasi GW

2008-08-09T23:49:00.001-07:00

Jets Community tempat nongkrong anak2 muda yang gaul,alim,sampai yang bejat juga ada......
kita selalu bersama untuk menemukan suatu solusi dalam setiap bidang usaha dan belajar bagai mana hidup dalam lingkungan...
kita juga selalu kompak meski kadang suka tonjok2kan sesama temen sich.....
Jets selalu memberi inspirasi untuk terus berkarya.
buat temen2 Jets thanks ya atas dukungannya....
sukses selalu ya...

Menampilkan ProcessorId

2008-07-13T19:47:00.001-07:00

LOCAL lcComputerName, loWMI, lowmiWin32Objects, lowmiWin32Object,ProcessorId
lcComputerName = GETWORDNUM(SYS(0),1)
loWMI = GETOBJECT("WinMgmts://" + lcComputerName)
lowmiWin32Objects = loWMI.InstancesOf("Win32_Processor")
FOR EACH lowmiWin32Object IN lowmiWin32Objects
WITH lowmiWin32Object
ProcessorId=TRANSFORM(.ProcessorId)
ENDWITH
ENDFOR
THISFORM.TEXT9.VALUE=ProcessorId

Semoga bermanfaad ya....

Menampilkan Serial Hardisk

2008-07-13T19:46:00.001-07:00

*!* FUNCTION DiskSerial
LPARAMETER cDisk
DECLARE SHORT GetVolumeInformation IN Win32API ;
STRING wroot, ;
STRING wnombuf, ;
LONG wnomsize, ;
STRING wnumero, ;
STRING wmx, ;
STRING wflag, ;
STRING wsysbuf, ;
INTEGER wsyssize
LOCAL wroot, wnombuf, wnumero, wmx
LOCAL wflag, wsysbuf, wnomsize, wsyssize
LOCAL n1,n2,n3,n4, w1,w2,w3,w4
wroot = IIF(EMPTY(cDisk), SYS(5), cDisk + ':') + "\"
wnombuf = SPACE(255)
wnumero = SPACE(10)
wmx = SPACE(255)
wflag = SPACE(255)
wsysbuf = SPACE(255)
wnomsize = 255
wsyssize = 255
GetVolumeInformation (wroot, @wnombuf, @wnomsize, @wnumero, ;
@wmx, @wflag, @wsysbuf, @wsyssize)
n4 = ASC(SUBSTR(wnumero,1,1))
n3 = ASC(SUBSTR(wnumero,2,1))
n2 = ASC(SUBSTR(wnumero,3,1))
n1 = ASC(SUBSTR(wnumero,4,1))
w1 = TRANSFORM(n1,'@0')
w2 = TRANSFORM(n2,'@0')
w3 = TRANSFORM(n3,'@0')
w4 = TRANSFORM(n4,'@0')
thisform.text7.value=RIGHT(w1,2)+"-" + RIGHT(w2,2) + "-" + RIGHT(w3,2) + RIGHT(w4,2)
*!* +DTOC(DATE())+TIME()

Menampilkan nama hari dan Pasaran

2008-07-13T19:41:00.000-07:00

FUNCTION pasaran
LPARAMETERS dmz
local tgl_wage,tgl_cari,jml,modlima,hpas,hari,dino

SET DATE DMY
tgl_wage={^2002/07/07}
store 0 to jml,modlima
tgl_cari=dmz
jml=tgl_cari - tgl_wage
modlima=mod(jml,5)
hari=dow(tgl_cari)

do case
case hari=1
dino='Minggu'
case hari=2
dino='Senin'
case hari=3
dino='Selasa'
case hari=4
dino='Rabu'
case hari=5
dino='Kamis'
case hari=6
dino='Jumat'
case hari=7
dino='Sabtu'
endcase
do case
case modlima=0
hpas='&dino Wage'
case modlima=1
hpas='&dino Kliwon'
case modlima=2
hpas='&dino Legi'
case modlima=3
hpas='&dino Pahing'
case modlima=4
hpas='&dino Pon'
ENDCASE
RETURN hpas

Membuat Game Puzzle dengan Visual FoxPro

2008-07-13T19:29:00.000-07:00

Visual FoxPro tidak harus selalu berurusan dengan Database lho ?
VFP bisa juga digunakan untuk membuat Game yang sederhana,
seperti game puzzle ini. Kopi-kan coding dibawah ini ke File .PRG kemudian jalankan File .PRG
dari Command Window dengan perintah "Do " .... Have Fun :-)
Sorot coding dibawah ini, kemudian kopi-kan ke File .PRG ....

SET TALK OFF
SET BELL OFF

LOCAL oForm
oForm = CREATEOBJECT("menuutama")
oForm.SHOW()
READ EVENTS

CLOSE ALL
CLEAR ALL
RETURN

DEFINE CLASS ConvertToBMP AS CUSTOM

DWORDOFFSET = 2147483648
WORDOFFSET = 32768
FileGambar = ""
FileBMP = ""
Ukuran = 0

PROCEDURE Convert
LOCAL x, Y, tinggi, lebar
x = CREATEOBJECT('form')
x.CAPTION="Konversi Grafis"
x.ALWAYSONTOP=.T.
x.WIDTH=644
x.HEIGHT=500
x.BACKCOLOR = RGB(255,255,255)
x.ADDOBJECT('Gambar','Image')
Y = x.Gambar
Y.PICTURE = THIS.FileGambar
IF (Y.WIDTH>640) .OR. (Y.HEIGHT>480)
IF (Y.WIDTH>Y.HEIGHT)
lebar=640
tinggi=(640*(Y.HEIGHT/Y.WIDTH))+1
ELSE
tinggi=480
lebar=(480*(Y.WIDTH/Y.HEIGHT))+1
ENDIF
Y.STRETCH = 1
Y.WIDTH=lebar
Y.HEIGHT=tinggi
ELSE
Y.STRETCH = 0
ENDIF
Y.MOVE(1,1)
Y.VISIBLE = .T.
x.ADDOBJECT("Lab1","Label")
x.lab1.BACKSTYLE=0
x.lab1.AUTOSIZE=.T.
x.lab1.CAPTION="Silakan tunggu, konversi grafis sedang dalam proses ..."
x.lab1.FONTSIZE=10
x.lab1.FONTBOLD=.T.
x.lab1.TOP=482
x.lab1.LEFT=5
x.lab1.VISIBLE=.T.
tinggi=FLOOR(Y.HEIGHT/THIS.Ukuran)
lebar=FLOOR(Y.WIDTH/THIS.Ukuran)
x.SHOW()

hitung=0
FOR a=1 TO THIS.Ukuran
FOR b=1 TO THIS.Ukuran
IF !((a=THIS.Ukuran) AND (b=THIS.Ukuran))
hitung = hitung + 1
IF hitung<10
chitung="0"+STR(hitung,1)
ELSE
chitung=STR(hitung,2)
ENDIF
WAIT WINDOW "Membuat Potongan Gambar yang ke-"+TRANSFORM(hitung) NOWAIT
THIS.BuildBMP(x,THIS.FileBMP+chitung+".BMP",Y.LEFT+((b-1)*lebar),Y.LEFT+(b*lebar),Y.TOP+((a-1)*tinggi),Y.TOP+(a*tinggi))
ENDIF
ENDFOR
ENDFOR
WAIT WINDOW "Konversi Grafis selesai" NOWAIT
x.RELEASE
ENDPROC

PROCEDURE BuildBMP
LPARAMETERS toForm, tcFile, tnX1, tnX2, tnY1, tnY2
LOCAL nX1, nX2, nY1, nY2, nWidth, nHeight, nPixels, i, j, cBMP, cColArray,cPad
nX1 = THIS.TVL(tnX1, 0)
nX2 = THIS.TVL(tnX2, toForm.WIDTH-1)
nY1 = THIS.TVL(tnY1, 0)
nY2 = THIS.TVL(tnY2, toForm.HEIGHT-1)
nWidth = nX2 - nX1 + 1

cPad = REPLICATE(CHR(0),MOD(nWidth,4))

nHeight = nY2 - nY1 + 1
nPixels = nWidth * nHeight
IF nPixels <>
RETURN .F.
ENDIF

cBMP = 'BM' + THIS.NumToDWord(54 + nWidth * nHeight * 3) + THIS.NumToWord(0) + THIS.NumToWord(0) + THIS.NumToDWord(54)
cBMP = cBMP + THIS.GetBMPInfoHeader(nWidth, nHeight)
cColArray = ''
FOR j = nY2 TO nY1 STEP -1
FOR i = nX1 TO nX2
cColArray = cColArray + THIS.GetBinaryColor(toForm.POINT(i,j))
ENDFOR
cColArray = cColArray + cPad
ENDFOR
cBMP = cBMP + cColArray
STRTOFILE(cBMP, tcFile)
ENDPROC

PROCEDURE GetBMPInfoHeader
LPARAMETERS tnWidth, tnHeight
LOCAL cHeader, cZero
cZero = THIS.NumToDWord(0)
cHeader = THIS.NumToDWord(40) + THIS.NumToDWord(tnWidth) + THIS.NumToDWord(tnHeight)
cHeader = cHeader + THIS.NumToWord(1) + THIS.NumToWord(24) + cZero + cZero
cHeader = cHeader + THIS.NumToDWord(3780) + THIS.NumToDWord(3780) + cZero + cZero
RETURN cHeader
ENDPROC

PROCEDURE GetBinaryColor
LPARAMETERS tnColor
RETURN SUBSTR(BINTOC(MAX(tnColor,0) - THIS.DWORDOFFSET),2)
ENDPROC

PROCEDURE NumToDWord
LPARAMETERS tnVal
LOCAL cBin
cBin = BINTOC(tnVal - THIS.DWORDOFFSET)
RETURN SUBSTR(cBin,4,1) + SUBSTR(cBin,3,1) + SUBSTR(cBin,2,1) +SUBSTR(cBin,1,1)
ENDPROC

PROCEDURE NumToWord
LPARAMETERS tnVal
LOCAL cBin
cBin = BINTOC(tnVal - THIS.WORDOFFSET, 2)
RETURN SUBSTR(cBin,2,1) + SUBSTR(cBin,1,1)
ENDPROC

PROCEDURE TVL
LPARAMETERS tuParamValue, tuInitValue
RETURN IIF(VARTYPE(tuParamValue) = VARTYPE(tuInitValue), tuParamValue,tuInitValue)
ENDPROC
ENDDEFINE

DEFINE CLASS gamepuzzle AS FORM

TOP = 3
LEFT = 9
HEIGHT = 500
WIDTH = 683
CAPTION = "Permainan Puzzle, http://www.fox-id.com"
MAXBUTTON = .F.
poskosong = (0)
Ukuran = (0)
NAME = "gamepuzzle"
mode_acak = .F.

ADD OBJECT command1 AS COMMANDBUTTON WITH ;
AUTOSIZE = .T., ;
TOP = 465, ;
LEFT = 7, ;
HEIGHT = 27, ;
WIDTH = 116, ;
CAPTION = "\ NAME = "Command1"

PROCEDURE acak
LOCAL nilai,cString
THISFORM.LOCKSCREEN= .T.
THISFORM.mode_acak=.T.
FOR a=1 TO (THISFORM.Ukuran*100)
nilai=MOD(FLOOR(RAND()*100),4)
DO CASE
CASE nilai=0 && Atas
cString=THISFORM.cari(THISFORM.poskosong-THISFORM.Ukuran)
CASE nilai=1 && Kanan
cString=THISFORM.cari(THISFORM.poskosong+1)
CASE nilai=2 && Bawah
cString=THISFORM.cari(THISFORM.poskosong+THISFORM.Ukuran)
CASE nilai=3 && Kiri
cString=THISFORM.cari(THISFORM.poskosong-1)
ENDCASE
IF !EMPTY(cString)
THISFORM.&cString..CLICK
ENDIF
ENDFOR
THISFORM.LOCKSCREEN= .F.
THISFORM.mode_acak=.F.
RETURN
ENDPROC

PROCEDURE cari
LPARAMETERS npos
LOCAL abc, cString, balik, ketemu
ketemu=.F.
FOR abc=1 TO ((THISFORM.Ukuran^2)-1)
cString="Puzzle"+IIF(abc>9,STR(abc,2),"0"+STR(abc,1))
IF THISFORM.&cString..Posisi=npos
ketemu=.T.
balik=cString
EXIT
ENDIF
ENDFOR
IF !ketemu
balik=""
ENDIF
RETURN (balik)
ENDPROC

PROCEDURE menang
LOCAL win, cString
win=.T.
FOR abc=1 TO ((THISFORM.Ukuran^2)-1)
cString="Puzzle"+IIF(abc>9,STR(abc,2),"0"+STR(abc,1))
IF THISFORM.&cString..Posisi!=abc
win=.F.
EXIT
ENDIF
ENDFOR
RETURN (win)
ENDPROC

PROCEDURE INIT
LOCAL hitung, cString
CLEAR RESOURCES
DO CASE
CASE settings.Ukuran=1
THISFORM.Ukuran = 4
CASE settings.Ukuran=2
THISFORM.Ukuran = 6
CASE settings.Ukuran=3
THISFORM.Ukuran = 8
ENDCASE
hitung=0
THISFORM.poskosong=THISFORM.Ukuran^2
FOR kolom=1 TO THISFORM.Ukuran
FOR baris=1 TO THISFORM.Ukuran
IF !((kolom=THISFORM.Ukuran) .AND. (baris=THISFORM.Ukuran))
hitung = hitung + 1
cString = "Puzzle"+IIF(hitung>9,STR(hitung,2),"0"+STR(hitung,1))
THISFORM.ADDOBJECT(cString,"Potongan")
THISFORM.&cString..PICTURE=SYS(2023)+"\Fox_ID"+cString+".BMP"
THISFORM.&cString..LEFT=10+(baris-1)*THISFORM.&cString..WIDTH
THISFORM.&cString..TOP=10+(kolom-1)*THISFORM.&cString..HEIGHT
THISFORM.&cString..Posisi=hitung
THISFORM.&cString..VISIBLE = .T.
ENDIF
ENDFOR
ENDFOR
THISFORM.WIDTH=20+(THISFORM.&cString..WIDTH*THISFORM.Ukuran)
THISFORM.HEIGHT=70+(THISFORM.&cString..HEIGHT*THISFORM.Ukuran)
THISFORM.command1.TOP=THISFORM.HEIGHT - 45
THISFORM.BORDERSTYLE= 2
THISFORM.AUTOCENTER= .T.
THISFORM.acak
ENDPROC

PROCEDURE command1.CLICK
LOCAL oForm
oForm = CREATEOBJECT('form')
WITH oForm
.CAPTION = "Gambar Aslinya"
.ALWAYSONTOP = .T.
.MAXBUTTON = .F.
.WIDTH = 644
.HEIGHT = 484
.BACKCOLOR = RGB(255,255,255)
.ADDOBJECT('Gambar','Image')
Y = .Gambar
ENDWITH
Y.PICTURE = settings.path_pic
IF (Y.WIDTH>640) .OR. (Y.HEIGHT>480)
IF (Y.WIDTH>Y.HEIGHT)
lebar=640
tinggi=(640*(Y.HEIGHT/Y.WIDTH))+1
ELSE
tinggi=480
lebar=(480*(Y.WIDTH/Y.HEIGHT))+1
ENDIF
Y.STRETCH = 1
Y.WIDTH = lebar
Y.HEIGHT = tinggi
ELSE
Y.STRETCH = 0
ENDIF
Y.MOVE(1,1)
Y.VISIBLE = .T.
oForm.AUTOCENTER = .T.
oForm.SHOW(1)
ENDPROC

ENDDEFINE

DEFINE CLASS menuutama AS FORM

DATASESSION = 2
HEIGHT = 296
WIDTH = 418
AUTOCENTER = .T.
BORDERSTYLE = 2
CAPTION = "Permainan Puzzle"
NAME = "menuutama"

ADD OBJECT edit1 AS EDITBOX WITH ;
HEIGHT = 132, ;
LEFT = 23, ;
READONLY = .T., ;
TOP = 10, ;
WIDTH = 371, ;
NAME = "Edit1"

ADD OBJECT command1 AS COMMANDBUTTON WITH ;
AUTOSIZE = .T., ;
TOP = 152, ;
LEFT = 23, ;
HEIGHT = 27, ;
WIDTH = 97, ;
CAPTION = "Ambil Gambar", ;
NAME = "Command1"

ADD OBJECT namafile AS LABEL WITH ;
BACKSTYLE = 0, ;
CAPTION = "", ;
HEIGHT = 17, ;
LEFT = 125, ;
TOP = 158, ;
WIDTH = 278, ;
NAME = "NamaFile"

ADD OBJECT optiongroup2 AS OPTIONGROUP WITH ;
AUTOSIZE = .T., ;
BUTTONCOUNT = 3, ;
BACKSTYLE = 0, ;
VALUE = 1, ;
HEIGHT = 65, ;
LEFT = 23, ;
TOP = 202, ;
WIDTH = 133, ;
NAME = "Optiongroup2", ;
Option1.BACKSTYLE = 0, ;
Option1.CAPTION = "Pemula ( 4 x 4)", ;
Option1.VALUE = 1, ;
Option1.HEIGHT = 17, ;
Option1.LEFT = 5, ;
Option1.STYLE = 0, ;
Option1.TOP = 5, ;
Option1.WIDTH = 123, ;
Option1.AUTOSIZE = .F., ;
Option1.NAME = "Option1", ;
Option2.BACKSTYLE = 0, ;
Option2.CAPTION = "Profesional ( 6 x 6 )", ;
Option2.HEIGHT = 17, ;
Option2.LEFT = 5, ;
Option2.STYLE = 0, ;
Option2.TOP = 24, ;
Option2.WIDTH = 123, ;
Option2.AUTOSIZE = .F., ;
Option2.NAME = "Option2", ;
Option3.BACKSTYLE = 0, ;
Option3.CAPTION = "Mahir ( 8 x 8 )", ;
Option3.HEIGHT = 17, ;
Option3.LEFT = 5, ;
Option3.STYLE = 0, ;
Option3.TOP = 43, ;
Option3.WIDTH = 123, ;
Option3.AUTOSIZE = .F., ;
Option3.NAME = "Option3"

ADD OBJECT label3 AS LABEL WITH ;
AUTOSIZE = .T., ;
BACKSTYLE = 0, ;
CAPTION = "Tingkatan :", ;
HEIGHT = 17, ;
LEFT = 23, ;
TOP = 184, ;
WIDTH = 62, ;
NAME = "Label3"

ADD OBJECT command2 AS COMMANDBUTTON WITH ;
TOP = 206, ;
LEFT = 244, ;
HEIGHT = 60, ;
WIDTH = 84, ;
FONTBOLD = .T., ;
FONTSIZE = 14, ;
CAPTION = "\ NAME = "Command2"

ADD OBJECT label2 AS LABEL WITH ;
AUTOSIZE = .T., ;
FONTBOLD = .T., ;
BACKSTYLE = 0, ;
CAPTION = "http://www.fox-id.com , Komunitas Programmer FoxPro Indonesia", ;
HEIGHT = 17, ;
LEFT = 5, ;
TOP = 275, ;
WIDTH = 373, ;
FORECOLOR = RGB(255,0,0), ;
NAME = "Label2"

PROCEDURE INIT
SET TALK OFF
SET BELL OFF
IF FILE("Settings.DBF")
USE settings.DBF ALIAS settings IN 0
THISFORM.namafile.CAPTION=settings.path_pic
THISFORM.optiongroup2.VALUE=settings.Ukuran
ELSE
CREATE TABLE settings FREE ( path_pic M(4), Ukuran N(1) )
APPEND BLANK
THISFORM.namafile.CAPTION=""
ENDIF
THISFORM.edit1.VALUE=;
"Permainan ini saya dedikasikan untuk para pecinta Visual FoxPro di Indonesia pada umumnya, dan pengunjung Fox-ID pada "+;
"khususnya. Semoga game ini bisa menjadi penghibur dikala suntuk bikin program ... hehehehe"+CHR(013)+CHR(013)+;
"Salam,"+CHR(013)+CHR(013)+;
"Handi Rusli"
RETURN
ENDPROC

PROCEDURE DESTROY
CLEAR EVENTS
ENDPROC

PROCEDURE command1.CLICK
THISFORM.namafile.CAPTION=GETPICT()
RETURN
ENDPROC

PROCEDURE command2.CLICK
IF EMPTY(THISFORM.namafile.CAPTION)
=MESSAGEBOX("Gambar belum dipilih",48,"Oops !!!")
ELSE
LOCAL oConvert, oFormPuzzle
IF !(ALLTRIM(settings.path_pic)==THISFORM.namafile.CAPTION) .OR. (settings.Ukuran!=THISFORM.optiongroup2.VALUE)
REPLACE path_pic WITH THISFORM.namafile.CAPTION, ;
Ukuran WITH THISFORM.optiongroup2.VALUE IN settings
FLUSH
oConvert=CREATEOBJECT("ConvertToBMP")
oConvert.FileGambar=THISFORM.namafile.CAPTION
oConvert.FileBMP=SYS(2023)+"\Fox_IDPuzzle"
DELETE FILE (SYS(2023)+"\Fox_IDPuzzle*.BMP")
DO CASE
CASE THISFORM.optiongroup2.VALUE=1
oConvert.Ukuran=4
CASE THISFORM.optiongroup2.VALUE=2
oConvert.Ukuran=6
CASE THISFORM.optiongroup2.VALUE=3
oConvert.Ukuran=8
ENDCASE
oConvert.Convert
ENDIF
oFormPuzzle=CREATEOBJECT("GamePuzzle")
oFormPuzzle.SHOW(1)
ENDIF
RETURN
ENDPROC

ENDDEFINE

DEFINE CLASS potongan AS IMAGE

BORDERSTYLE = 1
HEIGHT = 90
WIDTH = 100
Posisi = (0)
NAME = "potongan"

PROCEDURE CLICK
LOCAL nPindah
DO CASE
CASE settings.Ukuran=1
nPindah = 4
CASE settings.Ukuran=2
nPindah = 6
CASE settings.Ukuran=3
nPindah = 8
ENDCASE
DO CASE
CASE (THIS.Posisi+nPindah)=THIS.PARENT.poskosong && turun ke bawah
THIS.TOP=THIS.TOP+THIS.HEIGHT
THIS.PARENT.poskosong=THIS.Posisi
THIS.Posisi=THIS.Posisi+nPindah
CASE (THIS.Posisi-nPindah)=THIS.PARENT.poskosong && naik ke atas
THIS.TOP=THIS.TOP-THIS.HEIGHT
THIS.PARENT.poskosong=THIS.Posisi
THIS.Posisi=THIS.Posisi-nPindah
CASE (((THIS.Posisi-1)=THIS.PARENT.poskosong) .AND. (MOD(THIS.Posisi,nPindah)!=1)) && bergeser ke kiri
THIS.LEFT=THIS.LEFT-THIS.WIDTH
THIS.PARENT.poskosong=THIS.Posisi
THIS.Posisi=THIS.Posisi-1
CASE (((THIS.Posisi+1)=THIS.PARENT.poskosong) .AND. (MOD(THIS.Posisi,nPindah)!=0)) && bergeser ke kanan
THIS.LEFT=THIS.LEFT+THIS.WIDTH
THIS.PARENT.poskosong=THIS.Posisi
THIS.Posisi = THIS.Posisi + 1
ENDCASE
IF !(THIS.PARENT.mode_acak)
IF THIS.PARENT.menang()
=MESSAGEBOX("Anda Menang",64,"Horeee !!!")
ENDIF
ENDIF
ENDPROC

ENDDEFINE

nah ini membuktikan bahwa visual foxpro tidak kalah menariknya sama pemrograman lainnya
selamat menikmati gamenya deh.....(supported by Taz fox-id)

Buat Merubah string kalimat ke string bulan

2008-07-13T19:28:00.000-07:00

* buat ngubah string kalimat ke string bulan
Function UBAH_BLNN
Parameters _BLNKE
Do Case
Case _BLNKE='Januari'
_SAYBLN='01'
Case _BLNKE='Pebruari'
_SAYBLN='02'
Case _BLNKE='Maret'
_SAYBLN='03'
Case _BLNKE='April'
_SAYBLN='04'
Case _BLNKE='Mei'
_SAYBLN='05'
Case _BLNKE='Juni'
_SAYBLN='06'
Case _BLNKE='Juli'
_SAYBLN='07'
Case _BLNKE='Agustus'
_SAYBLN='08'
Case _BLNKE='September'
_SAYBLN='09'
Case _BLNKE='Oktober'
_SAYBLN='10'
Case _BLNKE='Nopember'
_SAYBLN='11'
Case _BLNKE='Desember'
_SAYBLN='12'
Endcase
Return _SAYBLN
Endfunc

Buat ngubah ke nama hari

2008-07-13T19:27:00.000-07:00

Function nama_hari
Parameters _harike
_sayhari=''
Do Case
Case _harike=1
_sayhari='Minggu'
Case _harike=2
_sayhari='Senin'
Case _harike=3
_sayhari='Selasa'
Case _harike=4
_sayhari='Rabu'
Case _harike=5
_sayhari='Kamis'
Case _harike=6
_sayhari='Jumat'
Case _harike=7
_sayhari='Sabtu'
Endcase
Return _sayhari
Endfunc

Buat merubah string bulan ke string kalimat

2008-07-13T19:21:00.000-07:00

Function nama_bulan
Parameters _BLNKE
Do Case
Case _BLNKE='01'
_SAYBLN='Januari'
Case _BLNKE='02'
_SAYBLN='Pebruari'
Case _BLNKE='03'
_SAYBLN='Maret'
Case _BLNKE='04'
_SAYBLN='April'
Case _BLNKE='05'
_SAYBLN='Mei'
Case _BLNKE='06'
_SAYBLN='Juni'
Case _BLNKE='07'
_SAYBLN='Juli'
Case _BLNKE='08'
_SAYBLN='Agustus'
Case _BLNKE='09'
_SAYBLN='September'
Case _BLNKE='10'
_SAYBLN='Oktober'
Case _BLNKE='11'
_SAYBLN='Nopember'
Case _BLNKE='12'
_SAYBLN='Desember'
Endcase
Return _SAYBLN
Endfunc

bereskan jadi nanti bulan pada date() akan menjadi 1 januari 2008.gitu kali ya
met coba aja deh...

Menutup/menonaktifkan table/cursor

2008-07-13T19:19:00.000-07:00

FUNCTION lepaskan
PARAMETERS C1,C2,C3,C4,C5,C6,C7,C8,C9,C10
FOR U=1 TO 10
CU=ALLTRIM(STR(U))
IF ! EMPTY(C&CU)
IF USED(C&CU)
cur=C&CU
USE IN &cur
ENDIF
ENDIF
NEXT
ENDFUNC

penggunaannya mudah tinggal ketik:
lepaskan('nama cursornya')
beres deh.....
selamat mencoba ya....(supported by Echo)

program konversi angka ke kata-kata

2008-07-13T19:04:00.000-07:00

* duit.prg
* 18 Januari 2002
* program konversi angka ke kata-kata
* dari 0 hingga 999 Milyar
* Pemakaian
* ?duit(100) atau rupiah=duit(100)
*-------------------------------------
para nilai
set fixe off
set deci to 9
if set('TALK')='ON'
set talk off
endif
hasil=""
jt=10^6
my=10^9
do case
case nilai>=0 and nilai<=99
hasil=pilih(nilai)
case nilai>=100 and nilai<=999
hasil=ratusan(nilai)
case nilai>=1000 and nilai<=999999
hasil=ribuan(nilai)
case nilai>=jt and nilai<=999.999999*jt
hasil=jutaan(nilai)
case nilai>=my and nilai<=999.999999999*my
hasil=pilih(int(nilai/my))+" Milyar"+;
iif(mod(nilai,my)=0,"",pilih(mod(nilai,my)))
endcase
RETU ltri(hasil)

FUNC PILIH
para n
do case
case n>=0 and n<=9
has=satuan(n+1)
case n>=10 and n<=19
has=belasan(n)
case n>=20 and n<=99
has=puluhan(n)
case n>=100 and n<=999
has=ratusan(n)
case n>=1000 and n<=999999
has=ribuan(n)
case n>=jt and n<=999.999999*jt
has=jutaan(n)
endcase
RETU has

FUNC SATUAN
para n
nil="Nol Satu Dua Tiga Empat Lima Enam Tujuh Delapan SembilanSepuluh "
RETU " "+rtri(subs(nil,n*8-7,8))

FUNC BELASAN
para n
RETU iif(n=10," Sepuluh",iif(n=11," Sebelas",satuan(mod(n,10)+1)+"belas"))

FUNC PULUHAN
para n
RETU satuan(int(n/10)+1)+"puluh"+iif(mod(n,10)=0,"",satuan(mod(n,10)+1))

FUNC RATUSAN
para n
RETU iif(int(n/100)=1," Seratus",satuan(int(n/100)+1)+"ratus")+;
iif(mod(n,100)=0,"",pilih(mod(n,100)))

FUNC RIBUAN
para n
RETU iif(int(n/1000)=1," Seribu",pilih(int(n/1000))+" Ribu")+;
iif(mod(n,1000)=0,"",pilih(mod(n,1000)))

FUNC JUTAAN
para n
RETU pilih(int(n/jt))+" Juta"+iif(mod(n,jt)=0,"",pilih(mod(n,jt)))

tinggal copy n paste aja di code simpan dengan nama duit.prg
jadi deh selamat mencoba ya....(supported by N.edy s)

Untuk Membuat text berjalan pada Titelbar

2008-06-30T02:07:00.000-07:00

ketik koding di bawah ini pada object: timer dan procedure: Timer
******
a=thisform.caption
thisform.caption=right(a,len(a)-1)+left(a,1)

jngan lupa interval timer anda di isi : 300
semoga bermanfaat :D

Menampilkan Direktori program anda di VFP

2008-06-30T02:01:00.000-07:00

untuk melihat menampilkan Direktori program ada di program anda...!!!
-object : label1
-procedure : init
-Koding : this.caption="Direktori program : "+sys(5)+sys(2003)

semoga bermanfaat ya....

Contoh koding Enkripsi dan koding Dekripsinya yg lain adalah spt ini

2008-06-30T01:44:00.000-07:00

FUNCTION crypted
LPARAMETERS tcword
LOCAL n,lcpass,lcchar
lcpass=''
FOR n=1 TO LEN(tcword)
lcchar=ASC('X') + ASC(SUBSTR(tcword, n, 1))
lcpass=lcpass+CHR(lcchar)
NEXT
RETURN lcpass

====================================================

FUNCTION decrypted
LPARAMETERS tcpass
LOCAL n,lcchar,lcword
lcword=''
FOR n=1 TO LEN(tcpass)
lcchar=ASC(SUBSTR(tcpass, n, 1))- ASC('X')
lcword=lcword+CHR(lcchar)
NEXT
RETURN lcword

cara testnya sama dengan ekripsi sebelumnya cuma beda di hasilnya saja....
(supported by mztolo)

Validasi TextBox Lostfocus di Visual Foxpro

2008-06-30T01:41:00.000-07:00

Validasi textbox bisa dilakukan pada lostfocus tidak selalu dengan valid events
kalau kita ingin validasi TextBox agar jika user salah isi user tidak bisa pindah ke prompt textbox berikutnya anda bisa menggunakan control pada lostfocus dengan syntax 'NODEFAULT'
copy and paste code berikut pada textbox lostfocus
sesuai dengan pengecekan anda(supported by taz)

******
IF This.Value # myvaluecheck then
MESSAGEBOX("Data yg diisi salah",16,"Stop")
NODEFAULT
ENDIF

Contoh koding “Dekripsi”nya

2008-06-30T01:36:00.000-07:00

FUNCTION dekripsi
LPARAMETERS data_asli
LOCAL xx,yy,zz,ww,aa,i,cc
STORE 0 TO i,bb,ww
STORE '' TO xx,yy,zz,aa,cc,dd
xx='MNOPQRSTUVWXYZABCDEFGHIJKL'
yy='ABCDEFGHIJKLMNOPQRSTUVWXYZ'
zz=ALLTRIM(UPPER(data_asli))
ww=LEN(zz)
FOR i=1 TO ww
aa=SUBSTR(zz,i,1)
bb=AT(aa,xx)
cc=SUBSTR(yy,bb,1)
dd=dd+cc
ENDFOR
RETURN dd

Contoh koding “Enkripsi” Password

2008-06-30T01:29:00.000-07:00

FUNCTION enkripsi
LPARAMETERS data_asli
LOCAL xx,yy,zz,ww,aa,i,cc
STORE 0 TO i,bb,ww
STORE '' TO xx,yy,zz,aa,cc,dd
xx='ABCDEFGHIJKLMNOPQRSTUVWXYZ'
yy='MNOPQRSTUVWXYZABCDEFGHIJKL'
zz=ALLTRIM(UPPER(data_asli))
ww=LEN(zz)
FOR i=1 TO ww
aa=SUBSTR(zz,i,1)
bb=AT(aa,xx)
cc=SUBSTR(yy,bb,1)
dd=dd+cc
ENDFOR
RETURN dd

Misal function ini anda simpan “c:\rahasia.prg”
Cara menjalankannya…..
Set procedure to c:\test.prg
? test("kata2 anda")
Maka akan tampak dilayar enkripsinya yang d hasilkan smoga bermanfaat(support by mztolo)

Chek IP Komputer anda Lewat Visual Foxpro

2008-06-30T01:23:00.000-07:00

IPcomp = CREATEOBJECT('MSWinsock.Winsock.1')
MESSAGEBOX(IPcomp.LocalIP,64+0,"Ini adalah IP address")
semoga bermanfaat....untuk anda

Shortcut Aplikasi Anda Pada Desktop

2008-06-30T01:18:00.000-07:00

Tips membuat shortcut aplikasi anda pada windows desktop dengan menggunakan Visual Foxpro Untuk bentuk icon anda tentukan saat build app(.EXE)

oWsh= CREATEOBJECT("wscript.shell")
cDeskPath = oWsh.SpecialFolders("desktop")
oShort = oWsh.CreateShortcut(cDeskpath+"\FoxKu.LNK")
oShort.TargetPath = "c:\FoxKu.EXE"

oShort.Save

Smoga bermanfaat ya ...:D

Pengenalan Visual foxpro dan fiturnxa

2008-06-27T21:06:00.000-07:00

Microsoft Visual FoxPro 9.0 merupakan aplikasi database handal yang sangat mudah untuk dipelajari, meskipun demikian, bagi yang baru saja belajar, tentunya akan mengalami banyak kesulitan untuk memahami software database keluaraan Microsoft ini. Didalam program Visual FoxPro 9.0 mempunyai banyak sekali aplikasi pengembang yang dapat dimanfaatkan untuk merancang sebuah aplikasi yang bagus.

Beberapa pengembang aplikasi yang dimilikinya adalah : Form Designer, View Designer, Menu Designer, Report Designer, Database Designer, Tabel Designer, Query Designer, Class Designer, project manager, Debugger, Jendela Command serta Program Editor.

Saat ini Pemerintah Indonesia sedang melaksanakan program pengentasan kemiskinan, tentunya tidak hanya dibutuhkan suatu database orang-orang miskin saja, akan tetapi dibutuhkan pula orang yang mahir mengolah database dengan baik dan benar sehingga menghasilkan data yang akurat dan dapat dipertanggung jawabkan.

Melaluibahasan materi ini, saya berharap dapat membantu kepada para calon pengolah data atau para pengolah data yang selama ini didalam mengolah database menggunakan program pengolah angka seperti Microsoft Excel untuk beralih menggunakan program database dari Microsoft Visual FoxPro 9.0. Banyak sekali orang yang dapat membuat program database dengan program Microsoft Visual FoxPro 9.0 ini, tapi kebanyakan mereka puas jika telah berhasil membuat Form tampilan. Setelah itu mundur teratur kemudian berusaha mencoba program database lain, kemudian mundur kembali, ini dikarenakan mereka tidak mengerti cara membuat perintah untuk melakukan pengolahan data hingga terciptanya laporan yang baik dan benar sesuai yang diharapkan. Jika anda memulai belajar Visual FoxPro 9.0 tanpa adanya pemahaman awal tentang database, maka akan sulit bagi anda untuk menjadi pengolah data atau programmer database yang handal. Pemahaman database secara Interaktif mendukung anda didalam mengasah logika dan mengenal berbagai macam perintah yang dapat dipakai hingga dapat menghasilkan laporan yang dikehendaki.

Siapapun dapat saja mendesain form dengan warna yang bagus dan tampilan yang menarik, akan tetapi itu saja tidak banyak bermanfaat apabila form tersebut tidak dapat digunakan secara maksimal, seperti misal mengolah data yang di input melalui form yang membutuhkan adanya batasan validasi, bagaimana cara melakukan koreksi, penghapusan data, pemprosesan data, hingga jadi laporan yang sesuai dengan yang diharapkan. Anda bisa saja membuat suatu tabel dengan program Microsoft Visual FoxPro 9.0, kemudian mencetaknya semua data didalam tabel tersebut seperti mencetak pada program Microsoft Excel, tetapi begitu ada suatu kriteria atau syarat yang diinginkan didalam pencetakan, tentunya anda membutuhkan suatu perintah.Didalam bahasan ini diberikan pula bagaimana melakukan pengolahan data dan membuatan laporan pada kasus tertentu dari Microsoft Visual FoxPro 9.0 kedalam program Microsoft Excel atau sebaliknya.

Jika anda perhatikan pertama kali menjalankan program Visual FoxPro, maka terdapat Jendela Visual FoxPro, Jendela View, Toolbar dan Menu Utama Visual FoxPro. Pada Jendela Visual FoxPro ini anda dapat menuliskan perintah dan logika dari Microsoft Visual FoxPro dimana masing-masing perintah akan menjalankan dan menghasilkan keluaran sesuai dari fungsinya.

Jendela Visual FoxPro dari Microsoft Visual FoxPro ini sangat unik, saya katakan unik karena hampir semua perintah baik Internal dari Microsoft Visual FoxPro maupun perintah External dari sistem Operasi / Dos dapat dikenal dan dijalankan dari Jendela Visual FoxPro ini.

1. Manipulasi Jendela Visual FoxPro.

Tampilan atau posisi dari Jendela Visual FoxPro dapat dimanipulasi sesuai kebutuhan, sehingga tampilannya sesuai dengan yang diharapkan.

2. Memindahkan letak dari Jendela Visual FoxPro.

Posisi Jendela Visual FoxPro dapat dipindahkan ke segala arah, dengan cara menyeretnya ke lokasi baru dimana Jendela Visual FoxPro akan ditempatkan.

3. Menghilangkan sisa histori perintah yang pernah diketikan pada Jendela Visual FoxPro

Jika anda mengetikan perintah pada Jendela Visual FoxPro, maka perintah tersebut akan direkam dan dapat digunakan kembali, tetapi jika perintah tersebut sudah banyak dan akan dihilangkan dari dalan Jendela Visual FoxPro, maka lakukan cara berikut ini: klik kanan mouse pada posisi dimana Jendela Visual FoxPro berada, pilih Clear.

4. Menyembunyikan serta menampilkan Jendela Visual FoxPro.

Jika Jendela Visual FoxPro akan di sembunyikan atau ditampilkan, maka untuk melakukan itu terdapat banyak cara diantaranya :

Dari menu windows pilih Visual FoxPro Window

Tekan kombinasi tombol Ctrl dan F2

5. Menampilkan Jendela Visual FoxPro diatas jendela lainnya.

Jika anda menginginkan Jendela Visual FoxPro tampil selalu diatas dari jendela lainnya maka pada batang title Jendela Visual FoxPro klik kanan mouse pilih Dockable "Dockable" .

Jika ada jendela lain seperti jendela project manager yang sedang dibuka, maka cobalah anda geser posisi Jendela Visual FoxPro dan letakan diatas jendela project manager atau jendela lainnya, maka akan tampak terlihat bahwa posisi dari Jendela Visual FoxPro yang telah di Dockable akan tampak selalu berada diatasnya.

6. Melebarkan / mengecilkan tampilan Jendela Visual FoxPro.

Jika anda rasa keberadaan Jendela Visual FoxPro terlalu kecil atau terlalu besar maka Jendela Visual FoxPro dapat dirubah sesuai keinginan dengan cara:

Tempatkan pointer mouse pada sisi Jendela Visual FoxPro hingga tanda pointer berubah menjadi tanda panah dua arah, klik, dan tahan mouse anda, kemudian geser kearah kanan untuk membesarkan dan ke kiri untuk mengecilkan Jendela Visual FoxPro

7. Membersihkan layar view.

Jika anda mengolah data maka secara otomatis hasil perintah yang anda ketikan akan tampak hasilnya pada jendela view. Untuk menghilangkan tampilan hasil dari ketikan perintah yang anda ketikan tadi, ketikan perintah Clear. Dengan perintah ini maka layar Visual FoxPro 9.0 akan menjadi bersih kembali.

8. Mengatur konfigurasi visual foxpro 9.0

Untuk mengatur konfigurasi Visual FoxPro 9.0 agar berjalan sesuai yang diharapkan, dapat dilakukan melalui menu Tools – Options.

Kotak dialog Options memiliki sejumlah Tab yang didalamnya masing-masing mempunyai pilihan untuk dikonfigurasi sesuai kebutuhan.

9. Tab view

Pada Tab View terdapat pilihan untuk mengatur tampilan Visual FoxPro 9.0, seperti menampilkan Status bar, Clock, Visual FoxPro results, System messages dan lainnya.

10. Status bar

Jika terpilih maka tampilan dari status bar akan terlihat. Penulisan perintah pada Jendela Visual FoxPro atau Jendela Program adalah sebagai berikut :

Set Status Bar On | Off

11. Clock

Apakah Jam akan ditampilkan pada status bar. Penulisan perintah pada Jendela Visual FoxPro atau Jendela Program adalah sebagai berikut :

Set Clock On | Of

12. Visual FoxPro results

Apakan akan menampilkan proses dari segala sesuatu pemprosesan yang dilakukan program Visual FoxPro 9.0. Penulisan perintah pada Jendela Visual FoxPro atau Jendela Program adalah sebagai berikut :

Set Talk On | Off

13. System messages

Apakah sistem akan menampilkan pesan pada status bar segala perintah setelah proses yang dilakukan. Penulisan perintah pada Jendela Visual FoxPro atau Jendela Program adalah sebagai berikut :

Set Notify [Cursor] On | Off

14. Open last project on startup

Jika terpilih maka Visual FoxPro 9.0 akan membuka proyek yang terakhir kali dibuka secara otomatis

15. Most Recently Used list contains

Visual FoxPro 9.0 akan menampilkan daftar File yang dibuka terakhir sesuai dengan jumlah isian pada spiner. Pilihan ini akan tampil pada menu File.

16. List display count

Maksimum data yang dapat ditampilkan pada objek dropdown list boxes. Default isiannya adalah 15 dan minimum dropdown list boxes berisi 5.

Anda dapat menampilkan semua yang anda kerjakan melalui kotak dialog Options ini ke Jendela Visual FoxPro sehingga dapat digunakan untuk keperluan lainnya atau sekedar mengetahui apa saja yang sedang dikerjakan oleh Visual FoxPro 9.0.

Caranya :

Tentukan pilihan setting anda pada kotak dialog Options, tekan dan tahan tombol SHIFT kemudian klik tombol OK.

17. Tab general

Tab ini mengatur segala sesuatu yang umum, seperti pengaturan sound, programming, data entry, dan banyak pilihan lainnya.

18. Warning sound

Off

Pilihan ini mengijinkan anda untuk dapat membunyikan atau tidak membunyikan suara pada saat anda menjalankan perintah melalui Jendela Visual FoxPro atau membuat suatu program sehingga jika terjadi kesalahan dapat diketahui dengan adanya suara tersebut. Penulisan perintah pada Jendela Visual FoxPro atau Jendela Program adalah sebagai berikut :

Set Bell On | Off

Default

Pilihan yang akan menampilkan suara dari bawaan program Visual FoxPro 9.0. adalah :

Set Bell On

Play

Visual FoxPro 9.0 mengijinkan anda merubah suara bawaan dengan suara yang anda inginkan. Penulisan perintah pada Jendela Visual FoxPro atau Jendela Program adalah sebagai berikut :

Set Bell To ‘ding-dong.wav’

19. Programming

Cancel programs on Escape

Anda bisa membatalkan proses program yang sedang berjalan dengan melakukan penekanan pada tombol Esc. Penulisan perintah pada Jendela Visual FoxPro atau Jendela Program adalah sebagai berikut :

Set Excape On | Off

Penekanan tombol Esc pada saat program berjalan akan menampilkan pesan interupsi seperti dibawah ini

*** INTERRUPTED ***

Log compilation errors

Akan menampilkan atau tidak ditampilkan pesan kesalahan pada saat kompilasi. Penulisan perintah pada Jendela Visual FoxPro atau Jendela Program adalah sebagai berikut :

Set Logerrors On | Off

SET DEVELOPMENT

Anda dapat menampilkan tanggal dan waktu menjalankan program, dan lainnya dengan mengatur pada pilihan ini. Penulisan perintah pada Jendela Visual FoxPro atau Jendela Perintah adalah sebagai berikut :

Set Development On | Off

dBASE compatibility

Anda dapat menentukan apakan bahasa yang digunakan akan dibuat kompatibel dengan bahasa Foxbase+ / dbase+. Penulisan perintah pada Jendela Visual FoxPro atau Jendela Program adalah sebagai berikut :

Set Compatible Foxplus on

Use Visual FoxPro color palette

Menggunakan default palet warna yang ditentukan Visual FoxPro 9.0. Penulisan perintah pada Jendela Visual FoxPro atau Jendela Perintah adalah sebagai berikut :

Set Palette On | Off

Confirm file replacement

Menampilkan pesan peringatan keamanan bisa terjadi proses data atau tidak. Penulisan perintah pada Jendela Visual FoxPro atau Jendela Program adalah sebagai berikut :

Set Safety On | Off

Browse IME control

Menampilkan kontrol IME pada tampilan Browse. Penulisan perintah pada Jendela Visual FoxPro atau Jendela Program adalah sebagai berikut :

Set Browseime On | Off

20. Data Entry

Navigation keys

Menentukan kunci pemindahan kursor antar kontrol didalam Form. Penulisan perintah pada Jendela Visual FoxPro atau Jendela Program adalah sebagai berikut :

Set Keycomp To Dos | Windows

Pada objek Combo boxes, jika anda memilih pilihan MS-DOS Complatible, maka proses pemindahan dari titik fokus menggunakan tombol ENTER atau SPACEBAR

Untuk pilihan WINDOWS Complatible, maka anda melakukan penekanan pada tombol SPACEBAR, ALT+UP ARROW, atau ALT+DOWN ARROW.

Fill new records with current values

Visual FoxPro 9.0 akan secara otomatis menampilkan record yang sudah diisikan kedalam isian record yang baru. Penulisan perintah pada Jendela Visual FoxPro atau Jendela Program adalah sebagai berikut :

Set Carry On | Off

Enter or Tab to exit fields

Anda dapat mengatur agar Visual FoxPro 9.0 melakukan tindakan keluar dari proses pengisian data jika pilihan ini terpilih. Penulisan perintah pada Jendela Visual FoxPro atau Jendela Program adalah sebagai berikut :

Set Confirm On | Off

21. Tab data

Mengatur segala sesuatu yang terkait dengan data, anda dapat menentukan bagaimana suatu tabel dibuka, apakah akan ditampilkan header dari tabel tersebut, menggunakan index yang unik, menentukan berapa jumlah byte yang dapat ditampung didalam file memo, menentukan pemilihan penguncian File dan record. Menggunakan teknik optimasi Rushmore.

22. Tab Remote data

Digunakan jika anda menggunakan data jarak jauh, anda dapat mengatur batas waktu koneksi, berapa jumlah record yang dapat diambil, menggunakan metode perintah SQL untuk update data. Berapa jumlah record data minimal yang dapat dirubah.

23. Tab file location

Dengan menentukan lokasi kerja dari suatu program maka diatur pada pilihan ini sehingga Visual FoxPro 9.0 dapat mencari data yang dimaksud dengan cepat. Tentukan direktori kerja didalam pilihan Default Directory, lakukan modifikasi jika anda ingin merubah ke direktori yang diinginkan, klik OK dan terakhir klik tombol Set As Default untuk menyimpan perubahan.

24. Tab forms

Pengaturan Form dapat diatur melalui kotak dialog Form, dimana anda dapat merubah ukuran spasi Grid, pengaturan area disain, merubah pergerakan kursor.

25. Tab projects

Pada Tab Projects terdapat pilihan apakah unsur objek yang ada didalam project di klik 2 kali akan dijalankan atau dibuka secara desain modifikasi.

26. Tab controls

Disini dapat dilibatkan class-class, anda bisa menambah class melalui Tab ini.

27. Tab regional

Anda dapat mengatur format dari tanggal yang akan dipakai, batasan yang digunakan, jenis format jam yang akan digunakan, pembatas desimal, simbol mata uang dan lainnya.

28. Tab debug

Anda dapat merubah warna tempat tampilan huruf dan latar belakang, teknik tampilan pelacakan dan lainnya.

29. Tab editor

Anda dapat memformat editor pada Tab ini, bagaimana tampilan comentar, warna perintah yang akan dituliskan dan lainnya.

30. Tab file mapping

Mengatur pemetaan pada kontrol yang akan dibuat jika anda melakukan Drag tabel atau field ke dalam Form dan lainnya.

31. Tab IDE

Pada Interactif Development Environment, anda dapat mengatur setting tampilan, ekstensi dari File, mengatur Tab dan Inden, Pengaturan Huruf, perataan Objek dan lainnya.

32. Tab reports

Pengaturan yang berhubungan dengan laporan dapat anda setting disini, ditampilkan atau tidak grid didalam pendesainan laporan, default huruf yang dipakai dan lainnya.

Jika anda telan melakukan perubahan settingan pada kotak dialog Options, untuk menyimpannya lakukan dengan memilih tombol Set As Default, kemudian klik tombol OK.

33. Element layar utama Visual FoxPro 9.0

Tampilan layar utama Visual FoxPro 9.0 memiliki beberapa elemen yang dapat dipergunakan. Elemen tersebut adalah :

34. Title bar / batang judul

Title bar adalah baris yang menyatakan judul aplikasi yang sedang berjalan atau aktif.

Title bar pada jendela Visual FoxPro 9.0 dapat diganti atau dirubah sesuai dengan kebutuhan, misalnya tulisan title bar akan diganti dari Microsoft Visual FoxPro menjadi “Aplikasi Inventory” dengan menuliskan perintah pada Jendela Visual FoxPro sebagai berikut :

_screen.Caption="Aplikasi Inventory"

Maka title bar berubah dari Microsoft Visual FoxPro menjadi Aplikasi Inventory.

Atau dapat juga dengan perintah seperti dibawah ini:

_vfp.Caption="Program Koperasi Tunas Muda"

Dengan cara diatas maka title bar akan berubah menjadi Program Koperasi Tunas Muda

35. Menu bar

Baris yang berisi menu dan submenu dari Visual FoxPro 9.0 yang dapat dipergunakan sesuai dengan fungsinya. Menu bar pada Visual FoxPro 9.0 terdiri dari : File, Edit, View, Format, Tools, Program, Window dan Help.

File

Berisi segala perintah yang berhubungan dengan pengelolaan File-File.

Edit

Berisi segala perintah pengeditan seperti membatalkan, memotong, duplikasi dan perintah lainnya.

View

Menu ini untuk menampilkan jenis-jenis toolbars. Adapun jenis toolbars yang tersedia adalah : Color Palette, Database Designer, Form Controls, Layout, Print Preview, Query Designer, Report Control, Standart dan View Designer.

Format

Berisi segala sesuatu yang berhubungan dengan pemformatan seperti memformat atribut huruf, membuat indent, membuat komentar, menentukan spasi dan lain-lain. Menu Format ini tampil jika posisi kursor anda terdapat pada Jendela Visual FoxPro. Jika posisi kursor terdapat diluar Jendela Visual FoxPro maka Menu Format ini tidak muncul.

Contoh ini menjelaskan penggunaan dari salah satu isi dari Menu Format yakni Comment. Menu Comment digunakan Visual FoxPro 9.0 untuk menandakan suatu baris perintah yang tidak ikut terbaca didalam program. Tanda jika perintah berisi Comment adalah dengan adanya tanda seru diapit tanda bintang ( *!* ) didepan tulisan komentar tersebut.

*!* "Quit " -> Perintah keluar dari visual fox pro 9.0

Anda dapat membuat komentar sebanyak anda mau, mengingat didalam membuat program atau mengolah data sering kali terjadi lupa tentang urutan perintah atau alur pemprogramman, untuk itu perintah Comment ini sangat membantu.

Tools :

Berisi daftar perintah yang terkait dengan utilitas seperti Wizard, Task Pane, Macros, Toolbox, Debugger dan lainnya.

Program

Menu ini berisi tentang segala aktifitas program, seperti menjalankan program ( ! Do.. ), membatalkan jalannya program ( Cancel ) , mengkompile program dan lain-lain.

Window:

Berisi perintah untuk mengatur tampilan window, memilih window yang akan diaktifkan, menampilkan serta menyembunyikan Jendela Visual FoxPro dan lain-lain.

Help :

Berisi semua bantuan yang berhubungan dengan Visual FoxPro 9.0

36. Jendela Visual FoxPro / perintah

Jendela Visual FoxPro ini sangat unik, dikatakan unik karena hampir semua perintah baik Internal Visual FoxPro 9, maupun perintah External dari sistem operasi / dos juga dikenal dan dapat dijalankan dari Jendela Visual FoxPro ini.

Didalam Jendela tersebut, anda dapat menuliskan perintah-perintah dari Visual FoxPro 9, setiap perintah yang di tuliskan lewat Jendela Visual FoxPro akan langsung terlihat hasilnya pada Jendela View. Hal ini memudahkan setiap orang pemakai Visual FoxPro 9.0 untuk melakukan trial and error sebelum menghasilkan satu laporan. Sehingga kesalahan
dapat diketahui sebelumnya.

Untuk menampilkan atau menghilangkan Jendela Visual FoxPro dapat dilakukan dari menu Window – Visual FoxPro window atau Ctrl+F2

37. Status bar

Status Bar atau baris status yang berfungsi untuk menampilkan status atau kejadian yang sedang berlangsung. Posisi baris status berada pada baris paling bawah pada layar utama Visual FoxPro 9.0

38. View window

Adalah layar lebar yang berfungsi untuk tempat menampilkan hasil proses dari perintah Visual FoxPro 9.0 yang ditulis melalui Jendela Visual FoxPro.

Salah satu kehebatan dari software Visual FoxPro 9.0 ini adalah :

Operator / pamakai dapat melihat langsung hasil yang dikerjakannya melalui jendela ini

39. Toolbar

Batang panjang dibawah menu yang berisi beberapa icon yang dapat digunakan untuk mempercepat proses.

Keseluruhan toolbar dapat ditampilkan atau di sembunyikan melalui menu View – Toolbars… kemudian centang kotak yang ada didepan toolbar kemudian klik tombol OK, maka toolbar yang ditandai akan tampil.

Toolbar dapat pula ditampilkan dengan beberapa cara, diantaranya adalah dengan cara : meletakan pointer mouse ke batang toolbar aktif kemudian klik mouse sebelah kanan pada batang toolbar tersebut lalu pilih toolbar yang akan ditampilkan. Toolbar dapat disembunyikan dengan cara yang sama yakni dengan cara menghilangkan pilihan pada kotak toolbar terpilih.

40. Jenis-jenis toolbar

Visual FoxPro 9.0 mempunyai banyak toolbar yang dapat digunakan didalam pembuatan aplikasi, diantaranya

41. Toolbar standard

Toolbar yang tampil pertama kali saat Visual FoxPro 9.0 dijalankan, berfungsi untuk melakukan segala sesuatu yang umum, seperti membuat File baru ( Project, form, report, dll ), menyimpan hasil kerjaan, menjalankan form dan lain-lain.

42. Toolbar database designer

Icon yang ada didalam toolbar ini dapat dipakai untuk mendefinisikan tabel didalam database designer, seperti menambah tabel, melakukan relasi antar tabel, membuat view, dan lain-lain.

43. Toolbar from designer

Digunakan untuk mendisain antar muka form, didalamnya terdapat icon untuk merapikan, menampilkan dan menyembunyikan peralatan, jendela properti dan lain-lain.

44. Toolbar layout

Icon-icon yang ada pada toolbar ini berfungsi untuk mengatur tampilan objek pada form, seperti meratakan objek, meletakan objek didepan atau dibelakang objek lain dan lain-lain.

45. Toolbar color palette

Icon-icon yang ada pada toolbar ini dapat digunakan untuk merubah warna suatu obyek didalam form.

46. Toolbar form controls

Icon-icon yang ada dapat berfungsi untuk membuat objek yang dapat digunakan pada form, seperti objek tombol, spinner, image, option group dan lain-lain. Toolbar ini dipakai sangat dominan didalam pembuatan aplikasi pada form.

47. Toolbar query design dan view designer

Icon-icon yang ada digunakan pada saat anda melakukan proses query, seperti menambah Tabel, menghapus Tabel serta menampilkan perintah SQL dan lain-lain.

48. Toolbar print preview dan report control

Icon-icon yang ada digunakan untuk melakukan segala aktifitas yang dibutuhkan pada laporan, seperi mencetak, menuju ke halaman yang diinginkan dan lain-lain.

49. Customize toolbar

Icon yang ada didalam toolbar dapat ditambahkan atau dikurangi dengan cara, klik kanan mouse pada batang toolbar, pilih Customize…

Akan muncul kotak Customize Toolbar, pilih pada isi pilihan Categories, kemudian pada pilihan Button sebelah kanannya klik salah satu button kemudian lakukan drag atau seret icon tersebut kearah batang toolbar yang ingin ditambahkan.

Misalnya saja klik pilihan Report pada Categories, klik icon layout toolbar yang ada pada posisi paling kanan, seret kearah batang toolbar standard yang ada diatas layar utama Visual FoxPro 9.0, lepas mouse dan sekarang tampak icon layuot toolbar telah ditambahkan pada toolbar standard.

50. Menghilangkan icon dari dalam toolbar

Untuk mengeluarkan atau menghilangkan icon yang ada didalam toolbar, adalah klik icon yang akan dihilangkan kemudian seret kearah luar toolbar menuju area jendela view. Icon yang diseret tadi jika diletakan pada jendela view maka akan membentuk toolbar baru.

51. Posisi toolbar

Posisi toolbar yang tampil dapat dipindah-pindahkan sesuai keinginan dengan cara menyeretnya ke lokasi yang baru.

52. Membuat toolbar baru

anda dapat membuat toolbar sendiri dan akan diisikan dengan icon yang anda butuhkan saja, caranya : dari menu utama pilih View –
Toolbar…, kemudian klik tombol New, tentukan nama toolbar yang akan dibuat. Setelah toolbar terbentuk, masukan icon yang anda inginkan dengan cara yang sama seperti diatas.

53. Keluar dari program.

Untuk keluar dari program Visual FoxPro 9.0 Klik menu File – Exit. Keluar dari program Visual FoxPro 9.0 dapat juga dilakukan dengan menekan kombinasi tombol Ctrl + F4, atau mengklik langsung button Close yang ada di pojok kanan atas program Visual FoxPro 9.0, atau dengan mengetikan perintah Quit pada Jendela Visual FoxPro(supported by Fox-off)

Modifakasi

2008-06-25T05:58:00.000-07:00

Sebelum Anda merubah registry pastikan bahwa Anda memback-up nya terlebih dahulu. Ini penting seandainya perubahan tersebut mengakibatkan error, Anda masih bisa mengembalikannya seperti semula. Adapun caranya adalah sebagai berikut :

Cara membuka registry
Klik menu Start (pada pojok kiri bawah), pilih Run. Ketikkan regedit, OK.
Memback-up registry
Pertama pilih registry key yang akan diback-up. Pada menu Registry, pilih Export Registry File. Tentukan letak directory dan nama file-nya, terakhir pilih OK.
Mengembalikan key registry dari file back-up.
Cara pertama : buka regedit, pilih menu Registry, Import Registry File. Pilih letak directory dan nama filenya. Klik OK.
Cara kedua : Klik kanan pada file yang merupakan back-up registry (ditandai dengan nama file berekstensi reg). Pilih Merge.

Tutorial Registry

2008-06-25T05:53:00.000-07:00

Registry terdiri dari beberapa bagian yang disebut key atau kunci. Terdapat enam macam key utama pada registry, yaitu :

HKEY_CLASSES_ROOT,
Berisi semua tipe file beserta assosiasinya yang masing-masing tipe file tersebut akan mempunyai subkey sendiri-sendiri.
HKEY_CURRENT_USER
Berisi informasi tentang user yang sedang log in pada saat itu. Terdiri dari subkey, antara lain :

AppEvents, berisi setting untuk sound events.
Control Panel, berisi setting control panel.
InstallLocationMRU, berisi path/lokasi master Windows (waktu pertama kali menginstall Windows).
Network, berisi informasi yang berhubungan dengan Network atau jaringan.
Software, berisi tentang setting atau konfigurasi software untuk pemakai yang logon pada saat itu.
RemoteAccess, berisi informasi tentang Dial up Networking.

HKEY_LOCAL_MACHINE
Berisi informasi tentang hardware dan setting software yang berlaku untuk semua user. Terdiri dari subkey, antara lain :
a. Enum, berisi informasi tentang hardware, misalnya tentang monitor.
b. Hardware, berisi informasi tentang port serial.
c. Network, berisi informasi yang berhubungan dengan network untuk pemakai yang sedang aktif atau logon.
d. Software, berisi informasi dan setting software.
HKEY_USERS
Berisi informasi tentang desktop dan user setting untuk tiap user yang berhak login ke komputer tersebut. Tiap user mempunyai sebuah subkey. Jika hanya terdapat satu user maka nama subkey tersebut adalah ".default"
HKEY_CURRENT_CONFIG
Berisi informasi tentang konfigurasi hardware, berhubungan dengan HKEY_LOCAL_MACHINE.
HKEY_DYN_DATA
Berisi informasi tentang plug and play.

Pesan di awal start up

2008-06-25T05:49:00.000-07:00

Tambahkan tulisan berikut pada file autoexec.bat :

Echo off
Cls
Echo Komputer ini milik robBEX
Echo.
Echo Jadi jangan diobok-obok ya...
Echo.
For %%C in(A B C D E F G H I J K L) do Dir C:\Windows >Null
Echo.
Echo Kalau macem-macem, AWAS..!!!

Maka tiap kali komputer anda di-boot, akan muncul pesan tersebut. Tulisan yang diawali dengan Echo bisa anda ganti dengan pesan anda sendiri. So kamu bisa ngusilin teman yang masih awam dalam komputer dengan tulisan-tulisan aneh, seperti "Komputer ini terserang virus DIE HARD.." Pasti temen anda bingung.tp jngan terlalu kejem dosa :D

Cara cepat menghapus recent document

2008-06-25T05:42:00.000-07:00

Untuk menghindari orang lain mengetahui file-file apa saja yang barus saja kita buka, salah satu caranya adalah dengan menghapus recent document. Caranya sebagai berikut :
1. Buka Notepad.
2. Ketikkan : echo y| del C:\windows\recent\*.*
3. Simpan file pada sembarang folder, beri nama (misalnya) hapus.bat. Ingat, ekstensi harus bat.
4. Bikin shortcut file tersebut pada dekstop.
5. Klik kanan shortcut tersebut, pilih Properties.
6. Pindah ke tab Program.
7. Pada bagian Run, pilih Minimized.
8. Beri tanda check pada Close on Exit.
9. Klik OK.

Nah sekarang Anda bisa menghapus recent document dengan cepat, yaitu dengan mengklik shortcut yang telah Anda buat pada desktop.
aman deh...

Menyembunyikan semua item pada desktop

2008-06-23T23:47:00.000-07:00

Setting berikut akan menyembunyikan semua item yang terdapat pada desktop Anda.
Key : HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\
Policies\Explorer
Value Name : NoDesktop
Data Type : DWORD Value
Data : (0 = disabled, 1 = enabled)

Mengganti daftar program Add/Remove Programs

2008-06-23T23:45:00.000-07:00

Saat Anda menginstall program maka sebuah program (yang baik) tentunya akan menambahkan untuk Unsintall (pada Add/Remove Programs). Tapi bila Anda telah meng-uninstall program tersebut dan masih terdapat entry pada Add/Remove Programs Anda bisa menghilangkannya secara manual. Caranya masuk ke key : HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\
CurrentVersion\Uninstall
Setelah itu Anda bisa menghapus entry yang masih tersisa.

Menampilkan thumbnail untuk file bitmap (*.bmp)

2008-06-23T23:44:00.000-07:00

Setelah Anda mengganti dengan nilai di bawah ini dan menjalankan Windows Explorer maka file-file BMP akan tampil dengan icon berupa thumbnail untuk masing-masing gambar.
Key: HKEY_CLASSES_ROOT\Paint.Picture\DefaultIcon
Value Name: (Default)
Data Type: String Value
Data: %1

Disable klik kanan pada Dekstop & Windows Explorer

2008-06-23T23:36:00.000-07:00

Jika Anda meng-enable setting di bawah ini maka tidak ada yang bisa melakukan klik kanan pada Desktop & Windows Explorer. Dengan kata lain menu yang muncul waktu klik kanan tidak ada lagi.
Key: HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\
Policies\Explorer
Value Name: NoViewContextMenu
Data Type: DWORD Value
Data: (0 = disabled, 1 = enabled)

Untuk melihat perubahannya Anda perlu melakukan restart.

Membuat Anti Virus Di Flasdisk

2008-06-23T23:35:00.000-07:00

Mungkin temen-temen semua dah pada tau cara bikin AUTORUN pada flashdisk..nah disini kita
akan memanfaatkan cara ntuk membuat autorun tersebut ntuk mengaktif’in anti virus yang
nantinya akan kita copy pada flashdisk kita..

Alat & bahan :
————–
software AV yang berukuran kecil (banyak di internet,,goggling aj..)
contoh: PCMAV,ANSAV,SMADAV dll..(tapi Aibi lebih sering pake PCMAV..abiz ukurannya
kecil banget n’familiar buat semua orang…)

Langkah-langkah:
—————-
1.ketik di notepad mantera berikut:

[AutoRun]
open=namaantivirus.exe
shellexecute=namaantivirus.exe
shell\Scan Dulu Virusnya!!!\command=namaantivirus.exe
shell=Scan Dulu Virusnya!!!

2.trus save dengan nama “autorun.inf”(gak pake tanda kutip) di flashdisk kita
sekarang tinggal kita copy aja antivirus yang mau kita masukin ke flashdisk..!!!
(NB:kalo ngopy file autorun n’ antivirusnya jangan di dalam folder)

Dah jadi deh…^_^!!
kalo mau scan virus tinggal double click aja tuh drive flashdisk kita!!
kalo kita klik kanan drive flashdisknya bakalan ada tambahan kata di atas kata
AUTOPLAY.
Scan Dulu Virusnya!!!

kalo mau di ubah ya kita tinggal ganti aja kata-kata yang ada di dalam script…!

shell\kata-kata_anda\command=namaantivirus.exe
shell=kata-kata_anda

3.trus gimana cara buka flashdisknya nih???
gak mungkin lah gak pada tau…tinggal klik kanan aja trus cari open…!
ngak bagus ya kalo di dalam flashdisk kita ada keliatan nama file AUTORUN n’antivirusnya…
ngerusak pemandangan gitu loh….

kalo gitu tinggal kita ubah aja attributnya jadi super hidden…
caranya…??? /media/TDY296/TIPS N TRIK/install printer di Ubuntu.txt
buka RUN dari start menu
terus ketik cmd
masuk ke dalam drive flashdisk (biasanya drive f:)
udah gitu ya kita tulis commandnya

f:\>attrib +h +s namaantivirus.exe (buat hidden antivirusnya)
f:\>attrib +h +s autorun.inf (buat hidden file autorun)

Untuk Menjalankan Yahoo Messenger Lebih dari 1

2008-06-23T23:24:00.000-07:00

Jalankan registry editor dengan cara klik tombol Start - Run. Ketik regedit lalu tekan enter.
Masuk ke key HKEY_CURRENT_USER\Software\Yahoo\Pager\Test.
Pada panel sebelah kanan, klik kanan dan pilih menu New - DWord Value.
Ketik Plural.
Klik 2x pada Plural dan isi dengan nilai 20
Keluar dari registry editor.

Menu lebih cepat

2008-06-23T23:05:00.000-07:00

Tujuan : Membuat menu ditampilkan dengan lebih cepat
Ikutilah langkah berikut.
Klik Start---->Run, ketikkan regedit lalu tekan Enter.
Key: HKEY_CURRENT_USERS\Controlpanel\desktop
Data Type : String
Value Name : MenuShowDelay
Data : 0 – 9 (Nilai 0 ( nol ) adalah yang tercepat )

Menyembunyikan menu Run

2008-06-23T23:01:00.000-07:00

Setting berikut akan menyembunyikan folder Document yang terdapat pada Start Menu. Ikutilah langkah berikut.
Klik Start--->Run, ketikkan regedit lalu tekan Enter.
Key :HKEY_CURRENT_USER\Software\Microsoft\Windows\
CurrentVersion\Policies\Explorer
Value Name : NoRun
Data Type : REG_DWORD
Data: (0=disable, 1=enable)

Menyembunyikan menu Find

2008-06-23T23:00:00.000-07:00

Jika Anda meng-enable setting berikut, maka Find yang terdapat pada Start Menu akan hilang.
Ikutilah langkah berikut.
Klik Start---->Run, ketikkan regedit lalu tekan Enter.
Key: HKEY_CURRENT_USER\Software\Microsoft\
Windows\CurrentVersion\Policies\Explorer
Value Name: NoFind
Data Type: REG_DWORD
Data: (0 = disabled, 1 = enabled)

Menyembunyikan Menu Control Panel

2008-06-23T22:59:00.000-07:00

Jika Anda meng-enable setting ini maka menu Taskbar yang terdapat pada Setting pada Start Menu akan hilang.
Ikutilah langkah berikut.
Klik Start---->Run, ketikkan regedit lalu tekan Enter.
Key: HKEY_CURRENT_USER\Software\Microsoft\Windows\
CurrentVersion\Policies\Explorer
Value Name: NoControlPanel
Data Type: REG_DWORD
Data: (0 = disabled, 1 = enabled/sembunyikan)

Menyembunyikan menu Folder Options

2008-06-23T22:47:00.000-07:00

Jika Anda meng-enable setting ini maka menu Folder Options yang terdapat pada Start Menu - Setting akan hilang.
Ikutilah langkah berikut.
Klik Start*Run, ketikkan regedit lalu tekan Enter.
Key: HKEY_CURRENT_USER\Software\Microsoft\Windows\
CurrentVersion\Policies\Explorer
Value Name: NoFolderOptions
Data Type: REG_DWORD
Data: (0 = disabled, 1 = enabled/sembunyikan)

Menampilkan Pesan saat Boting windows

2008-06-23T22:43:00.000-07:00

Jika Anda meng-enable setting di bawah ini maka akan muncul pesan dimonitor saat Botting windows .Ikutilah langkah berikut.
Klik Start*Run, ketikkan regedit lalu tekan Enter.
Key: [HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\
CurrentVersion\Winlogon Clik Kanan à New à String Value
Value Name: LegalNoticeCaption “ Tulis Komentar anda “

Value name : LegalNoticeText “ Tulis Komentar anda “

Menghilangkan Taskbar pada menu Setting

2008-06-23T22:34:00.000-07:00

Jika Anda meng-enable setting di bawah ini maka tidak akan muncul menu Taskbar pada Start Menu, Tab Setting .Ikutilah langkah berikut.
Klik Start*Run, ketikkan regedit lalu tekan Enter.
Key: [HKEY_CURRENT_USER\Software\Microsoft\Windows\
CurrentVersion\Policies\Explorer]
Value Name: NosetTaskbar
Data Type: REG_DWORD
Data: (0 = disabled, 1 = enabled)

Mencegah perintah Shut Down

2008-06-23T22:30:00.000-07:00

Setting berikut akan mencegah seseorang untuk mematikan komputer Anda. Hal ini berguna jika misalnya Anda meninggalkan komputer untuk beberapa saat dan Anda khawatir ada orang lain yang akan men-Shut Down komputer Anda.
Ikutilah langkah berikut.
Klik Start*Run, ketikkan regedit lalu tekan Enter.
Key: HKEY_CURRENT_USER\Software\Microsoft\Windows\
CurrentVersion\Policies\Explorer
Value Name: NoClose
Data Type : REG_DWORD
Data: (0 = shutdown enabled, 1 = shutdown disabled)

Mencegah penggantian setting Display Properties

2008-06-23T22:28:00.000-07:00

Anda dapat melakukan Setting display dari Control Panel - Display atau melalui klik kanan pada desktop, lalu pilih Properties.
Dengan setting di bawah ini orang lain tidak dapat mengganti setting pada Display tersebut.
Ikutilah langkah berikut.
Klik Start-------->Run, ketikkan regedit lalu tekan Enter.
Key:
HKEY_CURRENT_USER\Software\Microsoft\Windows\
CurrentVersion\Policies\System
Value Name: NoDispCPL
Data Type: REG_DWORD
Data: (0 = disabled, 1 = enabled/mencegah penggantian)

Disable DOS

2008-06-23T22:24:00.000-07:00

Setting berikut ini akan mencegah "penggunaan" MS-DOS command prompt pada Windows.
Ikutilah langkah berikut.
Klik Start------->Run, ketikkan regedit lalu tekan Enter.
Key:
HKEY_CURRENT_USER\Software\Microsoft\Windows
\CurrentVersion\Policies\WinOldApp
Value Name: Disabled
Data Type: REG_DWORD Data: (0 = disable, 1 = enable/mencegah MS-Dos command prompt)

Hilangkan Drive Pada Komputer

2008-06-23T22:21:00.000-07:00

Hal ini dapat dilakukan dengan maksud orang lain tidak bisa akses data komputer anda Ikutilah langkah berikut.
Klik Start----->Run, ketikkan regedit lalu tekan Enter.
Anda bisa menyembunyikan drive pada My Computer dengan cara masuk ke :
Key :HKEY_CURRENT_USER\Software\Microsoft\
Windows\CurrentVersion\Policies\Explorer
Value Name : NoDrives
Data Type : REG_DWORD
Data :
Pada data bisa Anda isi dengan drive yang ingin Anda sembunyikan. Adapun nilainya adalah :
A: 1, B: 2, C: 4, D: 8, E: 16, F: 32, G: 64, H: 128, I: 256, J: 512, K: 1024, L: 2048, M: 4096,
N: 8192, O: 16384, P: 32768, Q: 65536, R: 131072, S: 262144, T: 524288, U: 1048576, V: 2097152,
W: 4194304, X: 8388608, Y: 16777216, Z: 33554432, ALL: 67108863

Membuat " Welcome Sound " berbeda setiap hari

2008-06-23T22:20:00.000-07:00

langkah :
1. Buat folder baru c:windows\Sound. Letakkan semua file *.wav yang akan digunakan secara
 bergantian. Rename nama masing masing menjadi misal :  sound01.wav , sound02.wav 
 dst
2. Buka control panel klik ganda icon sound. pilih start windows pada daftar
 even, kilk brows pilih suara yang akan digunakan pertama kali misal tr.
 klik ok.
3. Buka notepad dan buat batch file dengan isi sebagai berikut :
 cd c:\windows\sound
 ren sound01.wav soundxx.wav
 ren sound02.wav sound01.wav
 ren sound03.wav sound02.wav
 ren soundxx.wav sound03.wav
 copy sound01.wav c:\windows\media\Start.wav
jika anda memiliki lebih dari 3 macam sound yang akan digilir, anda dapat
menambah baris command pada batch file yang telah anda buat, simpan misal
dengan nama ganti.bat dan letakkan pada folder c:\windows, tambahkan baris
command pada file autoexec.bat c;\windows\ganti.bat.
oke selasai dan anda siap untuk mencoba

Mengaktifkan kembali Registri Editor yang telah di Disable

2008-06-23T22:19:00.000-07:00

langkah :
1. jalankan Notepade lalu ketikkan perintah berikut
  Windows Registry Editor Version 5.00
  [HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\
  Policies\System]
  "DisableRegistryTools"=dword:00000000
2. Simpan file tersebut dengan nama *.reg
3. Jalankan file trsebut dengan menekan enter
4. jika mengalami kegagalan jalankan melalui dos ( akan dibahas lebih lanjut )

Menghilangkan MY Komputer dari Destop Dan Start Menu

2008-06-23T22:11:00.000-07:00

Tujuan  : Menyembunyikan Icon My Komputer Sehingga Users tidak dapat akses ke Icon Tsb.
Langkah : Klik Start --> Run --> Regedit
Key     : HKEY_LOCAL_MACHINE\Software\Microsoft\windows\CurrentVersion\Policies\NonEnum
Klik    : Edit-->New-->Dword VAlue
Beri nama DWORD Value baru tersebut dengan nama {20D04FE0-3AEA-1069-A2D8-08002B30309D}
Isikan value datanya dengan nilai 1
restat pc anda.
Yang perlu diingat Trik ini hanya berjalan pada Windows Me,2000,dan Windows XP

Memanggil aplikasi dengan nama berbeda

2008-06-23T22:06:00.001-07:00

Tujuan  : Memanggil program aplikasi dengan lebih cepat
Ikutilah langkah berikut :
Klik Start---->Run, ketikkan regedit lalu tekan Enter.
Key: HKEY_Local_Machine\software\Microsoft\Windows\CurrentVersion\App Paths
Buat sub key baru ---> winword.exe, Klik ganda data string yang bernama (Default)
dan isi nilainya dengan file aplikasi tersebut misal : C:\ProgramsFiles\Msoffice\
Winword\winword.exe

Mengirim pesan lewat jaringan win XP & Win 98

2008-06-23T21:59:00.000-07:00

Tujuan : Mengirim pesan lewat jaringan win XP & Win 98 .
Ikutilah langkah berikut.
Klik Start---->Run, ketikkan winpopup.
Klik Icon Amplop pilih users and komputer dan pilih nama komputer untuk
mengirim pesan kesatu komputer saja. Sedang untuk mengirim ke workgroup pilih
workgroup. ( untuk pengguna windows 98 )
Untuk pengguna win XP dan win 2000 gunakan command line Net Send
pada command prompt. Net Send [name | * | \Domain] \Users [message]
Contoh : Net Send/Domain : Linux hai apa khabar --> mengirim pesan
hai apa khabar keseluruh komputer dalam domain linux.
* Net send comp01 sampai berjumpa lagi mengirim pesan sampai berjumpa lagi ke
komputer yang memiliki host name comp01.
Untun Win 98 agar winpopup selalu on line kliklah message-->options dan cek always on top

Menyembunyikan tombol all program dari start menu

2008-06-23T21:49:00.001-07:00

Tujuan : Menyembunyikan tombol all program dari start menu .
Ikutilah langkah berikut.
Klik Start---->Run, ketikkan regedt32 lalu tekan Enter.
Key: HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\
policies\. ----> Jika ingin Menyembunyikan Dilogin saja.
Key: HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\
CurrentVersion\Policies ----> Jika ingin menyembunyikan di seluruh login .
Data Type: Dword
Value Name : NoStartMenuMorePrograms
data : 1
Trik ini hanya dapat bekerja pada style windows XP standar bukan Klasik

Menonaktifkan Tour Win XP

2008-02-03T18:16:00.001-08:00

Tujuan : Menonaktifkan tour win XP .
Ikutilah langkah berikut.
Klik Start---->Run, ketikkan regedt32 lalu tekan Enter.
Key: HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\
CurrentVersion\Applets\Tour
Value Name: RunCount
DAta Type : Dword
Data: (0 = disabled, 1 = enabled/sembunyikan)
Jika suatu saat anda ingin menjalan kan tour Win XP, anda dapat menklik
Start -->All Program --> Accesorise --> Tour Windows Xp

Ucapan Terima Kasih

2008-02-02T05:22:00.000-08:00

Ucapan Terimakasih
===============
Terimakasih kepada semua Rekan - Rekan Fox-id
Pada mas TAZ,MZtolo,Bang Tejos,yang selalu memberika support pada saya
dan pada mas ECHO Di Jepara Makasih mas atas Motivasi dan bimbingannya
selama ini. dan saya minta maaf atas semua kesalah2 saya yang bikin mas kesal.
buat Mas Siyo di surabaya. makasih atas Pizza nya ya
biasa akukan wong deso ra tau mangan pizza :D
dan buat Befox.....
makasih banget telah mengenalkanku pada ilmu komputer dan visual foxpro
karna pesan2 dan bimbingan itu yang mebuat saya bisa mengenal apa itu
komputer "biasa kan aku deso g ngerti opo iku komputer opo maneh HP"
dan buat temen2 semua....makasih ya