PROL PEUYEUM IBHONX

PROL PEUYEUM IBHONX

Bahan :

550 gr peuyeum Bandung, buang sumbu

3 butir telur

150 gr gula halus

125 gr tepung terigu

100 gr margarin, lelehkan

1 sdt garam

200 ml santan cair

Cara Membuat :

1.   campur peuyeum, gula halus dan garam. remas2 hinggatercampur rata. kalo pake peuyeum Bandung hasilnya kering gak lembek seperti peuyeum2 yg dipasar itu.

2.   tambahkan telur, aduk rata dengan baloon whisk. tambahkan terigu aduk rata lagi.

3.   tambahkan santan cair, aduk hingga tercampur rata lalu terakhir masukan margarin cair. aduk rata.

4.   tuang dalam loyang yg sudah dioles margarin dan dialas kertas roti. aku pake 2 loyang loaf. kalo loyang loaf uk. 22x10x7 kayanya pas deh...tapi matengnya lama kali yak...mending pake loyang pendek aja deh...seperti diresep asli pake loyang uk 18x18x4. taburi wijen.

5.   panggang lk. 50-60 menit. atau hingga matang, pake tes tusuk aja...

Continue Reading »

Mengembalikan windows 7 yang not genuine / This copy of Windows is not genuine

Mengembalikan windows 7 yang not genuine / This copy of Windows is not genuine

Mengapa hal ini bisa terjadi ?
Hal ini terjadi di karnakan Windows 7 yang kita gunakan adalah mungkin windows 7 bajakan dan pada saat kita menjelajah di internet pada saat itu juga windows update meng-update dan ketahuan oleh pihak microsoft windows. Lalu wallpaper dekstop berubah menjadi hitam.
Mungkin dengan cara ini bisa membantu untuk mengembalikan windows 7 yang not genuine / This copy of Windows is not genuine.
1. Klik Start
2. Ketikan cmd
3. Klik Kanan " run as administrator"
4. Ketikan "slmgr.vbs -rearm"
5. Enter dan Restart

Continue Reading »

LOGO PANWASLU KECAMATAN PUSAKANAGARA

LOGO PANWASLU KECAMATAN PUSAKANAGARA

Continue Reading »

Sembunyikan Row Yang Bernilai 0 (Nol)

Sembunyikan Row Yang Bernilai 0 (Nol)

Button Tampilkan =
Sub Tampilkan()
'
' Tampilkan Macro
'
    Rows("1:15").Select
    Selection.EntireRow.Hidden = False
    Range("A13").Select
End Sub

Button Sembunyikan =
Sub Sembunyikan()
Dim c As Range
For Each c In Range("A1:A15")
    c.EntireRow.Hidden = c.Value = 0
Next c
End Sub

Continue Reading »