Biasa di Panggil Raiyen
aku Asli Brebes
Jateng
Indonesia
Salam Kenal Ya Semua ...
Aku Merupakan Pemuda dari desa yang cukup indah ,
dikelilingi oleh hijaunya alam. "Rengaspendawa" itu lah nama desaku tercinta,,,,,,
Berikut, trik copy CD yang terproteksi dengan software ISOBuster:
1] Download dan install ISOBuster Silahkan klik disini untuk download atau cari di indowebster (IDWS). Ingat, masukkan Email, ID, dan Key yang disertakan dalam folder tersebut.
2] Masukkan CD yang terproteksi ke CD/DVD-ROOM
3] Jalankan aplikasi ISOBuster sehingga muncul seperti gambar dibawah ini:
Yupz, dari sini nanti kita akan mengextract file CD yang terproteksi tersebut, hanya dengan cara pilih folder/file yang akan dikstrak ke destination folder di windows explorer komputer anda.
Klik kanan CD – 05 ok >> Extract TRack 01 >> Extract Audio to Wave file (*.wav) lalu tunggu sampai selesai proses ekstrak file.
<b:if cond='data:blog.pageType == "item"'> <iframe allowTransparency='true' expr:src='"http://www.facebook.com/plugins/like.php?href=" + data:post.url + "&layout=standard&show_faces=false&width=100&action=like&font=arial&colorscheme=light"' frameborder='0' scrolling='no' style='border:none;overflow:hidden;width:450;height:40;'/> </b:if> |
Jenis Power Supply
Dahulu jenis power supply yang sering digunakan adalah model AT. Pada model ini, kita harus menekan tombol ON/OFF pada CPU jika ingin mematikan komputer. Tapi saat ini, jenis power supply yang banyak digunakan adalah ATX karena model ini memberikan kemudahan mematikan CPU tanpa harus menekan tombol ON/OFF pada CPU, cukup dengan mengklik Shutdown.
Sebaiknya komputer (PC) digunakan ditempat yang dingin/ber-AC dan tidak terkena sinar matahari langsung. Hal ini agar komputer kita tidak cepat panas. PSU juga membantu agar computer tidak cepat panas karena salah satu komponen pada PSU adalah kipas/fan. Nah, permasalahannya adalah seringkali PSU tidak dirawat dengan baik sehingga sering masuk debu dan kotoran lainnya. Bagaimana cara membersihkannya ya?
Membersihkan Kipas Power Supply
Hilangkan debu yang menempel pada kipas, atau ganti kipas bila memang diperlukan. Kipas PSU (Power Supply Unit) yang tak berputar normal dapat menyebabkan PC hang. Terlalu banyak debu yang menempel bisa menjadi penyebab kipas susah berputar. Lebih parah lagi bila kipas ternyata benar-benar mati, sehingga PSU menjadi panas sekali dan PC ngadat. Rajin-rajinlah membersihkan kipas PSU, tapi kalau memang sudah rusak ya perlu diganti kipasnya dengan yang baru.
Langkah-langkah membersihkan Power Supply Unit
Langkah 1
Matikan PC, lalu bersihkan kipas PSU dari luar. Gunakan kuas untuk membersihkannya melalui lubang di belakang PC. Untuk hasil terbaik, gunakan vacuum cleaner atau penyemprot udara bertekanan. Setelah bersih, coba hidupkan lagi PC Anda.
Langkah 2
Apabila kipas benar-benar mati, coba lepaskan kabel power dan kabel monitor dari PC. Tentu PC juga harus dimatikan. Buka case PC, lalu copot semua konektor power yang tertancap ke motherboard dan ke komponen lain. Lepaskan baut yang mengaitkan PSU dengan case PC.
Langkah 3
Keluarkan PSU dari dudukannya di case PC dan pastikan tanganmu sigap menahannya agar tak jatuh.
Langkah 4
Bongkar kotak atau case PSU. Gunakan obeng untuk membuka empat baut pengait yang ada di sisi atas case.
Langkah 5
Setelah terbuka, bersihkan debu yang menempel di papan sirkuit elektronik dan kipas dengan menggunakan vacuum cleaner atau penyemprot udara bertekanan.
Langkah 6
Kalau Anda berniat mengganti kipas tersebut, lepaskan empat baut kipas PSU dengan menggunakan obeng, lalu copot kipas dari case PSU.
Langkah 7
Buka pula keempat baut pengunci sirkuit elektronik, lalu keluarkan dari case. Bersihkan debu yang masih menempel bila memang ada.
Langkah 8
Panaskan solder, lalu lelehkan timah di sisi bawah sirkuit tersebut, tepat pada kabel power kipas. Copot kedua kabel positif dan negatif dari lubang pada sirkuit. Solder kedua kabel kipas baru ke lubang tadi. Pastikan posisi kabel tidak terbalik.
Langkah 9
Pasang kembali sirkuit elektronik dan kipas ke tempatnya semula. Kunci dengan menggunakan baut, lalu kencangkan.
Langkah 10
Tutup case PSU dan kencangkan baut kecil di keempat sudutnya. Setelah selesai, pasang PSU ke case PC dan hubungkan kembali konektor power ke motherboard dan komponen lain.
Yang perlu diperhatikan, jika kamu awam tentang elektronika, jangan sekali-kali membuka PSU adapter. Lebih baik beli kipas baru dan dan minta tolong teknisi komputer. Pilih kipas baru yang memiliki ukuran fisik sama dengan kipas lama PSU. Samakan pula tegangan (V) dan arusnya (A).
Private Declare Function ShellExecute Lib "shell32.dll" _
Alias "ShellExecuteA" (ByVal hwnd As Long, _
ByVal lpOperation As String, ByVal lpFile As String, _
ByVal lpParameters As String, ByVal lpDirectory As String, _
ByVal nShowCmd As Long) As Long
Private Const SW_NORMAL = 1
Private Const SW_SHOW = 5
Private Sub background_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
fprog.Visible = False
fpres.Visible = False
fpenulisan1.Visible = False
fpenulisan2.Visible = False
End Sub
Private Sub Form_Load()
fprog.Visible = False
fpres.Visible = False
fpenulisan1.Visible = False
fpenulisan2.Visible = False
End Sub
Private Sub Image4_Click()
End Sub
Private Sub imgcover_Click()
ShellExecute Form1.hwnd, "Open", App.Path + "\PENULISAN\Halaman judul.doc", "", "", SW_SHOW Or SW_NORMAL
End Sub
Private Sub imgdaftargambar_Click()
ShellExecute Form1.hwnd, "Open", App.Path + "\PENULISAN\DAFTAR GAMBAR.docx", "", "", SW_SHOW Or SW_NORMAL
End Sub
Private Sub imgdaftarisi_Click()
ShellExecute Form1.hwnd, "Open", App.Path + "\PENULISAN\DAFTAR ISI.docx", "", "", SW_SHOW Or SW_NORMAL
End Sub
Private Sub imgdaftarlampiran_Click()
ShellExecute Form1.hwnd, "Open", App.Path + "\PENULISAN\DAFTAR LAMPIRAN.doc", "", "", SW_SHOW Or SW_NORMAL
End Sub
Private Sub imgdaftarpustaka_Click()
ShellExecute Form1.hwnd, "Open", App.Path + "\PENULISAN\DAFTAR PUSTAKA.doc", "", "", SW_SHOW Or SW_NORMAL
End Sub
Private Sub imgdaftartabel_Click()
ShellExecute Form1.hwnd, "Open", App.Path + "\PENULISAN\DAFTAR TABEL.docx", "", "", SW_SHOW Or SW_NORMAL
End Sub
Private Sub imgexit_Click()
Beep
End
End Sub
Private Sub imgflowchart_Click()
ShellExecute Form1.hwnd, "Open", App.Path + "\PENULISAN\21. flowchart program.doc", "", "", SW_SHOW Or SW_NORMAL
End Sub
Private Sub imgkatapengantar_Click()
ShellExecute Form1.hwnd, "Open", App.Path + "\PENULISAN\KATA PENGANTAR.doc", "", "", SW_SHOW Or SW_NORMAL
End Sub
Private Sub imglampiraninternet_Click()
ShellExecute Form1.hwnd, "Open", App.Path + "\PENULISAN\17. Lampiran 2.doc", "", "", SW_SHOW Or SW_NORMAL
End Sub
Private Sub imglampiranmetode_Click()
ShellExecute Form1.hwnd, "Open", App.Path + "\PENULISAN\18. Lampiran 3.doc", "", "", SW_SHOW Or SW_NORMAL
End Sub
Private Sub imglampirannota_Click()
ShellExecute Form1.hwnd, "Open", App.Path + "\PENULISAN\16. Lampiran 1.doc", "", "", SW_SHOW Or SW_NORMAL
End Sub
Private Sub imglampiranperiperal_Click()
ShellExecute Form1.hwnd, "Open", App.Path + "\PENULISAN\19. Lampiran 4.doc", "", "", SW_SHOW Or SW_NORMAL
End Sub
Private Sub imglisting_Click()
ShellExecute Form1.hwnd, "Open", App.Path + "\PENULISAN\LISTING PROGRAM.docx", "", "", SW_SHOW Or SW_NORMAL
End Sub
Private Sub imgpendahuluan_Click()
ShellExecute Form1.hwnd, "Open", App.Path + "\PENULISAN\BAB I.doc", "", "", SW_SHOW Or SW_NORMAL
End Sub
Private Sub imgpenulisan1_Click()
Beep
End Sub
Private Sub imgpenulisan1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
fprog.Visible = False
fpres.Visible = False
fpenulisan1.Visible = True
fpenulisan2.Visible = False
End Sub
Private Sub imgpenulisan2_Click()
Beep
End Sub
Private Sub imgpenulisan2_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
fprog.Visible = False
fpres.Visible = False
fpenulisan1.Visible = False
fpenulisan2.Visible = True
End Sub
Private Sub imgpenutup_Click()
ShellExecute Form1.hwnd, "Open", App.Path + "\PENULISAN\BAB IV PENUTUP.doc", "", "", SW_SHOW Or SW_NORMAL
End Sub
Private Sub imgpersetujuan_Click()
ShellExecute Form1.hwnd, "Open", App.Path + "\PENULISAN\Persetujuan dan pengesahan.doc", "", "", SW_SHOW Or SW_NORMAL
End Sub
Private Sub imgpres_Click()
ShellExecute Form1.hwnd, "Open", App.Path + "\PRESENTASI\Presentation.pptx", "", "", SW_SHOW Or SW_NORMAL
End Sub
Private Sub Imgpresentasi_Click()
Beep
End Sub
Private Sub Imgpresentasi_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
fprog.Visible = False
fpres.Visible = True
fpenulisan1.Visible = False
fpenulisan2.Visible = False
End Sub
Private Sub imgpro_Click()
ShellExecute Form1.hwnd, "Open", App.Path + "\PROJECT\TB_Rekso_Logam.vbp", "", "", SW_SHOW Or SW_NORMAL
End Sub
Private Sub imgproject_Click()
Beep
End Sub
Private Sub imgproject_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
fprog.Visible = True
fpres.Visible = False
fpenulisan1.Visible = False
fpenulisan2.Visible = False
End Sub
Private Sub imgriwayathidup_Click()
ShellExecute Form1.hwnd, "Open", App.Path + "\PENULISAN\DAFTAR RIWAYAT.doc", "", "", SW_SHOW Or SW_NORMAL
End Sub
Private Sub imgsistemberjalan_Click()
ShellExecute Form1.hwnd, "Open", App.Path + "\PENULISAN\BAB II.doc", "", "", SW_SHOW Or SW_NORMAL
End Sub
Private Sub imgsistemusulan_Click()
ShellExecute Form1.hwnd, "Open", App.Path + "\PENULISAN\BAB III.doc", "", "", SW_SHOW Or SW_NORMAL
End Sub
Private Sub imgsuratlulus_Click()
ShellExecute Form1.hwnd, "Open", App.Path + "\PENULISAN\Surat keterangan lulus.doc", "", "", SW_SHOW Or SW_NORMAL
End Sub
Private Sub L1_Click()
ShellExecute Form1.hwnd, "Open", App.Path + "\PENULISAN\LAMPIRAN 1.doc", "", "", SW_SHOW Or SW_NORMAL
End Sub
Private Sub L2_Click()
ShellExecute Form1.hwnd, "Open", App.Path + "\PENULISAN\LAMPIRAN 2.doc", "", "", SW_SHOW Or SW_NORMAL
End Sub
Private Sub L3_Click()
ShellExecute Form1.hwnd, "Open", App.Path + "\PENULISAN\LAMPIRAN 3.doc", "", "", SW_SHOW Or SW_NORMAL
End Sub
Private Sub L4_Click()
ShellExecute Form1.hwnd, "Open", App.Path + "\PENULISAN\LAMPIRAN 4.doc", "", "", SW_SHOW Or SW_NORMAL
End Sub
Private Sub L5_Click()
ShellExecute Form1.hwnd, "Open", App.Path + "\PENULISAN\LAMPIRAN 5.doc", "", "", SW_SHOW Or SW_NORMAL
End Sub
Private Sub Label1_Click()
ShellExecute Form1.hwnd, "Open", App.Path + "\PENULISAN\DAFTAR LAMPIRAN.docx", "", "", SW_SHOW Or SW_NORMAL
End Sub