selamat datang para pengunjung anda pengunjung yang ke

Jumat, 23 Januari 2009

hadist sahih

Dari Abu Musa al-Asy'ari r.a. berkata: Rasulullah saw bersabda, "Perumpamaan orang Mukmin yang membaca al-Qur'an adalah bagaikan buah jeruk; baunya harum dan rasanya lezat. Dan perumpamaan orang mukmin yang tidak dapat membaca al-Qur'an adalah bagaikan kurma; rasanya lezat dan tidak berbau. Dan perumpamaan orang munafik yang membaca al-Qur'an adalah bagaikan bunga yang berbau harum dan rasanya pahit. Dan perumpamaan orang munafik yang tidak membaca al-Qur'an adalah bagaikan buah hanzhal yang tidak berbau dan rasanya pahit."

Dari Abu Hurairah r.a. berkata: Rasulullah saw bersabda, "Sesungguhnya umatku pada hari kiamat nanti akan dipanggil dalam keadaan putih cemerlang muka, tangan dan kakinya dari bekas-bekas wudhu". Maka barangsiapa ingin memperpanjang kecermelangannya itu, hendaklah ia melakukannya.
(Bukhari - Muslim)

Dari Abu Hurairah r.a. berkata: Rasulullah saw bersabda, "Andaikan manusia benar-benar mengetahui keutamaan shaf pertama dan menyambut adzan kemudian untuk mendapatkan shaf pertama mereka harus berundi, niscaya mereka akan berundi untuk mendapatkannya. Dan andaikan mereka mengetahui keutamaan mendatangi shalat berjamaah pada waktu yang awal, niscaya mereka akan berlomba-lomba untuk mendahuluinya. Dan andaikan mereka mengetahui keutamaan shalat shubuh dan 'isya berjamaah, pasti mereka akan mendatanginya, meskipun dengan merangkak-rangkak."

Dari Abu Hurairah r.a. berkata: Rasulullah saw bersabda, "Apabila telah diserukan adzan untuk shalat maka berlari mundurlah setan sambil terkentut-kentut, hingga tidak terdengar olehnya suara adzan itu. Apabila adzan telah selesai, ia pun datang kembali. Kemudian ia mengganggu hati orang yang shalat, seraya berkata, 'Ingatlah ini dan ingatlah itu.' Padahal yang demikian itu tidak pernah diingatnya sebelum shalat. Sehingga orang yang shalat itu tidak tahu lagi, sudah berapa rakaatkah shalat yang dikerjakannya itu."
(Bukhari - Muslim)

Dari Abu Hurairah r.a. berkata: Rasulullah saw bersabda, "Shalat seseorang dengan berjamaah itu dilipatgandakan (pahalanya) atas shalatnya yang dilakukan di rumah atau di pasarnya dengan kelipatan dua puluh lima kali. Yang demikian itu karena apabila ia menyempurnakan wudhu'nya dengan maksud untuk shalat (berjamaah), maka tiadalah ia melangkahkan kakinya selangkah melainkan terangkat untuknya satu derajat dan dihapuskan daripadanya satu kesalahannya. Lalu apabila ia melakukan shalat, maka senantiasalah Malaikat mendoakan atasnya, selama ia masih tetap berada di tempat shalatnya. (Doa Malaikat itu adalah), 'Ya Allah, belas kasihanilah dia. Ya Allah, rahmatilah dia.' Dan senantiasalah salah seorang kamu dianggap berada dalam shalat, selama ia menantikan shalat (berjamaah)."
(Bukhari - Muslim)

Zaid bin Tsabit r.a. berkata: Bersabda Nabi saw, "Hai sekalian manusia, shalatlah di rumah, maka sesungguhnya seutama-utama shalat seseorang itu adalah di rumahnya, kecuali shalat fardhu."
(Bukhari - Muslim)

Ibnu Umar r.a. berkata: Bersabda Nabi saw, "Jadikan penghabisan (akhir) shalatmu pada waktu malam dengan shalat witir."
(Bukhari - Muslim)

Abu Hurairah r.a. berkata: Rasulullah saw bersabda, "Barangsiapa bangun malam pada bulan Ramadhan dan mengerjakan shalat malam karena iman dan mengharapkan pahala dari Allah maka diampuni semua dosanya yang telah lalu."
(Bukhari - Muslim)

Abu Hurairah r.a. berkata: Rasulullah saw bersabda, "Andai aku tidak khawatir akan memberatkan umatku, niscaya kuwajibkan mereka bersiwak (gosok gigi) pada tiap-tiap shalat."
(Bukhari - Muslim)

Abu Hurairah r.a. berkata: Bersabda Nabi saw, "Lima macam dari fitrah (kelakuan yang tetap dari sunat para Nabi) yaitu khitan, mencukur rambut kemaluan, memotong kuku, mencabut bulu ketiak dan mencukur kumis."
(Bukhari - Muslim)

Ibnu Umar r.a. berkata: Bersabda Nabi saw, "Cukurlah kumis dan peliharalah jenggot."
(Bukhari - Muslim)

Dari Jabir bin Samurah r.a. berkata: "Penduduk Kufah mengadukan Sa'ad bin Abi Waqqash r.a. kepada Amirul Mukminin Umar bin Al-Khaththab r.a. sehingga Umar pun memecatnya dan digantikan oleh Ammar bin Yasir r.a. Begitu berat pengaduan mereka, hingga mereka mengadukan bahwa engkau tidak bisa shalat dengan sempurna." Jawab Sa'ad, "Adapun aku, demi Allah, memimpin mereka dalam shalat sebagaimana shalat Rasulullah saw tidak mengurangi sedikit pun daripadanya. Yaitu memanjangkan dua rakaat pertama dan memendekkan dua rakaat terakhir." Berkata Umar, "Aku kira engkau memang demikian adanya, ya Abu Ishaq." Kemudian Umar mengirim Sa'ad ke Kufah bersama beberapa orang untuk menanyakan langsung kepada rakyat di sana tentang dirinya. Setiap masjid didatangi dan kepada jamaah yang ada di situ langsung ditanyakan tentang Sa'ad. Maka mereka pun menjawab dengan jujur, terus terang dan mereka semua memuji kebaikan Sa'ad kecuali ketika mereka masuk di masjid bani 'Abs, maka ketika ditanyakan tentang Sa'ad ada seorang lelaki bernama Usamah bin Qatadah yang bergelar Abu Sa'adah menjawab, "Jika engkau bertanya tentang Sa'ad maka ia adalah orang yang tidak suka keluar
memimpin pasukan perang, kalau membagi tidak pernah rata dan kalau menghukum tidak adil." Mendengar jawaban seperti itu, Sa'ad menyerahkan urusannya kepada Allah dan berkata, "Ingat, saya hendak berdoa tiga macam yaitu 'Ya Allah, jika hamba-Mu ini berdusta (yakni Abu Sa'adah), hanya bermaksud mencari muka dan nama, maka panjangkanlah umurnya, jadikan ia miskin sampai tua dan hadapkan ia kepada berbagai fitnah.'" Ternyata doa Sa'ad dikabulkan oleh Allah, sehingga ketika orang itu telah lanjut usia, selalu saja bila orang bertanya tentangnya maka dijawab, "Orang yang telah terkena bala' oleh doa Sa'ad bin Abi Waqqash r.a."
(Bukhari - Muslim)

Abdul Malik bin Umar yang meriwayatkan hadits ini dari Jabir bin Samurah berkata, "Saya sendiri melihat orang itu telah demikian tuanya, sehingga alisnya hampir menutupi matanya. Tetapi ia selalu duduk- duduk di tepi jalan mengganggu gadis-gadis yang lewat."
Dari Abu Waqid (al-Harits) bin 'Auf r.a. berkata: Ketika Rasulullah saw duduk di masjid, sedang orang banyak (para sahabat) duduk pula bersama beliau, tiba-tiba datang tiga orang lelaki. Maka dua orang diantara mereka menghadap Rasulullah saw, sedang yang seorang lagi terus pergi. Kemudian kedua orang itu berhenti di hadapan Rasulullah saw. Lalu salah seorang dari keduanya melihat tempat kosong pada majelis itu, kemudian duduk padanya. Sedang yang seorang lagi duduk di belakang mereka. Adapun orang yang ketiga maka ia berpaling dan terus pergi. Ketika Rasulullah saw telah selesai menyampaikan ajarannya, berliau bersabda, "Sukakah aku beritahukan kepadamu
tentang ketiga orang itu? Adapun salah seorang dari mereka, maka ia bermaksud mendekatkan diri kepada Allah, maka Allah pun mendekatinya. Yang seorang lagi merasa malu (untuk berdesak-desakkan) maka Allah pun malu (untuk menyiksanya). Sedang orang yang ketiga berpaling, maka Allah pun berpaling dari padanya (tidak memberikan rahmat-Nya)."
(Bukhari - Muslim)

Dari Abu Hurairah r.a. berkata: Rasulullah saw bersabda, "Ada seseorang yang biasa menghutangkan kepada orang-orang, maka jika ia menyuruh menagih kepada pesuruhnya, ia selalu berpesan, 'Jika kamu mendapati orang itu masih belum dapat membayar, maka maafkanlah dia, semoga Allah memaafkan kami kelak.' Maka ketika ia berhadapan dengan Allah, Allah memaafkannya."
(Bukhari - Muslim)

Dari Abu Waqid (al-Harits) bin 'Auf r.a. berkata: Ketika Rasulullah saw duduk di masjid, sedang orang banyak (para sahabat) duduk pula bersama beliau, tiba-tiba datang tiga orang lelaki. Maka dua orang diantara mereka menghadap Rasulullah saw, sedang yang seorang lagi terus pergi. Kemudian kedua orang itu berhenti di hadapan Rasulullah saw. Lalu salah seorang dari keduanya melihat tempat kosong pada majelis itu, kemudian duduk padanya. Sedang yang seorang lagi duduk di belakang mereka. Adapun orang yang ketiga maka ia berpaling dan terus pergi. Ketika Rasulullah saw telah selesai menyampaikan ajarannya, berliau bersabda, "Sukakah aku beritahukan kepadamu
tentang ketiga orang itu? Adapun salah seorang dari mereka, maka ia bermaksud mendekatkan diri kepada Allah, maka Allah pun mendekatinya. Yang seorang lagi merasa malu (untuk berdesak-desakkan) maka Allah pun malu (untuk menyiksanya). Sedang orang yang ketiga berpaling, maka Allah pun berpaling dari padanya (tidak memberikan rahmat-Nya)."
(Bukhari - Muslim)

Prev: Konsep Nabawi Menghindari Penyakit
Next: Syaikh Bakr Abu Zaid –Hafizhahullah-

Sabtu, 17 Januari 2009

fibonacci dengan c++ 2

#include

int main()
{
//define first two fibonacci series numbers.
int fib1 = 0;
int fib2 = 1;

//declare the variable to store the next number of fibonacci series
int fib3;

//declare the variable to store how many numbers to be printed. Default is 2.
int numbers = 2;

//the counter to keep track how many numbers are printed.
int counter = 2;

//Ask user how many numbers of the fibonacci series need to be printed.
std::cout << "How many Fibonacci number you need ? : " ;

//Store the number.
std::cin >> numbers;

//If number entered is less than 3, exit the program.
if (numbers < 3) return 0;

//Print the first two element.
std::cout << fib1 << "\t" << fib2;

//do-while loop to calculate the new element of the series and printing the same.
do {
counter++;
fib3 = fib1 + fib2;
std::cout << "\t" << fib3;
fib1 = fib2;
fib2 = fib3;
} while (counter <= numbers);

std::cout << std::endl;
system("pause");
return 0;
}

fibonacci dengan c++

#include
int main() {
unsigned long long a = 1;
unsigned long long b = 1;
for (int i = 0; i < 45; i++) {
a += b;
std::cout << a/b << std::endl;
b += a;
std::cout << b/a << std::endl;
}
std::cin.get();

Rabu, 07 Januari 2009

perkaliian oktal dengan visual basic

Function DesimalKeOktal$(Nilai&)

Dim Nilai2 As Long

Dim Hasil As String

Dim LHasil As Integer

Dim i As Integer

Do Until Nilai = 0

Nilai2 = Nilai Mod 8

Nilai = Nilai \ 8

Hasil = Hasil & CStr(Nilai2)

Loop

LHasil = Len(Hasil)

For i = 0 To LHasil - 1

DesimalKeOktal$ = DesimalKeOktal$ & _

Mid(Hasil, LHasil - i, 1)

Next

End Function

Function OktalKeDesimal$(Nilai$)

Dim LNilai As Integer

Dim i As Integer

Dim Hasil As Long

LNilai = Len(Nilai$)

For i = 1 To LNilai

Hasil = Hasil + CLng(Mid(Nilai, i, 1)) * (8 ^ (LNilai - i))

Next

'

OktalKeDesimal$ = Hasil

End Function

Private Sub cmdJumlah_Click()

Dim Temp1&, Temp2&

Dim Angka1&, Angka2&

Dim Hasil&

Angka1 = Me.txtAngka1.Text

Angka2 = Me.txtAngka2.Text

'Mengubah oktal ke desimal lebih dulu dari angka-angka yg diinputkan

Temp1 = OktalKeDesimal$(CStr(Angka1))

Temp2 = OktalKeDesimal$(CStr(Angka2))

'Menghitung angka yg diinputkan (dalam basis desimal)

Hasil& = Temp1 * Temp2

Me.txtHasil.Text = DesimalKeOktal(Hasil&) '<-- mengembalikan ke basis oktal

End Sub

Private Sub Timer1_Timer()

Label1.Caption = Format(Now, "dd mmmm yyyy hh:mm:ss")

End Sub

Private Sub txtAngka1_KeyPress(KeyAscii As Integer)

If Not (KeyAscii >= ("0") And _

KeyAscii <= Asc("7") Or _

KeyAscii = vbKeyBack Or _

KeyAscii = vbKeyReturn Or _

KeyAscii = vbKeyDelete) Then

'KeyAscii adalah 0 (tidak berfungsi)

Beep

KeyAscii = 0

End If

End Sub

Private Sub txtAngka2_KeyPress(KeyAscii As Integer)

If Not (KeyAscii >= 48 And _

KeyAscii <= Asc("7") Or _

KeyAscii = vbKeyBack Or _

KeyAscii = vbKeyReturn Or _

KeyAscii = vbKeyDelete) Then

'KeyAscii adalah 0 (tidak berfungsi)

Beep

KeyAscii = 0

End If

End Sub

Koneksi 2 PC menggunakan kabel Cross


Seorang gila jaringan mungkin ada yang sampai hati untuk membawa-bawa kabel utp jenis crossing lengkap dengan laptop dalam tas gendongnya setiap saat. Penulis pun pernah dalam kondisi seperti itu. Biasanya hal ini terjadi karena orang gila jaringan tersebut selalu ingin melakukan pekerjaan di berbagai tempat dengan 2 PC sekaligus. :). Walaupun pada saat sekarang ada sebuah alat yang tidak repot dan tidak dapat digunakan untuk membelitkan leher. :D. Yakni USB Wlan. Namun ada kondisi yang tidak memungkinkan untuk dapat menggunakan usb wlan, seperti kondisi ekonomi kantong tipis orang gila jaringan tersebut, walaupun hanya mengeluarkan beberapa lembar uang kertas untuk membelinya, tapi tetap saja ini adalah inti permasalahannya, dan berbagai kendala lainnya. :D

Minggu, 04 Januari 2009

jaringan komputer

Kemajuan teknologi komputer sebagai pengolah data berkembang semakin cepat. Sejak terjadi penggabungan teknologi komputer dengan teknologi komunikasi, maka pengolahan data yang semula saling terpisah (stand alone) antar unit komputer sekarang dapat saling dihubungkan melalui suatu sistem jaringan komputer (komputer network). Bila komputer yang saling berhubungan berada dalam satu lokasi yang sama maka disebut Local Area Network (LAN). Namun jika banyak terdapat LAN yang terpisah dibeberapa tempat yang secara geografis cukup jauh dan saling berhubungan disebut juga jaringan namun cakupannya lebih luas, atau disebut dengan Wide Area Network (WAN).
Konsep Dasar Jaringan

Jaringan komputer adalah sekelompok komputer yang saling dihubungkan dengan menggunakan suatu protokol komunikasi sehingga antara satu komputer dengan komputer yang lain dapat berbagi data atau berbagi sumber daya (sharing resources).

Sistem pemasangan jaringan dapat dibedakan menjadi dua macam, yaitu :
Jaringan Terpusat
Adalah jaringan yang terdiri dari beberapa node (workstation) yang terhubung dengan sebuah komputer pusat atau disebut Server. Pada jaringan ini sistem kerja workstation tergantung dari komputer pusat. Dan komputer pusat tugasnya melayani permintaan akses dari workstation.
Jaringan Peer-to-Peer
Adalah jaringan yang terdiri dari beberapa komputer yang saling berhubungan antara satu dengan lainnya tanpa komputer pusat (server base). Pada masing-masing komputer workstation terdapat media penyimpanan (hard disk) yang berfugsi sebagai server individu.
Pemanfaatan Jaringan Komputer

Pembentukan sebuah jaringan komputer sangan erat dengan manfaat yang dapat diperoleh dengan adanya jaringan tersebut.
Bagi pakai (sharing) peralatan (resources)
Dengan adanya jaringan komputer, maka pemakain beberapa peralatan komputer seperti printer, hard disk, disket, scanner, CD-ROM dan lainnya dapat dilakukan bersama-sama saling bergantian tanpa harus memindahkan posisi peralatan yang terpasang tersebut.
Bagi pakai software
Hampir dalam setiap organisasi, kemampuan dalam melakukan bagi pakai berkas atau file data diperlukan setiap hari. Beberapa tipe software PC, khususnya program manajemen basis data atau database, didesain disamping agar bisa dipakai oleh satu pemakai, juga dimungkinkan untuk dipakai bersama-sama dengan pemakai lain dalam waktu yang bersamaan. Atau dengan kata lain, untuk mengakses dan meng-update file-file tadi. Paket yang lain, seperti program pengolah data (word processor) dan spreadsheet, kebanyakan didesaian hanya untuk satu pemakai yang dapat meng-update file.
Komunikasi
Kominikasi antar pemakai dalam suatu jaringan dapat dilakukan dengan menggunakan e-mail atau tele conference. Sehingga kebutuhan akan komunikasi antar pemakai dapat dipenuhi tanpa harus pindah dari tempat kerjanya. Selain itu pemakai e-mail dapat menekan pemakaian pulsa telepon.
Pemrosesan terpusat (terdistribusi)
Didalam suatu jaringan komputer, data dapat diolah secara terpusat atau secara terdistribusi. Pemrosesan secara terpusat dilakukan apabila sebuah data yang dibuat oleh tiap pemakai jaringan dikehendaki untuk disatukan dalam komputer pusat. Sebaliknya, pemrosesan terdistribusi dilakukan apabila suatu pekerjaan pengolahan data dari komputer pusat dapat dikerjakan oleh tiap pemakai berdasarkan spesialisasi bidang kerjanya.
Keamanan data
Keamanan data dapat diatur oleh supervisor (administrator) dengan pemberian hak akses, pembatasan waktu akses dan pemberian password untuk melindungi pemakaian komputer pusat.
Akses internet bersama-sama
Jika ada salah satu komputer berhubungan ke internet dan komputer tersebut memberikan izin untuk akses ke internet, maka para pengguna jaringan dapat melakukan aktivitas di internet hanya dengan menggunakan satu buah akun di ISP, satu buah modem. Hal ini sangat menghemat dana yang cukup besar.
Komponen Perangkat Keras

Tidak peduli apakah anda sudah memiliki sebuah network atau berniat menginstalasi network baru, anda perlu mengetahui komponen-komponen perangkat keras yang digunakan.
Server



Komputer yang menjalankan sistem operasi jaringan yang berfungsi sebagai server. Server menyediakan file, printer dan pelayanan lain untuk client. Ada dua buah jenis server, yaitu :
Server dedicated, server yang tidak memiliki fungsi lain. Ia tidak bisa digunakan sebagai workstation. Untuk melihat jenis dari server tersebut dapat diketahui melalui sistem operasi jaringan yang dijalankannya, misalnya Novell Netware.
Server Non-Dedicated, server yang juga bisa berfungsi sebagai workstation. Contohnya : Microsoft Windows NT Server, Mocrosoft Windows NT Workstation, Microsoft Windows 95/98, Unix, Linux, Mac OS/2.

Dari fungsinya, server dapat digunakan :
Menyimpan file-file yang digunakan bersama-sama pada hard disk-nya
Mengatur komunikasi (seperti pesan e-mail) antar workstation
Mengkoordinasikan pencetakan kepada printer yang dipakai bersama-sama
Server juga dapat menyimpan CD-ROM yang dapat dipakai oleh para pemakai network
Bisa menyimpan tape drive atau drive lain yang digunakan untuk menyimpan hard disk server atau hard disk pada workstation
Dengan perangkat lunak dan keras tambahan, server bisa mengarahkan e-mail dari dan ke internet. Server juga bisa mengirimkan fax ke luar jaringan ke mesin-mesin fax yang ada di luar. Kenyataannya server hampir dapat melakukan semua pekerjaan yang mencakup pengiriman data.
Workstation



Komputer yang terhubung ke server dan dapat mengakses data dari server. Workstation menjalankan beragam sistem operasi dan merupakan bagian dari network yang ada. Pada kenyataannya workstation digunakan oleh pemakai secara langsung.
Network Interface Card (NIC)



NIC atau adapter network adalah sebuah komputer hardware yang mutlak dibutuhkan jika kita menginginkan merakit jaringan komputer menggunakan media penghubung kabel. NIC berfungsi menghubungkan server ke sistem pengkabelan network. Berdasarkan tipe slot pada motherboard dibedakan menjadi dua jenis:
Tipe slot ISA (slot warna hitam/coklat, lebih panjang)
Tipe slot PCI (slot warna putih, lebih pendek)
Switch/Hub (Concentrator/Repeater)



Sistem pengkabelan yang paling populer untuk Network Ethernet menggunakan kabel Unshielded Twisted Pair (UTP) atau kabel terpilin yang terbuka dengan konektor yang mirip dengan konektor telepon. Ini disebut dengan 10BaseT. Untuk setiap adapter network pada setiap server atau workstation, salah satu dari kabel-kabel ini berhubungan ke Hub/Switch atau pusat pengkabelan.
Bridge, Router Dan Gateway



Bridge berfungsi menghubungkan dua network dengan mentransfer data diantara network tersebut. Sebagai contoh, bridge bisa menghubungkan segmen kabel dari arsitektur Token Ring dengan arsitektur Ethernet, atau menghubungkan dua segmen Ethernet menjadi satu. Bridge mampu mengurangi lalu lintas dengan hanya mengirimkan data yang benar-benar diniatkan untuk komputer tujuan. Bridge pintar (intelligent bridge) bisa berbuat lebih baik lagi dengan menyaring atau hanya mengirimkan paket-paket tertentu ke tujuan.
Uninterrutible Power Supply (UPS)



Sudah jelas UPS tidak hanya digunakan oleh network. Anda bisa juga menggunakannya pada setiap alat yang membutuhkan aliran listrik alternatif. UPS adalah alat yang sangat penting bagi perusahaan yang menggunakan komputer untuk produktifitasnya dan tidak ingin kehilangan data atau waktu kerja pegawai. Pada setiap keadaan yang bisa dibayangkan, melalui UPS adalah investasi yang menguntungkan untuk setiap workstation, hub, dan server pada network.
Printer Dan Peripheral Lain



Printer adalah salah satu alasan utama kenapa ada network. Karena printer tidak selalu digunakan oleh setiap pemakai, akan lebih ekonomis jika memakai satu printer bersama-sama. Printer bisa dihubungkan langsung pada workstation atau ke server.
Anda juga bisa memasang scanner, CD-ROM eksternal dan peralatan lain yang berguan dan dapat digunakan secara bersama-sama pada network. Sama seperti yang lainnya, hal ini membutuhkan perangkat lunak dan perangkat keras yang tepat.