Pages

Selasa, 04 Oktober 2011

Air Mata Rasulullah SAW


Air Mata Rasulullah SAW

Tiba-tiba dari luar pintu terdengar seorang yang berseru mengucapkan salam. "Bolehkah saya masuk?" tanyanya. Tapi Fatimah tidak mengizinkannya masuk, "Maafkanlah, ayahku sedang demam," kata Fatimah yang membalikkan badan dan menutup pintu.

Kemudian ia kembali menemani ayahnya yang ternyata sudah membuka mata dan bertanya pada Fatimah, "Siapakah itu wahai anakku?" "Tak tahulah ayahku, orang sepertinya baru sekali ini aku melihatnya," tutur Fatimah lembut.

Lalu, Rasulullah menatap puterinya itu dengan pandangan yang menggetarkan. Seolah-olah bahagian demi bahagian wajah anaknya itu hendak dikenang. "Ketahuilah, dialah yang menghapuskan kenikmatan sementara, dialah yang memisahkan pertemuan di dunia. Dialah malaikatul maut," kata Rasulullah, Fatimah pun menahan ledakkan tangisnya. Malaikat maut datang menghampiri, tapi Rasulullah menanyakan kenapa Jibril tidak ikut sama menyertainya.

Kemudian dipanggilah Jibril yang sebelumnya sudah bersiap di atas langit dunia menyambut ruh kekasih Allah dan penghulu dunia ini. "Jibril, jelaskan apa hakku nanti di hadapan Allah?" Tanya Rasululllah dengan suara yang amat lemah. "Pintu-pintu langit telah terbuka, para malaikat telah menanti ruhmu. Semua syurga terbuka lebar menanti kedatanganmu," kata Jibril. Tapi itu ternyata tidak membuatkan Rasulullah lega, matanya masih penuh kecemasan.

"Engkau tidak senang mendengar khabar ini?" Tanya Jibril lagi. "Khabarkan kepadaku bagaimana nasib umatku kelak?" "Jangan khawatir, wahai Rasul Allah, aku pernah mendengar Allah berfirman kepadaku: 'Kuharamkan syurga bagi siapa saja, kecuali umat Muhammad telah berada di dalamnya," kata Jibril.

Detik-detik semakin dekat, saatnya Izrail melakukan tugas. Perlahan ruh Rasulullah ditarik. Nampak seluruh tubuh Rasulullah bersimbah peluh, urat-urat lehernya menegang. "Jibril, betapa sakit sakaratul maut ini."

Perlahan Rasulullah mengaduh. Fatimah terpejam, Ali yang di sampingnya menunduk semakin dalam dan Jibril memalingkan muka. "Jijikkah kau melihatku, hingga kau palingkan wajahmu Jibril?" Tanya Rasulullah pada Malaikat pengantar wahyu itu.

"Siapakah yang sanggup, melihat kekasih Allah direnggut ajal," kata Jibril. Sebentar kemudian terdengar Rasulullah mengaduh, karena sakit yang tidak tertahankan lagi.

"Ya Allah, dahsyat nian maut ini, timpakan saja semua siksa maut ini kepadaku, jangan pada umatku. "Badan Rasulullah mulai dingin, kaki dan dadanya sudah tidak bergerak lagi.

Bibirnya bergetar seakan hendak membisikkan sesuatu, Ali segera mendekatkan telinganya. "Uushiikum bis shalati, wa maa malakat aimanukum --peliharalah shalat dan peliharalah orang-orang lemah di antaramu."

Diluar pintu tangis mulai terdengar bersahutan, sahabat saling berpelukan. Fatimah menutupkan tangan di wajahnya, dan Ali kembali mendekatkan telinganya ke bibir Rasulullah yang mulai kebiruan. "Ummatii, ummatii, ummatiii?" - "Umatku, umatku, umatku"

Dan, berakhirlah hidup manusia mulia yang memberi sinaran itu. Kini, mampukah kita mencintai sepertinya? Allahumma sholli 'ala Muhammad wa baarik alaaa wa salim 'alaihi Betapa cintanya Rasulullah kepada kita.

NB:
Kirimkan kepada sahabat-sahabat muslim lainnya agar timbul kesadaran untuk mencintai Allah dan RasulNya, seperti Allah dan Rasulnya mencintai kita.

Karena sesungguhnya selain daripada itu hanyalah fana belaka. Amin... Usah gelisah apabila dibenci manusia karena masih banyak yang menyayangimu di dunia tapi gelisahlah apabila dibenci Allah karena tiada lagi yang mengasihmu diakhirat.

sumber : milis


kafemuslimah.com

Ma-iyatullah dan Optimisme Kader Dakwah

Ma-iyatullah dan Optimisme Kader Dakwah

Taujihat ini ditujukan kepada seluruh prajurit dakwah dimanapun berada, yang pantang mengenal lelah walaupun harus mendaki gunung dan mengarungi lautan agar keharuman dakwah Islam dinikmati seantero dunia

Ikhwah dan akhwat fillah rahimakumullah, Masih amat membekas di benak kita kisah tentang keteladanan seorang penggembala kambing di zaman Khalifah Umar ra. Inilah sosok pemuda yang akan terus menjadi ‘icon’ dakwah sepanjang masa. Betapa tidak, di tengah himpitan dan kerasnya pergulatan hidup ini tidak sekeping pun dari keimanannya, keyakinannya digadai, ditukar atau bahkan dijual demi mendapatkan kenikmatan hidup yang sesaat ini. Yang menarik dari kisah ini adalah kata kunci yang menjadi eye catching dari keseluruhan kisah ini yaitu “fa aina Allah?”. Kalimat sederhana itu mengalir dari lidah tegar penuh optimis seorang mukmin sejati. Kalimat “fa aina Allah”’ itu tidak dialamatkan untuk mencuri perhatian Khalifah Umar RA atau sengaja ditujukan untuk mencari muka –carmuk—seperti yang sering dipertontonkan kebanyakan masyarakat di negeri ini saat kunjungan para pejabat ke mereka. Dia tidak lahir begitu saja, akan tetapi kalimat spektakuler ini dilafalkan dari sanubari hati yang paling dalam karena mahabbah kepada Allah SWT.

Ikhwah dan akhwat fillah rahimakumullah, Demikianlah sikap kita dalam menjalani kehidupan dakwah ini. Sepanjang kultur “fa aina Allah” telah meresap dalam-dalam pada diri kita, inilah modal awal kita membangun optimisme dakwah. Bayangkan, seorang penggembala kambing yang hidup di tengah gurun, jauh dari pantauan siapa pun, tidak tersentuh teknologi tinggi –350 tahun lalu—mampu merekonstruksi ma’iyatullah begitu indah. Sudah barang tentu tidak sulit bagi kita merekonstruksi dan menghayati nilai-nilai ma’iyatullah di era teknologi informasi sekarang ini. Allah SWT sudah pasti dan selalu menyertai hamba-hamba-Nya yang beramal, bergerak, berjuang, dan berjihad demi kemuliaan Islam dan kaum muslimin. Keyakinan ini sudah selayaknya menghujam pada diri kita, “Intanshurullah yanshurkum wa yutsabbit aqdamakum.” (Q.S. 47/Muhammad: 10); “Alladziina jaahadu fiina lanahdiyannahum subuulana wa innalaaha la ma’al muhsinin .”(Q.S. 29/Al-Ankabut: 29).

Ikhwah dan akhwat fillah rahimakumullah, Ma’iyatullah harus diartikan bahwa perjuangan menegakkan dien yang hak melalui jalan dakwah dengan ahdaf dan qararat di dalamnya pasti didukung, ditolong, dan dibela Allah SWT beserta bala tentaranya. Inilah fondasi dalam merangkai optimisme untuk memetik kemenangan demi kemenangan di jalan dakwah ilallah. Tidak boleh sedikit pun terbesit keputusasaan, pesimistis dan kehilangan harapan di dalam diri kita. Bahkan, sifat seperti ini dilarang Allah, “...walaa tahinuu fibthigho’il qoum…(Q.S. 4/An-Nisaa’: 104). Ma’iyatullah selalu berbuah ta’yidullah. Artinya, dukungan dan pertolongan berupa apa saja pasti Allah berikan kepada pembela, penolong, dan penegak dienullah ini.

Ikhwah dan akhwat fillah rahimakumullah, Tidak boleh ada keraguan bagi kita. Dakwah ini, cepat atau lambat, Allah SWT akan perlihatkan kemenangan itu dengan kita saksikan sendiri atau kita sudah bersaksi di hadapan Allah. Kesertaan dan penyertaan Allah dalam kehidupan ini mesti tercermin dalam setiap gerak-gerik kita. Untuk itu perlu muhafazhah atau penjagaan ma’iyatullah ini agar tetap berada di sekitar kita. Isyarat-isyarat kemenangan banyak Allah SWT paparkan di dalam Al-Qur’an al-karim, salah satunya adalah dalam surat Al-Anfaal: 45-47. Hai orang-orang yang beriman, apabila kamu memerangi pasukan (musuh), maka berteguh hatilah kamu dan sebutlah (nama) Allah sebanyak-banyaknya agar kamu beruntung. Dan taatlah kepada Allah dan Rasul-Nya dan janganlah kamu berbantah-bantahan, yang menyebabkan kamu menjadi gentar dan hilang kekuatanmu dan bersabarlah. Sesungguhnya Allah beserta orang-orang yang sabar. Dan janganlah kamu menjadi seperti orang-orang yang keluar dari kampungnya dengan rasa angkuh dan dengan maksud ria kepada manusia serta menghalangi (orang) dari jalan Allah. Dan (ilmu) Allah meliputi apa yang mereka kerjakan. Dan ketika setan menjadikan mereka memandang baik pekerjaan mereka dan mengatakan, \"Tidak ada seorang manusia pun yang dapat menang terhadap kamu pada hari ini, dan sesungguhnya saya ini adalah pelindungmu.\" Maka tatkala kedua pasukan itu telah dapat saling lihat melihat (berhadapan), setan itu balik ke belakang seraya berkata, \"Sesungguhnya saya berlepas diri daripada kamu; sesungguhnya saya dapat melihat apa yang kamu sekalian tidak dapat melihat; sesungguhnya saya takut kepada Allah.\" Dan Allah sangat keras siksa-Nya.

Inilah dhawabith yang akan senantiasa menjaga mai’yatullah kita:



Bersikap tsabat Kehadiran, keterlibatan, dan keterikatan kita dalam dakwah ini adalah pilihan sekaligus iradah Allah. Artinya, kita secara sadar dan penuh kesadaran telah memilih jalan ini, untuk kemudian tekad suci ini bertemu dengan kemauan dan kehendak Allah. Jadilah dia sebuah ketegaran, keteguhan, tsabat yang tidak mudah diguncang oleh kekuatan sebesar apapun kecuali oleh sang Pemilik kekuatan itu sendiri. Inilah jamaah dakwah yang kita telah beriltizam di dalamnya. Kita patuhi amarannya, baik dalam susah ataupun senang, baik dalam keadaan lapang atau pun sempit. Bergerak, berputar bersama jamaah ini kemana pun dia bergerak menuju ridha Allah SWT dengan pencapaian ahdaf sebesar-besarnya hingga tegaknya khilafatullah fil ardh.


Banyak-banyak dzikrullah Sikap tsabat mengantarkan seseorang untuk senantiasa dzikrullah, mengingat perintah-Nya, mengingat larangan-Nya, membesarkan asma-Nya, menyucikan dzat-Nya dan memuji kebesaran-Nya. Kesibukan dzikrullah akan mengantarkan kita pada ma’unah Allah SWT. Bahkan, akan menenteramkan jiwa kita sebagai modal dalam menghadapi tantangan, rintangan, dan halangan di jalan dakwah, “...ala bidzkrillahi tathma’innal quluub…. Dzikrullah akan membawa pelakunya menjadi a’dho yang qonaah atas setiap keputusan dan kebijakan jamaah karena dia akan selalu husnudz-zhan dan berpikir positif. Sikap ini tentunya dilanjutkan dengan kreasi-kreasi dalam menjalankan amr jama’ah.


Taat kepada Allah SWT dan kepada Rasul SAW. Faktor kemenangan dakwah ditandai dengan ketaatan kepada Allah dan Rasul-Nya. Ma’rakah Badr menjadi monumen kemenangan tentara kebenaran dalam ketaatannya kepada Allah dan Rasul. Sebaliknya, di perang Uhud inflasi ketaatan telah berakibat kekalahan. Oleh karena itu, jangan pernah kita menganggap remeh, mudah, bahkan meninggalkan ketaatan itu.


Tidak Berbantah-bantahan (adamut tanaju) Prinsipnya, berbeda pendapat adalah biasa. Tapi, menjadi tidak biasa ketika perbedaan pendapat tersebut teraktualisasi menjadi friksi-friksi atau benturan-benturan kepentingan yang tidak lillah yang pada gilirannya akan berakhir dengan terbentuknya faksi-faksi, atau kelompok, atau golongan. Itulah yang tengah terjadi dalam masyarakat negeri ini. Untuk itu, soliditas struktural dan personal menjadi hal mutlak dalam menjalankan dakwah. Bagaimana mungkin terbentuk wihdatul ummah sementara tidak terjadi wihdatul shufuf di kalangan pejuang Islam sendiri. Alhamdulillah, jama’ah kita diberkahi Allah SWT dengan orang-orang yang sadar akan hal tersebut sehingga matanatut tanzhimiyah terjadi di jamaah kita ini.


Bersabar Allah SWT menyuruh kita agar bersabar dalam segala hal, termasuk dalam dakwah. Akan tetapi, yang jauh lebih penting agar kita tetap sabar dalam menghadapi musibah kehidupan seperti kematian orang yang kita cintai, jatuh ke lembah papa setelah mengalami hidup layak, atau perasaan takut bahwa hal tersebut akan menimpa kita. Ini diterangkan oleh Allah SWT dalam surah Al-Baqarah ayat 155, \"Dan sungguh Kami berikan cobaan kepadamu, dengan sedikit ketakutan, kelaparan, kekurangan harta, jiwa dan buah-buahan. Dan berilah berita gembira kepada orang-orang yang sabar.\" Kabar gembira buat orang yang bersabar, \"Orang-orang yang apabila ditimpa musibah, mereka mengucapkan Inna lillahi wa inna ilaihi raaji\'uun. (Sesungguhnya kami berasal dari Allah dan kepada-Nya kami akan kembali.)\" (Q.S. 2/Al-Baqarah: 156). Adapun balasan bagi orang yang sabar adalah keberkahan, kesempurnaan, rahmat dan petunjuk dari Allah. \"Sesungguhnya hanya orang-orang yang bersabar sajalah yang dicukupkan pahala mereka tanpa batas.\" (Q.S. 39/Az-Zumar: 10). Allah SWT akan mencukupkan pahala bagi orang yang sabar itu tanpa batas. Kemenangan Rasulullah SAW dalam perjuangan menegakkan Islam adalah buah dari kesabaran.


Tidak takabur (‘adamul bathr) Alhamdulillah, patut kita syukuri bahwa jamaah dakwah kita yang telah menjadi institusi formal. banyak mendapat sambutan hangat yang luar biasa dari masyarakat. Tidak ketinggalan segudang julukan terhormat disematkan pada partai kita. Namun, sambutan, julukan, dan gelar tersebut sudah barang tentu tidak sampai menyebabkan kita menjadi besar kepala. Ingat, kekalahan kaum muslimin di perang Hunain justru di saat kaum muslimin berperang dalam jumlah pasukan yang besar. Dan jika mereka mau berangkat, tentulah mereka menyiapkan persiapan untuk keberangkatan itu, tetapi Allah tidak menyukai keberangkatan mereka, maka Allah melemahkan keinginan mereka, dan dikatakan kepada mereka, \"Tinggallah kamu bersama orang-orang yang tinggal itu.\" (Q.S. 9/At-Taubah: 46) Penyebab kekalahan tersebut dikarenakan sifat ujub berlebihan. Yang terpenting bagi kita adalah menggiring sambutan, julukan dan gelar masyarakat tadi menjadi benar-benar memenangkan partai ini pada pemilu mendatang.


Ikhlas (‘adamu riya’) Ikhlas, titik. Itu mungkin kata kunci yang akan menyelamatkan amal kita di akhirat kelak. Inilah sifat yang amat dikhawatiri para sahabat Rasul SAW. Termasuk kekhawatiran Abu Bakar Ash-Shiddiq tentang hal ini, sehingga beliau senantiasa berdoa dan berlindung dari sifat riya’ ini, “Allahumma inna naudzu bika min annusyrika bika syai’an na’lamuh wa nastaghfiruka lima laa na’lamuh.”


Ikhwah dan akhwat fillah rahimakumullah, Demikianlah, sejatinya mai’yatullah itu akan menumbuhsuburkan optimisme dalam diri kita dalam menyongsong kemenangan dakwah. Terlebih, ketika ma’iyatullah itu dibingkai dalam akhlak harakiyah yang tercermin dalam Surat Al-Anfal di atas. Akhirul kalam billahi taufiqi wal hidayah. In uriidu illal ishlahi mastatho’tu.




 

Ahwalul Muslimin Al Yaum (Problematika Ummat Islam Hari Ini)

Ahwalul Muslimin Al Yaum (Problematika Ummat Islam Hari Ini)
Oleh : Ust. M Ihsan Arliansyah Tanjung

Tema ini adalah suatu upaya untuk menggambarkan akan keadaan dunia Islam kontemporer (saat ini) dengan segala kelebihan dan kekurangan-kekurangannya. Kondisi umat Islam saat ini penuh dengan kelemahan-kelemahan. Kelemahan-kelemahan itu terkait dengan kapasitas intelektual dan problematika moral. Kelemahan dalam kapasitas intelektual (Al Jahlu). Kelemahan umat Islam yang terkait dengan kapasitas intelektual meliputi:

- Dho'fut Tarbiyah (lemah dalam pendidikan)
Kelemahan dalam aspek pendidikan formal dan informal (pengkaderan) sangat dirasakan oleh umat Islam masa kini. Jika pendidikan juga pembinaan dan pengkaderan lemah maka akan mustahil melahirkan anasir-anasir dalam nadhatul umat (kebangkitan umat).

- Dho'fut Tsaqofah (lemah dalam ilmu pengetahuan)
Dewasa ini sedang sangat pesat perkembangan ilmu pengetahuan dan teknologi tetapi umat Islam terasa tertinggal bila dibandingkan umat yang lainnya, ini disebabkan karena wawasan umat Islam yang sempit dan terbatas juga lemah dalam mengembangkan ilmu pengetahuan ini disebabkan kemauan umat untuk menuntut ilmu sangat rendah.

- Dho'fut Takhthith (lemah dalam perencanaan-perencanaan)
Umat Islam sekarang ini tidak memiliki strategi yang jelas. Rencana perjuangannya penuh dengan misteri. Hal tersebut disebabkan umat Islam tidak diproduk dari pembinaan-pembinaan yang baik dan tidak memiliki wawasan ilmu pengetahuan yang memadai.

- Dho'fut Tanjim (lemah dalam pengorganisasian)
Sekarang ini terjadi gerakan-gerakan yang mengibarkan bendera kebathilan, mereka membangun pengorganisasian yang solid sementara umat Islam lemah dalam pengorganisasian sehingga kebathilan akan di atas angin sedangkan umat Islam akan menjadi pihak yang kalah. Sesuai perkataan khalifah Ali ra "Kebenaran tanpa sistem yang baik akan dikalahkan oleh kebathilan yang terorganisasi dengan baik".

- Dho'ful Amniyah (lemah dalam keamanan)
Masa kini umat Islam lengah dalam menjaga keamanan diri dan kekayaan baik moril dan materil sehingga negeri-negeri muslim yang kaya akan sumber daya alam dirampok oleh negeri-negeri non muslim. Begitu pula dengan Iman, umat lslam tidak lagi menjaganya tidak ada amniyah pada aqidah dan dibiarkan serbuan-serbuan aqidah datang tanpa ada proteksi yang memadai.

- Dho'fut Tanfidz (lemah dalam memobilisasi potensi-potensi diri)
Umat Islam dewasa ini tidak menyadari bahwa begitu banyak nikmat-nikmat yang Allah SWT berikan dan tidak mensyukurinya. Jika umat Islam mersyukuri segala nikmat Allah dari bentuk syukur itu akan muncul kuatut tanfidz yaitu kekuatan untuk memobilisir diri dan sekarang umat Islam lemah sekali dalam memobolisir diri apalagi memobilisir secara kolektifitas.


Kelemahan dalam problematika moral (Maradun Nafs)

Kelemahan-kelemahan dalam problematika moral yang terjadi pada umat Islam sekarang yaitu:

• Adamus Saja'ah (hilangnya keberanian)
Umat Islam tidak seperti dahulu yang berprinsip laa marhuba illalah (tiada yang ditakuti selain Allah) sehingga tidak memiliki keberanian seperti orang-orang terdahulu yakni Rasulullah dan para sahabatnya yang terkenal pemberani. Sekarang ini umat Islam mengalami penyakit Al Juban (pengecut). Rasa takut dan berani itu berbanding terbalik sehingga jika seorang umat Islam takut kepada Allah maka ia akan berani kepada selain Allah tetapi sebaliknya jika ia takut kepada selain Allah maka ia akan berani menentang aturan-aturan Allah SWT.

• Adamus Sabat (hilangnya sikap teguh pendirian)
Umat Islam mulai memperlihatkan mudah mengalami penyimpangan-penyimpangan dan perjalanan hidupnya karena disebabkan oleh :

1. termakan oleh rayuan-rayuan
2. terserang oleh intimidasi atau teror-teror.

Salah satu illutrasi hilangnya sabat (keteguhan) ini adalah prinsif-prinsif hidup kaum muslimin tidak lagi dipegang hanya sering diucapkan tanpa dipraktekan. Sebagai contoh Islam mengajarkan kebersihan sebagian dari Iman tetapi di negari-negeri kaum muslim kondisinya tidak bersih menjadi pemandangan pada umumnya.

• Adamut Dzikriyah (hilangnya semangat untuk mengingat Allah)
Dalam Islam lupa diri sebab utamanya ialah karena lupa kepad Allah. Umat Islam dzikirullah-nya lemah maka mereka kehilangan identitas mereka sendiri sebagai Al Muslimum. Sebagaimana Allah berfirman dalam Qs. Al Hasyr ayat 19 "Dan janganlah kamu seperti orang-orang yang lupa kepada Allah, lalu Allah menjadikan mereka lupa kepada diri mereka sendiri. Mereka itulah orang-orang yang fasik".

• Adamus Sabr (hilangnya kesabaran)
Kesabaran merupakan salah satu pertolongan yang paling pokok bagi keberhasilan seorang muslim, sesuai firman Allah Qs.2:153 "Hai orang-orang beriman mintalah pertolongan (kepada Allah) dengan sabar dan (mengerjakan) shalat sesungguhnya Allah bersama orang-orang yang sabar".
Kesabaran meliputi:

1. Ashabru bitha'at (sabar dalam ketaatan)
2. Ashabru indal mushibah (ketaatan ketika tertimpa musibah)
3. Ashabru anil ma'siat (sabar ketika menghadapi maksiat)

Sebagai umat Islam harus memiliki kesabaran ketiganya.

• Adamul Ikhlas (hilangnya makna ikhlas)
Ikhlas tidak identik dengan tulus. Tulus artinya melakukan sesuatu tanpa perasaan terpaksa padahal bisa saja orang itu ikhlas walaupun ada perasaan terpaksa. Contohnya pada seseorang yang melakukan shalat subuh yang baru saja jaga malam sehingga sanat terasa kantuk tetapi karena shalat adalah suatu kewajiban perintah Allah swt ia tetap mengerjakannya dsb.

• Adamul Iltizam (hilangnya komitmen)
Dewasa ini kaum muslimin kebanyakan tidak istiqomah berkomitmen terhadap Islam bahkan tidak sepenuhnya sadar bahwa Islam harus menjadi pengikat utama dalam hidupnya sehingga mereka banyak menggunakan isme-isme yang lain.

Sabtu, 06 Agustus 2011

link bagus untuk software ringan

http://www.4shared.com/file/12-f_Tnv/software-rental-buku.html 

http://www.4shared.com/file/WdNnTRVW/software-perpustakaan-sekolah.html


Siap Setiap Saat

Siap Setiap Saat

“Hai orang-orang yang beriman, bertakwalah kepada Allah dan hendaklah setiap diri memperhatikan apa yang telah diperbuatnya untuk hari esok (akhirat); dan bertakwalah kepada Allah, sesungguhnya Allah Maha Mengetahui apa yang kamu kerjakan.” (QS. Al Hasyr : 18)

Satu hal yang tidak pernah dijelaskan oleh Allah SWT secara terbuka adalah jatah umur kita masing-masing sebagai manusia. Jatah umur itu tetap dipertahankan Allah SWT sebagai rahasia di antara sekian banyak rahasia-Nya. Jatah umur kita hanya dicatat dalam Lauh Manfuzh, tetapi tidak pernah disampaikan kepada kita. Tidak ada alasan yang tertera secara tekstual mengapa Allah SWT mempertahankan hal itu sebagai rahasia-Nya. Yang kita dapat pahami hanyalah hikmahnya : supaya setiap saat kita siap menghadapi akhir kehidupan kita, untuk selanjutnya memasuki masa pertanggungjawaban.

Konsekuensinya adalah kita harus senantiasa berada dalam kondisi siap untuk menyambut akhir kehidupan itu. Allah SWT memerintahkan kepada kita agar mempersiapkan diri untuk menyambut hari esok, masa depan. Seperti dalam firman-Nya dalam surat Al Hasyr ayat 18 : “Hai orang-orang yang beriman, bertakwalah kepada Allah dan hendaklah setiap diri memperhatikan apa yang telah diperbuatnya untuk hari esok (akhirat); dan bertakwalah kepada Allah, sesungguhnya Allah Maha Mengetahui apa yang kamu kerjakan.”

Begitulah Islam mengajarkan kepada kita, agar kita menjadi insan yang memiliki pandangan luas tentang masa depan, memiliki visi besar tentang kehidupan dalam rangka Memperoleh ridho dan kedudukan terhormat disisi-Nya. Dan untuk itu Allah SWT telah memberikan fasilitas kehidupan kepada kita, fasilitas kehidupan yang kita sebut waktu atau umur sebagai batas masa kerja atau batas masa uji. Yang kemudian nantinya akan kita pertanggungjawabkan di hadapan Allah SWT di akhirat kelak.

Allah SWT juga menurunkan Al-Qur'an sebagai “Petunjuk Pelaksanaan” (guide line) dalam menjalani hidup, dan mengutus Rasulullah SAW sebagai “Komunikator” yang memberikan penjelasan bagaimana mengoprasikan sistem kehidupan yang ada dalam petunjuk itu. Selain itu Allah SWT juga memberikan kita akal sebagai perangkat manusiawi yang menyediakan surga dan neraka, sebagai reward dan punishment atas cara kita menjalani kehidupan.

Kini yang harus kita lakukan adalah memahami, menerima, meyakini, dan menyadarinya setiap saat, serta menjadikannya arah dan perilaku hidup kita. Tidak kurang dan tidak lebih. Agar Islam yang kita sandang tidak hanya menjadi “lipstik” belaka tapi ia harus menginternalisasi dalam diri dan aktivitas kehidupan kita. Insyaallah, mudah-mudahan dengannya kita akan lebih mantap dalam melangkahkan kaki menyusuri jalan kehidupan, lebih mantap dan jelas memandang masa depan, serta senantiasa siap untuk menyambut akhir kehidupan.

Salam Fantastis untukmu generasi Idaman.

Rabu, 22 Juni 2011

pemimpin dan masa depan

"You are Truly a Leader and Your Accomplishments will impact the lives of many generations to come"

"Anda Sesungguhnya Pemimpin dan Prestasi Anda akan berdampak pada kehidupan generasi yang akan datang"

Kamis, 31 Maret 2011

TUGAS SKRIPSI UNTUK UTS-UAS VB.NET (Belum selesai)



LANGSUNG AJA YAH... BUAT CODING SEPERTI DIBAWAH INI 



Public Class menuutama

    Private Sub ToolStripMenuItem1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ToolStripMenuItem1.Click
        login.Show()
    End Sub

    Private Sub EditToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles EditToolStripMenuItem.Click
        Me.Close()
    End Sub

    Private Sub DataKaryawanToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles DataKaryawanToolStripMenuItem.Click
        Datakaryawan.Show()
    End Sub

    Private Sub DataAbsensiToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles DataAbsensiToolStripMenuItem.Click
        DataAbsensi.Show()
    End Sub

    Private Sub DataPotonganToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles DataPotonganToolStripMenuItem.Click
        datapotongan.Show()
    End Sub

    Private Sub DataGajiToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles DataGajiToolStripMenuItem.Click
        DataGaji.Show()
    End Sub

    Private Sub GajiToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles GajiToolStripMenuItem.Click
        LaporanGaji.Show()
    End Sub
End Class

Source code nya belum dibuat

Public Class Datakaryawan

    Dim isitext(12) As String
    Dim listampil As ListViewItem

    Private Sub Datakaryawan_Activated(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Activated

        Call isicmbo()
        Call tampil()
    End Sub

    Sub bersih()
        TextBox1.Text = " "
        TextBox2.Text = " "
        TextBox3.Text = " "
        TextBox4.Text = " "
        TextBox5.Text = " "
        TextBox6.Text = " "
        TextBox7.Text = " "
        ComboBox1.Text = "1. Pria "
        ComboBox2.Text = "1. Belum Menikah "
        ComboBox3.Text = "1. Tata Usaha "

    End Sub
    Sub isicmbo()
        ComboBox1.Items.Add("1. laki-laki")
        ComboBox1.Items.Add("2. Perempuan")
        ComboBox2.Items.Add("1. Belum Menikah")
        ComboBox2.Items.Add("2. Menikah")
        ComboBox3.Items.Add("1. Kepala Sekolah")
        ComboBox3.Items.Add("2. Guru")
        ComboBox3.Items.Add("3. Tata usaha")



    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

    End Sub

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        If Button2.Text = "Tambah" Then
            Button2.Text = "Simpan"
            Button1.Enabled = False
            Button3.Enabled = False
            Button4.Text = "Batal"
            Button5.Enabled = False
            Button6.Text = "Keluar"
            TextBox2.Focus()
        Else
            isitext(0) = TextBox1.Text
            isitext(1) = TextBox2.Text
            isitext(2) = TextBox3.Text
            isitext(3) = TextBox4.Text
            isitext(4) = TextBox5.Text
            isitext(5) = ComboBox1.Text
            isitext(6) = TextBox6.Text
            isitext(7) = ComboBox2.Text
            isitext(8) = ComboBox3.Text
            isitext(9) = TextBox7.Text
            isitext(10) = DateTimePicker1.Text
            isitext(11) = DateTimePicker2.Text

            Button2.Text = "Tambah"
            Button1.Enabled = True
            Button3.Enabled = True
            Button5.Enabled = True
            TextBox2.Focus()

            listampil = New ListViewItem(isitext)
            ListView1.Items.Add(listampil)
            Call bersih()
            TextBox1.Focus()


        End If
    End Sub

    Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
        If Button3.Text = "Edit" Then
            Button3.Text = "Simpan"
            Button1.Enabled = False
            Button2.Enabled = False
            Button4.Text = "Batal"
            Button5.Enabled = False
            Button6.Text = "Keluar"
            TextBox3.Focus()
        Else

        End If

    End Sub
    Sub normal()
        Button1.Text = "Cari"
        Button1.Enabled = True
        Button2.Text = "Tambah"
        Button2.Enabled = True
        Button3.Text = "Edit"
        Button3.Enabled = True
        Button4.Text = "Batal"
        Button4.Enabled = True
        Button5.Text = "Hapus"
        Button5.Enabled = True
        Button6.Text = "Keluar"
        Button6.Enabled = True

    End Sub

    Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
        Button1.Enabled = True
        Button3.Enabled = True
        Button5.Enabled = True
        Button2.Text = "Tambah"
        bersih()

    End Sub

    Private Sub Button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click
        ListView1.FocusedItem.Remove()

    End Sub

    Private Sub Button6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button6.Click
        If Button6.Text = "Keluar" Then
            Me.Close()
        Else
            Call bersih()
            Call normal()
        End If

    End Sub
    Sub tampil()
        ListView1.View = View.Details
        ListView1.Columns.Add("NIK", 100, HorizontalAlignment.Center)
        ListView1.Columns.Add("NM KARY", 100, HorizontalAlignment.Center)
        ListView1.Columns.Add("Absensi", 100, HorizontalAlignment.Center)
        ListView1.Columns.Add("Tmpt Lhr", 100, HorizontalAlignment.Center)
        ListView1.Columns.Add("Tgl Lhr", 100, HorizontalAlignment.Center)
        ListView1.Columns.Add("Jenis Kelamin", 100, HorizontalAlignment.Center)
        ListView1.Columns.Add("ALAMAT", 100, HorizontalAlignment.Center)
        ListView1.Columns.Add("Status", 100, HorizontalAlignment.Center)
        ListView1.Columns.Add("JABATAN", 100, HorizontalAlignment.Center)
        ListView1.Columns.Add("Msa Kerja", 100, HorizontalAlignment.Center)
        ListView1.Columns.Add("Tgl Msk", 100, HorizontalAlignment.Center)
        ListView1.Columns.Add("Tgl Skrg", 100, HorizontalAlignment.Center)


    End Sub

    Private Sub ListView1_ItemSelectionChanged(ByVal sender As Object, ByVal e As System.Windows.Forms.ListViewItemSelectionChangedEventArgs) Handles ListView1.ItemSelectionChanged
        TextBox1.Text = e.Item.Text

    End Sub
End Class


Public Class DataAbsensi

    Dim isitext(8) As String
    Dim listampil As ListViewItem

    Private Sub DataAbsensi_Activated(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Activated
        Call tampil()
    End Sub
    Sub bersih()
        TextBox1.Text = ""
        TextBox2.Text = ""
        TextBox3.Text = ""
        TextBox4.Text = ""
        TextBox5.Text = ""
        TextBox6.Text = ""

    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

    End Sub

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        If Button2.Text = "Tambah" Then
            Button2.Text = "Simpan"
            Button1.Enabled = False
            Button3.Enabled = False
            Button4.Text = "Batal"
            Button5.Enabled = False
            Button6.Text = "Keluar"
            TextBox2.Focus()
        Else
            isitext(0) = ComboBox1.Text
            isitext(1) = TextBox1.Text
            isitext(2) = DateTimePicker1.Text
            isitext(3) = TextBox2.Text
            isitext(4) = TextBox3.Text
            isitext(5) = TextBox4.Text
            isitext(6) = TextBox5.Text
            isitext(7) = TextBox6.Text


            Button2.Text = "Tambah"
            Button1.Enabled = True
            Button3.Enabled = True
            Button5.Enabled = True
            TextBox2.Focus()

            listampil = New ListViewItem(isitext)
            ListView1.Items.Add(listampil)
            Call bersih()
            TextBox1.Focus()


        End If
    End Sub
    Sub normal()
        Button1.Text = "Cari"
        Button1.Enabled = True
        Button2.Text = "Tambah"
        Button2.Enabled = True
        Button3.Text = "Edit"
        Button3.Enabled = True
        Button4.Text = "Batal"
        Button4.Enabled = True
        Button5.Text = "Hapus"
        Button5.Enabled = True
        Button6.Text = "Keluar"
        Button6.Enabled = True

    End Sub

    Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click

    End Sub

    Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
        Button1.Enabled = True
        Button3.Enabled = True
        Button5.Enabled = True
        Button2.Text = "Tambah"
        bersih()
    End Sub

    Private Sub Button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click
        ListView1.FocusedItem.Remove()
    End Sub

    Private Sub Button6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button6.Click
        If Button6.Text = "Keluar" Then
            Me.Close()
        Else
            Call bersih()
            Call normal()
        End If
    End Sub
    Sub tampil()
        ListView1.View = View.Details
        ListView1.Columns.Add("NO ABS", 100, HorizontalAlignment.Center)
        ListView1.Columns.Add("NIK", 100, HorizontalAlignment.Center)
        ListView1.Columns.Add("TANGGAL", 100, HorizontalAlignment.Center)
        ListView1.Columns.Add("Jum Msk", 100, HorizontalAlignment.Center)
        ListView1.Columns.Add("ALPA", 100, HorizontalAlignment.Center)
        ListView1.Columns.Add("SAKIT", 100, HorizontalAlignment.Center)
        ListView1.Columns.Add("IJIN", 100, HorizontalAlignment.Center)
        ListView1.Columns.Add("JUM ABS", 100, HorizontalAlignment.Center)

    End Sub

    Private Sub ListView1_ItemSelectionChanged(ByVal sender As Object, ByVal e As System.Windows.Forms.ListViewItemSelectionChangedEventArgs) Handles ListView1.ItemSelectionChanged
        TextBox1.Text = e.Item.Text
    End Sub
End Class



Public Class datapotongan

    Dim isitext(5) As String
    Dim listampil As ListViewItem

    Private Sub datapotongan_Activated(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Activated
        Call normal()
        Call tampil()
    End Sub

    Private Sub datapotongan_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

    End Sub
    Sub bersih()
        ComboBox1.Text = " "
        TextBox1.Text = " "
        TextBox2.Text = " "
        TextBox3.Text = " "


    End Sub
    Sub normal()
        Button1.Text = "Cari"
        Button1.Enabled = True
        Button2.Text = "Tambah"
        Button2.Enabled = True
        Button3.Text = "Edit"
        Button3.Enabled = True
        Button4.Text = "Batal"
        Button4.Enabled = True
        Button5.Text = "Hapus"
        Button5.Enabled = True
        Button6.Text = "Keluar"
        Button6.Enabled = True

    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

    End Sub

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        If Button2.Text = "Tambah" Then
            Button2.Text = "Simpan"
            Button1.Enabled = False
            Button3.Enabled = False
            Button4.Text = "Batal"
            Button5.Enabled = False
            Button6.Text = "Keluar"
            TextBox2.Focus()
        Else
            isitext(0) = DateTimePicker1.Text
            isitext(1) = ComboBox1.Text
            isitext(2) = TextBox1.Text
            isitext(3) = TextBox2.Text
            isitext(4) = TextBox3.Text


            Button2.Text = "Tambah"
            Button1.Enabled = True
            Button3.Enabled = True
            Button5.Enabled = True
            TextBox2.Focus()

            listampil = New ListViewItem(isitext)
            ListView1.Items.Add(listampil)
            Call bersih()
            TextBox1.Focus()


        End If
    End Sub

    Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click

    End Sub

    Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
        Button1.Enabled = True
        Button3.Enabled = True
        Button5.Enabled = True
        Button2.Text = "Tambah"
        bersih()
    End Sub

    Private Sub Button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click
        ListView1.FocusedItem.Remove()
    End Sub

    Private Sub Button6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button6.Click
        If Button6.Text = "Keluar" Then
            Me.Close()
        Else
            Call bersih()
            Call normal()
        End If
    End Sub
    Sub tampil()
        ListView1.View = View.Details
        ListView1.Columns.Add("Tanggal", 100, HorizontalAlignment.Center)
        ListView1.Columns.Add("NIK", 100, HorizontalAlignment.Center)
        ListView1.Columns.Add("Nama", 100, HorizontalAlignment.Center)
        ListView1.Columns.Add("Pot Kop", 100, HorizontalAlignment.Center)
        ListView1.Columns.Add("Pot Kes", 100, HorizontalAlignment.Center)
    End Sub

    Private Sub ListView1_ItemSelectionChanged(ByVal sender As Object, ByVal e As System.Windows.Forms.ListViewItemSelectionChangedEventArgs) Handles ListView1.ItemSelectionChanged
        TextBox1.Text = e.Item.Text
    End Sub



Public Class DataGaji

    Dim isitext(16) As String
    Dim listampil As ListViewItem
    Private Sub DataGaji_Activated(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Activated
        Call tampil()

    End Sub
    Sub bersih()
        ComboBox1.Text = ""
        TextBox1.Text = ""
        TextBox2.Text = ""
        TextBox3.Text = ""
        TextBox4.Text = ""
        TextBox5.Text = ""
        TextBox6.Text = ""
        TextBox7.Text = ""
        TextBox8.Text = ""
        TextBox9.Text = ""
        TextBox10.Text = ""
        TextBox11.Text = ""
        TextBox12.Text = ""
        TextBox13.Text = ""
        TextBox14.Text = ""
        TextBox15.Text = ""

    End Sub
    Sub normal()
        Button1.Text = "Cari"
        Button1.Enabled = True
        Button2.Text = "Tambah"
        Button2.Enabled = True
        Button3.Text = "Batal"
        Button3.Enabled = True
        Button4.Text = "Hapus"
        Button4.Enabled = True
        Button5.Text = "Keluar"
        Button5.Enabled = True
        Button6.Text = "Cetak"
        Button6.Enabled = True

    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

    End Sub

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        If Button2.Text = "Tambah" Then
            Button2.Text = "Simpan"
            Button1.Enabled = False
            Button3.Text = "Batal"
            Button4.Enabled = False
            Button5.Text = "Keluar"
            Button6.Enabled = False
            TextBox1.Focus()
        Else
            isitext(0) = ComboBox1.Text
            isitext(1) = TextBox1.Text
            isitext(2) = TextBox2.Text
            isitext(3) = TextBox3.Text
            isitext(4) = TextBox4.Text
            isitext(5) = TextBox5.Text
            isitext(6) = TextBox6.Text
            isitext(7) = TextBox7.Text
            isitext(8) = TextBox8.Text
            isitext(9) = TextBox9.Text
            isitext(10) = TextBox10.Text
            isitext(11) = TextBox11.Text
            isitext(12) = TextBox12.Text
            isitext(13) = TextBox13.Text
            isitext(14) = TextBox14.Text
            isitext(15) = TextBox15.Text


            Button2.Text = "Tambah"
            Button1.Enabled = True
            Button3.Enabled = True
            Button5.Enabled = True
            TextBox2.Focus()

            listampil = New ListViewItem(isitext)
            ListView1.Items.Add(listampil)
            Call bersih()
            Call normal()
            TextBox1.Focus()


        End If
    End Sub

    Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
        Button1.Enabled = True
        Button4.Enabled = True
        Button6.Enabled = True
        Button2.Text = "Tambah"
        Call bersih()
    End Sub

    Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
        ListView1.FocusedItem.Remove()
    End Sub

    Private Sub Button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click
        If Button5.Text = "Keluar" Then
            Me.Close()
        Else
            Call bersih()
            Call normal()
        End If
    End Sub

    Private Sub Button6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button6.Click

    End Sub
    Sub tampil()
        ListView1.View = View.Details
        ListView1.Columns.Add("NIK", 100, HorizontalAlignment.Center)
        ListView1.Columns.Add("Nama", 100, HorizontalAlignment.Center)
        ListView1.Columns.Add("Jabatan", 100, HorizontalAlignment.Center)
        ListView1.Columns.Add("Masa Kerja", 100, HorizontalAlignment.Center)
        ListView1.Columns.Add("Gaji Pokok", 100, HorizontalAlignment.Center)
        ListView1.Columns.Add("Tunj Jabatan", 100, HorizontalAlignment.Center)
        ListView1.Columns.Add("Tunj Keluarga", 100, HorizontalAlignment.Center)
        ListView1.Columns.Add("Tunj Kesehatan", 100, HorizontalAlignment.Center)
        ListView1.Columns.Add("Tunj Transport", 100, HorizontalAlignment.Center)
        ListView1.Columns.Add("Total Tunj", 100, HorizontalAlignment.Center)
        ListView1.Columns.Add("Pot Transport", 100, HorizontalAlignment.Center)
        ListView1.Columns.Add("Pot Kesehatan", 100, HorizontalAlignment.Center)
        ListView1.Columns.Add("Pot Koperasi", 100, HorizontalAlignment.Center)
        ListView1.Columns.Add("Total Pot", 100, HorizontalAlignment.Center)
        ListView1.Columns.Add("Gaji Kotor", 100, HorizontalAlignment.Center)
        ListView1.Columns.Add("Gaji Bersih", 100, HorizontalAlignment.Center)

    End Sub

    Private Sub ListView1_ItemSelectionChanged(ByVal sender As Object, ByVal e As System.Windows.Forms.ListViewItemSelectionChangedEventArgs) Handles ListView1.ItemSelectionChanged
        TextBox1.Text = e.Item.Text
    End Sub
End Class


Laporan gaji belum dibuat source code nya.

(selamat mencoba)