Minggu, 02 November 2014

blessed friday

Friday 3 October 20 114
There are two things that if done will bring happiness in the world and the hereafter
1. Grateful
Bnyak grateful once spoken by us in everyday life, but the question is the extent to which we are grateful to anything that is given by Allah ...
We often claimed but true servant of God,? there are four things that can show us true servants of Allah
- If you hear the call of God the name of his heart trembled for fear of Allah swt
- Be patient with the terms and destiny Allah
- Reflecting on the greatness of God in this world
- Give thanks to the God-given gift and not sad at this time with no hands

One of the month of Dhul-Hijjah grateful at this moment there is sacrificed in order to accept the sacrifice at first that the main thing is sincere and understanding of science in Surah al-Haj 34-35 in explained:

34. And for every race we syariatkan slaughter (sacrifice) so that they mention the name of Allah over the sustenance which Allah bestowed to them in the form of animals ternak.Maka Lord is God Almighty therefore ye self- surrender to Him. And convey the one (Muhammad) the glad tidings to those who submissive to God.

35. That is when the person who called their hearts vibrate the name of God, who are steadfast on what happened to them, and people are praying, and people who menginfakan most sustenance which We have bestowed on them.

36. And the camels that we make you a part of the religious laws of God, you are much menperolehkebaikan him. Then call the name of God when you kill it in the development of state of the stand and legs had been bound. Then when teah fall (dead), then eat and feed sebagianya who are content with what is available to him (not begging) and those who ask. So we bow (camels are) for you so that you may be grateful.

37. The sacrificial animal flesh and blood that will never come to God, but that until kepada_nya dalah ketakwan you. Thus He menundukannya megagungkan God for you that ye upon the instructions he gave to you. But give glad tidings to those who do good.
2.

In a hadith mentioned there 4hal that will make the world a happy man and Kirat
1. trustful wife to her husband, keeping his honor
2. The prayer
3. The patient with what happens to him

4. People are always dhikr

Cara Mengganti Warna Background Layar Kerja di AutoCAD

Cara Mengganti Warna Background Layar Kerja di AutoCAD

Dalam bekerja dengan Autocad kita dihadapkan pada warna backround layar kerja AutoCAD standar yang hitam, bila anda merasa terganggu dan menginginkan untuk mengganti backround layar kerja AutoCAD anda, dengan warna yang lain, anda bisa mengikuti langkah - langkah sebagai berikut:

Klik Menu Tools

Klik Option

Klik Tab Display

Klik tombol Color

maka akan muncul float jendela berikut:

Klik Color list Klik warna yang diinginkan

Klik Apply&Close
Klik Ok
Nah backround layar kerja AutoCAD anda sudah berganti warna sesuai dengan keinginan dan style anda. Selamat Mencoba.


Artikel asli dari: http://tgb-smakid.blogspot.com/2011/06/cara-mengganti-warna-background-layar.html#ixzz3Fde5ppbE

CARA MEMBUKA FILE MS EXCEL YANG DI PROTECT

CARA MEMBUKA FILE MS EXCEL YANG DI PROTECT


1. Buka dulu file ms. excel / xls yang terprotect
2. Kemudian tekan tombol alt + F11, maka akan terbuka jendela Microsoft visual basic
3. Pada menu bar klik Insert, kemudian klik Module

4. Copy paste code di bawah ini :
Sub PasswordBreaker()
'Author unknown but submitted by brettdj of www.experts-exchange.com
Dim i As Integer, j As Integer, k As Integer
Dim l As Integer, m As Integer, n As Integer
Dim i1 As Integer, i2 As Integer, i3 As Integer
Dim i4 As Integer, i5 As Integer, i6 As Integer
On Error Resume Next
For i = 65 To 66: For j = 65 To 66: For k = 65 To 66
For l = 65 To 66: For m = 65 To 66: For i1 = 65 To 66
For i2 = 65 To 66: For i3 = 65 To 66: For i4 = 65 To 66
For i5 = 65 To 66: For i6 = 65 To 66: For n = 32 To 126
ActiveSheet.Unprotect Chr(i) & Chr(j) & Chr(k) & _
Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & Chr(i3) & _
Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)
If ActiveSheet.ProtectContents = False Then
MsgBox "One usable password is " & Chr(i) & Chr(j) & _
Chr(k) & Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & _
Chr(i3) & Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)
ActiveWorkbook.Sheets(1).Select
Range("a1").FormulaR1C1 = Chr(i) & Chr(j) & _
Chr(k) & Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & _
Chr(i3) & Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)
Exit Sub
End If
Next: Next:Next: Next: Next: Next
Next: Next: Next: Next: Next: Next
End Sub
5. Klik icon save, kemudian tutup Microsoft visual basic
6. Kembali ke Ms. Excel, pada menu bar klik View > Macros > View Macros
7. Kemudian klik Run
8. Tunggu beberapa saat dan password akan muncul
9. Setelah mengetahui passwordnya tinggal kita buka protect filenya
10. klik file > Info > Protect Workbook > Permissions
11. Klik Unprotect, Masukkan passwordnya dan klik OK
Untuk file xls yang mempunyai sheet lebih dari satu, tinggal ulangi masukan password pada sheet yang masih unprotect
- See more at: http://hendralehol.blogspot.com/2013/10/cara-membuka-protect-workbook-sheet.html#sthash.ca36Lpkw.dpuf