Wheldt Protector V 1.05 Build 1

Sama Fiturnya Kayak Kemaren
Tapi Ada Sedikit Perubahan





Nih Dongdot Aja Via Ziddu


Untuk Serial NumberNYa
Dongdot Disini Juga
[Click Here]
[Click Here]
 

Wheldt Protector First Launcher

Nah Antivirus Saya Kali Ini HAmpiur Sama Dengan Yg Sebelumnya ,
Cuman Saya Sudah Memperbaiki Bug Yang Lumayan Menggangu



Kali Ini Saya Mengshare Antivirus Kedua Saya

Link Dongdot
[Click Here]

Selamat Mencoba
 

Cara Mendisable Tombol Close Pada Visual Basic

'Deskripsi: Menonaktifkan tombol Close di Form. Anda mungkin pernah
' ingin membuat suatu form yang tidak dapat ditutup dengan
' mengklik tombol Close di pojok kanan atas form, tapi
' harus melalui Commandbutton yang ada di dalam form yang
' mengeksekusi suatu perintah tertentu
'Persiapan: 1. Buat 1 Project baru dengan 1 Form, 1 Module, dan 1 Commandbutton
' 2. Copy-kan coding berikut ke dalam editor Form/Module ybt.
'------------------------------------------------------------------------------

'Quote:'--- Coding ini di Form, karena menggunakan kata kunci Private'
Private Declare Function GetSystemMenu Lib "user32" _
(ByVal hWnd As Long, ByVal bRevert As Long) As Long

Private Declare Function RemoveMenu Lib "user32" _
(ByVal hMenu As Long, ByVal nPosition As Long, _
ByVal wFlags As Long) As Long

Private Const MF_BYPOSITION = &H400&

Public Sub RemoveCancelMenuItem(frm As Form)
Dim hSysMenu As Long
'Ambil menu system untuk form ini
hSysMenu = GetSystemMenu(frm.hWnd, 0)
'Hilangkan tombol Close (X)
Call RemoveMenu(hSysMenu, 6, MF_BYPOSITION)
'Hilangkan pemisah yang melalui tombol Close tsb
Call RemoveMenu(hSysMenu, 5, MF_BYPOSITION)
End Sub

'Walaupun tombol "Close" di pojok kanan atas form tidak dapat diklik karena
'sudah disabled, Anda masih bisa menutup form dengan menggunakan tombol
'Alt-F4. Agar form juga tidak dapat ditutup dengan menggunakan Alt-F4,
'Anda harus menahannya di event procedure Form_QueryUnload
'dengan meng-assignment nilai parameter Cancel = -1.
Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
Cancel = -1 'Jadi, Alt-F4 juga tidak berfungsi!
End Sub

'Jadi, form ditutup harus melalui Command1
'Unload me tidak berfungsi di sini, jadi
'kita menggunakan End,
'bebaskan memory sebelumnya
Private Sub Command1_Click()
'Unload Me
Set Form1 = Nothing
End
End Sub

Private Sub Form_Load()
RemoveCancelMenuItem Me 'Hilangkan tombol Close di form ini
End Sub
'--- Akhir coding di Form


Semoga Bermanfaat Bro!!
 

Antivirus Pertama Buatan Saya

Maaf Aja Kalau Gk Bisa Memproteksi Dengan Baik,
Tapi Ini Di Buat Asli Oleh Saya Tanpa "Rehacker" (resource  Hacker)

SS



Nah Itu Dia "Jelek Ya"

Klo Ini Yg Udah Jadi



Untuk Download Tinggal Klik Link Di Bawah Ini

[Dongdot]

Semoga Dapat Melindungi Komputer Anda Dari KAng Virus Yaa


 

Membuat Form Login Pada Visual Basic

Membuat form login penting sebagai tahap akhir dari sebuah penyelesaiaan suatu program sebagai pembatasan akses terhadap sebuah program, cara tersebut cukup mudah

Buat form baru pada project, terus tambahkan obyek sebagai berikut:

  1. Teksbox1
  2. Teksbox2
  3. Label1
  4. Label2
  5. Dan 2 commandbutton dengan caption&Login dan &Batal


    Masukkan source code sbb:

    Private Sub Command1_Click()

    If Text1.Text = "ilham" And Text2.Text = "11081091" Then

    MsgBox "Terimakasih Telah Login", vbInformation

    Form1.Show

    Form15.Hide



    ElseIf Text1.Text <> "ilham" And Text2.Text = "11081091" Then

    MsgBox "Maaf User yang anda masukkan salah", vbInformation

    Text1.Text = ""

    ElseIf Text1.Text = "ilham" And Text2.Text <> "11081091" Then

    MsgBox "Maaf Password yang anda masukkan salah", vbInformation

    Text2.Text = ""

    ElseIf Text1.Text <> "ilham" And Text2.Text <> "11081091" Then

    MsgBox "Maaf Password dan User yang anda masukkan salah", vbInformation

    Text1.Text = ""

    Text2.Text = ""

    End If

    End Sub



    Keterangan: form1.show adalah form yang akan muncul pertama setelah login dan form15.hide adalah menonaktifkan/sembunyika form login ini

    Pada text2 ubah propertiesx pada passwordchart dengan meengetik tanda petik bintang *( biar password gak keliatan karakter alfabetnya gitu loh)….
    N J go………………….

    Program setelah dijalankan



    Gampang banegeeeeeeeeeeeeeeeeeeeetz kan…….!!!!!!!
 

Tampilan Warna Warni Untuk Label Ataupun Form

Terkadang kita merasa bosan bila melihat aplikasi yang isinya hanya ada dua warna, hitam dan putih, maka kita harus punya cara yang kreatif agar tampilan aplikasi yang kita buat lebih terlihat bervariatif. Salah satu caranya adalah dengan membuat label yang warna tulisan dan background nya berubah-ubah alias warna warni.

Dalam visual basic telah tersedia sebuah fungsi yang bernama RGB singkatan dari RED GREEN BLUE yang berfungsi untuk mengatur intensitas warna merah, hijau dan biru pada suatu objek. Bentuk umum dari fungsi ini adalah RGB(Red As Integer, Green As Integer, Blue As Integer ).

Sebagai contoh kita bisa memasukkan RGB(255,0,0) untuk menampilkan warna merah. Angka 255 pada fungsi tadi dimaksudkan untuk mendapatkan warna merah yang maksimum, bila kita kurangi nilainya maka warna merahnya akan semakin tua. Kita juga bisa membuat gradasi warna yang lain yang kita inginkan.

Untuk membuat sebuah label atau background atau properti warna yang lain pada sebuah kontrol maka kita bisa memanfaatkan statement Randomize (Rnd) yang berfungsi untuk mengacak intensitas warna.
Mari kita coba membuat sebuah aplikasi dengan memanfaatkan fungsi RGB dan statement Rnd. Kontrol yang kita butuhkan adalah sebuah label dan sebuah Timer dengan interval 100. Lalu cobalah ketikkan kode berikut ini dan mainkan programmu. :


Private Sub Timer1_Timer()

Label1.BackColor = RGB(Rnd * 255, Rnd * 255, Rnd * 255)

Label1.ForeColor = RGB(Rnd * 255, Rnd * 255, Rnd * 255)

End Sub
Kalau malas mengetikkan kodenya, bisa diambil contohnya disini.
 

Cara membuat installer suatu program aplikasi

Installer adalah sebuah aplikasi yang dimana untuk mengekstrak file yang dibungkus ke dalam file arsip seperti WinRAR atau WinZip ke folder yang dimana kamu letakkan direktorinya contohnya: C:\Program Files\(nama foldernya).
Membuat installer itu sangatlah mudah sekali,apalagi sudah mahir. Yang terutama adalah kita punya aplikasi khusus InstallerMaker seperti: Nullsoft Installer System (NSIS),WinRAR,dan masih banyak lagi.
Disini saya hanya akan memberikan tutor pengistallan yang mudah yaitu dengan WinRAR:
1. Pertama kamu harus punya WinRAR terlebih dahulu,jika tidak ada silahkan cari di Indowebster dengan menuliskan di keywordnya WinRAR 3.70 atau download dari Winrar.exe.
2. Setelah itu installah WinRARnya,kemudian buka folder yang kalian mau dibikin installernya.
3. Kemudian pilih semua file yang mau dibikin installernya dengan menekan tombol pintasnya Ctrl + A.
4. Kemudian pointer komputer kamu harus berada pada posisi file yang sudah dipilih yang dilanjuti dengan mengklik mouse kanan dan pilih “Add to archive…”.
5. Setelah itu pada kotak dialog muncul beberapa pilihan pada kotak “Archiving options” dan pilih “Create SFX archive”.
6. Setelah itu klik .RAR pada kotak Archive format. Kenapa pilih .rar? karena ada perbedaan antara file arsip .rar dengan .zip yaitu file arsip .rar biasanya kompresan file kuat jadi bisa makan ratio kompresan sampai 50%,semakin kurang ratio kompresan maka membuat muatan file arsipnya kecil dan jadi mudah dipindahkan ke direktori mana saja.
7. Setelah itu pilih “Advanced” untuk mengatur mode installer yang akan di buat.
8. Setelah itu klik button “SFX options” untuk mengatur rancangannya.
9. Pada pilihan General isi kotak Path to extrac dan isikan dengan tulisan C:\Program Files\(nama foldernya).
10. Pilih Advanced untuk membuat shorcut,dengan klik button Add shortcut…
11. Pada kotak dialog add shortcut pilihlah dimana shortcutnya dibuat pada Where to create.
12. Kemudian pilih Desktop jika kamu ingin muncul jalan pintasnya di depan layar komputer.
13. Isilah source file name yaitu file aplikasi dasar dimana yang ada pada folder program kamu.contoh: Application.exe,maka pada kotak source file name tersebut kamu isikan yang sama dengan nama file aslinya.
14. Isi shortcut name dengan menuliskan nama file pintas yang kamu inginkan. Jika sudah klik Ok
15. Jika ada lagi yang mau dibuat shortcutnya,klik lagi add to shortcutnya. Jika mau dibikin ke folder start pilih Start Menu/Program dan caranya sama dengan tutor dari nomor 13 dan 14.
16. Kemudian pilih “Text and icon” untuk mengisi rancangan lainnya.
17. Isi Title of SFX window untuk mengisi nama installernya.
18. Isi Text to display in SFX window untuk mengisi petunjuknya.
19. Kemudian pada kotak Customize SFX logo and icon pilih browse pada kotak “Load SFX logo from the file” itu untuk apa?,yaitu untuk memasukan mode gambar pada installer kamu. Filenya harus berformat .bmp ukurannya disarankan 100 x 300 juga muatannya maksimal 300 kb.
20. Setelah itu pilih browse pada kotak “Load SFX icon from the file” untuk apa juga?,yaitu untuk membuat tampilan ikon gambar installer kamu. Filenya harus asli yang berformat .ico,bukan file dari .bmp terus diubah formatnya menjadi .ico paham?.
21. Pilih License untuk membuat tampilan installer kamu lebih menarik dengan lilensi atau ketentuan syarat sah untuk pemakai.
22. Isilah judul lilensinya yang dilanjutkan mengisi isi lilensinya.
23. Kemudian jika ada lagi yang diisikan atau diatur silahkan kamu atur sendiri,kenapa?,karena disini saya hanya memberi tutor yang mudahnya saja. (It’s only easy)
24. Setelah itu klik Ok untuk SFX options dan kemudian klik Ok lagi pada kotak dialog WinRARnya.
25. Tunggulah sampai beberapa saat sampai selesai.
Nah sekian tutor membuat installer dengan mudah yang saya berikan pada kamu.
 

Hal Hal Mengenai Visual Basic

Apa Itu Visual Basic ?

Microsoft Visual Basic (sering
disingkat sebagai VB saja) merupakan sebuah bahasa pemrograman yang
menawarkan Integrated Development Environment (IDE) visual untuk
membuat program perangkat lunak berbasis sistem operasi Microsoft
Windows dengan menggunakan model pemrograman (COM), Visual Basic
merupakan turunan bahasa pemrograman BASIC


nah setelah mengenal tentang VB saya akan menjelas kan tentang
Tipe Data,Variabel,Dan Konstanta

1.Tipe Data
Tipe Data adalah jenis" data ( nilai ) yang ada.Tipe data adalah pendamping variable ketika di deklarasikan pada program

Tipe data beserta jangkauannya yang ada di visual basic 6

Byte : 0 -> 255
Boolean : True Atau False
Integer : -32.768 -> 32.767
Long : -2.147.483.648 -> -1.401298e-45(-)
Object : Tergantung objectnya,misalkan gambar
String : 0 -> < 2 Miliyar

2.Variable
Setiap data yang disimpan dalam komputer memerlukan variabel sebagai
sesuatu tempat untuk menyimpan nilai dari data tersebut, dan nilainya
suatu variable dapat berubah-ubah selama proses program.misalnya kita
bisa menyimpan nilai ujian mid di variable A dan nilai ujian akhir di
variable B, dan setiap mahasiswa nilainya pasti berbeda.

Dalam penamaan sebuah variable tidak boleh ada 2 atau lebih variabel
yang memiliki nama yang sama, pemberian nama variabel harus unik. Hal
ini bertujuan agar tidak terjadi kesalahan pada program.

Dalam visual basic dikenal adanya istilah variabel lokal dan variabel global :

a.Variabel lokal yaitu variabel yang hanya dikenal pada satu bagian
program saja, nilai data yang terdapat di dalamnya hanya hidup ketika
bagian program tersebut dijalankan.

b.Variabel global yaitu variabel yang dikenal pada seluruh bagian program dan waktu hidupnya selama program dijalankan.

Selain itu masih ada aturan-aturan dalam penamaan sebuah variable yaitu sebagai berikut :

a.Tidak boleh lebih dari 255 karakter

b.Nama harus unik tidak boleh menggunakan kata yang sudah digunakan dalam visual basic, seperti dim, procedure, dll.

c.Tidak boleh menggunakan spasi atau tanda titik/dot (.) diantara kata jika nama variabel lebih dari satu kata

d.Harus dimulai dari huruf , bukan angka atau karakter lainnya


Bentuk umum untuk mendeklarasikan sebuah variabel :

Dim/Public/Private/Static NamaVariabel As TipeData

Misalnya :

Dim sngAngka As Single
Dim strText As String
Dim dblBilangan As Double

Untuk sebuah variabel agar bisa digunakan di seluruh bagian program,
harus dideklarasikan secara publik contohnya sebagai berikut :

Public strNama As String

Untuk memanggil variabel public perlu disertai nama form tempat
variabel di deklarasikan. Misalnya kita mendeklarasikan variabel public
di form1 maka untuk memanggilnya dari form2 caranya adalah sebagai
berikut :

nama = form1.strNama

variabel lokal hanya bisa digunakan pada bagian program dimana variabel
tersebut dideklarasikan, sebaliknya variabel global bisa digunakan di
seluruh bagian program.

3.Konstanta
Konstanta adalah variabel yang memiliki nilai tetap, sekali variabel
konstanta diberi nilai maka selama proses program berjalan nilai
konstanta tidak akan berubah. Konstanta biasanya digunakan untuk
menyimpan nilai-nilai tertentu yang bersifat tetap sepert nilai
grafitasi bumi, Fi, dan tetapan-tetapan dalam rumus fisika atau
matematika lainnya. Cara pendeklarasian sebuah konstanta sama halnya
dengan variabel, pendeklarasian konstanta data dilakukan secara private
maupun public.

Contoh :

[ Keyword ] Const nama_konstanta = nilai_konstanta

[Keyword] adalah kata kunci untuk mendeklarasikan konstanta yang menyatakan ruang lingkup konstanta
ada 2 keyword konstanta yang dapat di gunakan di visual basic,yaitu
Private dan Public

-> Private : digunakan untuk mendeklarasikan konstanta dengan ruang lingkup satu module

-> Public : digunakan untuk mendeklarasikan konstanta dengan ruang lingkup seluruh bagian program

Contoh code :


Quote:
Private const mydisha_ku = "ganteng"
Public const HNc_ku = 100



Selesai pembelajaran tentang Tipe Data,Variable,Konstanta

Kelanjutannya adalah cara untuk membuat messegebox

1.Cara Membuat MessegeBox

MessegeBox adalah sebuah kotak pesan yang biasa muncul pada program untuk memberitahukan sesuatu

dalam visual basic untuk membuat sebuah messege box gunakan code di bawah ini


Quote:
MsgBox "Isi Pesan", vbExclamation, "Title Kotak Pesan"



*NB : vbExclamation adalah tipe kotak pesan yang akan muncul,itu dapat di ganti sesuai keinginan anda
bila ingin menampilkan sebuah pesan error gunakan vbCritical


2.Cara Memunculkan & Menyembunyikan Form


Form adalah tempat untuk pembuatan sebuah window baru
Form juga di gunakan untuk menempatkan kontrol" pada program yang ingin kita buat

untuk menyembunyikan form dalam visual basic dapat menggunakan code di bawah ini


Quote:
Form1.Hide


*NB : Form1 <- Dapat di ganti sesuai dengan form yang ingin di sembunyikan

untuk menampilkan form dalam visual basic dapat menggunakan code di bawah ini


Quote:
Form1.Show


*NB : Form1 <- Dapat di ganti sesuai dengan form yang ingin di munculkan

3.Cara Men Disable/Men Enable Form

Cara untuk Men Disable dapat menggunakan code di bawah ini


Quote:
Form1.Enabled = False



Cara untuk Men Enable dapat menggunakan code di bawah ini


Quote:
Form1.Enabled = True



4.Cara keluar dari program yang kita buat

Cara untuk keluar dari program yang kita buat bukan hanya menekan tombol X pada jendela windows
kita bisa keluar dari program yang kita buat lewat suatu button seperti tombol "QUIT"

berikut ini adalah code nya

Keluar Program masukan kode ini


Quote:
END



adalagi yang seperti ini


Quote:
Unload Me




5.Cara Agar Program yang kita buat tidak terdeteksi di Taskmanager


untuk cara ini dapat menggunakan code di bawah ini


Quote:
App.Taskvisible = False


code di atas berguna agar aplikasi kita tidak terlihat di taskmanager
untuk memunculkannya lagi gunakan code di bawah ini

Quote:
App.Taskvisible = True

 

Form Unik Lain (VB)

Components :     1. class module (class1)

Sub Command : class module (cls)
'===================================================


Public Enum ceffHideShow
ceffShow& = 0
ceffHide& = 1
End Enum
Private Type POINTAPI
X As Long
Y As Long
End Type
Private Type RECT
Left As Long
Top As Long
Right As Long
Bottom As Long
End Type
Private Const ALTERNATE& = 1
Private Declare Function CreatePolyPolygonRgn Lib "gdi32" (lpPoint As POINTAPI, lpPolyCounts As Long, ByVal nCount As Long, ByVal nPolyFillMode As Long) As Long
Private Declare Function CreateRectRgn Lib "gdi32" (ByVal X1 As Long, ByVal Y1 As Long, ByVal X2 As Long, ByVal Y2 As Long) As Long
Private Declare Function CreateEllipticRgn Lib "gdi32" (ByVal X1 As Long, ByVal Y1 As Long, ByVal X2 As Long, ByVal Y2 As Long) As Long
Private Declare Function GetWindowRect Lib "user32" (ByVal hWnd As Long, lpRect As RECT) As Long
Private Declare Function GetPixel Lib "gdi32" (ByVal hDC As Long, ByVal X As Long, ByVal Y As Long) As Long
Private Declare Function CombineRgn Lib "gdi32" (ByVal hDestRgn As Long, ByVal hSrcRgn1 As Long, ByVal hSrcRgn2 As Long, ByVal nCombineMode As Long) As Long
Private Declare Function SetWindowRgn Lib "user32" (ByVal hWnd As Long, ByVal hRgn As Long, ByVal bRedraw As Boolean) As Long
Private Declare Function DeleteObject Lib "gdi32" (ByVal hObject As Long) As Long
Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)

Private Sub SetWndRegion(ByVal hWnd As Long, ByVal hRgn As Long)
Call SetWindowRgn(hWnd, hRgn, True)
End Sub

Public Sub HideOrShowRect(ByVal hWnd As Long, _
ByVal wCount As Long, _
ByVal hCount As Long, _
Optional ByVal ShowOrHide As ceffHideShow = 1, _
Optional ByVal Step_ As Long = 3)
Dim vertex() As POINTAPI, Num() As Long, wRect As RECT, n As Long
Dim RetVal As Long, st As Long, en As Long
Dim i As Long, j As Long, k As Long, m As Long, hIdx As Long, wIdx As Long, coef As Single
Dim w As Long, h As Long, oldw As Long, oldh As Long
RetVal = GetWindowRect(hWnd, wRect)
With wRect
oldw = .Right - .Left
w = Int(oldw / wCount) + 1
oldh = .Bottom - .Top
h = Int(oldh / hCount) + 1
End With
Select Case ShowOrHide
Case 0
st = 0
en = w
Step_ = Abs(Step_)
Case 1
st = w
en = 0
Step_ = -Abs(Step_)
Case Else
Err.Raise 5, , "ShowOrHide argument must be 0 or 1"
End Select
coef = w / h
ReDim vertex(1 To wCount * hCount * 4)
ReDim Num(1 To wCount * hCount)
For n = st To en Step Step_
For j = 1 To hCount
For i = 1 To wCount
m = (j - 1) * wCount + i
k = (m - 1) * 4
Num(m) = 4
hIdx = (j - 1) * h
wIdx = (i - 1) * w
vertex(k + 1).X = wIdx
vertex(k + 1).Y = hIdx
vertex(k + 2).X = wIdx + n
vertex(k + 2).Y = hIdx
vertex(k + 3).X = wIdx + n
vertex(k + 3).Y = hIdx + n / coef
vertex(k + 4).X = wIdx
vertex(k + 4).Y = hIdx + n / coef
Next i
Next j
Sleep 10
hRgn = CreatePolyPolygonRgn(vertex(1), Num(1), hCount * wCount, ALTERNATE)
SetWndRegion hWnd, hRgn
DoEvents
Next n
End Sub

Public Function DeleteObj() As Long
DeleteObj = DeleteObject(hRgn)
End Function

'===================================================
Sub Command : form1
'===================================================

Private Sub Command1_Click()
Hide_
Unload Me
End Sub

Private Sub Hide_()
Dim CEff As New class1
CEff.HideOrShowRect Me.hWnd, 5, 5, ceffHide, 1
CEff.DeleteObj
End Sub

'===================================================

Semoga Bermanfaat
 

Animasi Form

Membuat slide saat form unload



Wah-wah posting lagi,kali ini tentang visual basic 6 saya akan membahas membuat slide saat form di unload dengan cara yang sangat mudah dan bisa langsung dipraktekan…

Bahan-bahan    :


  1. Pc/laptop/notebook
  2. Software vb 6 yang sudah ter instal
  3. Rokok 2 batang
Cara membuat    : rebus pc hingga matang…loh…loh......heheheh

Cman selingan,,,,,ok lets do it…….pertama buka vb nya kemudian pilih yang standar exe lihat gambar dibawah








Kemudian tambahkan satu buah command button pada form
lihat gambar dibawah




masuk ke code editor dan copy sintak berikut pada procedure declaration

Option Explicit
Dim cepat As Long

Sub Wheldt()
cepat = 10
While Top - Height < Screen.Height
DoEvents
Top = Top + cepat
Wend
Unload Me
End Sub




Kemudian pada command ketikan sintak "Wheldt" (tanpa tanda kutip) pada event click(basing)

Lalu run program dan click command,apa yang terjadi…….sssst jangan beritahu siapa2 ya….hehehheh

Coding nya bisa di modifikasi kok seesuai selera…misal sintak pada subWheldt() cepat=10 angka 10 bisa diganti sesuai selera anda………demikian postingan saya kali ini semoga membantu dan saya akhiri wass………..
 

Cara Membuat Wajah Menjadi Zombie

Tanpa Perlu Kehalian Potoshop,,Anda Bisa Mengedit Foto Anda Mirip Seperti Zombi...

Anda Hanya Perlu Koneksi Internet saja, Tidak DiButuhkan Tools - Tools Lain Seperti Adobe,Photosop..
Saya Berharap, Foto Awal Yang Anda Upload Tidak Mirip Zombi Beneran hehehehe...

♥♥ Contoh Gambar ♥♥





Langsung Aja Deh Ke Tutorial Caranya :

• Masuk Ke Situsnya → http://www.makemezombie.com/
• Klik "Make Me Zombie"


• Kemudian Upload Foto Dari Komputer Anda..


• Tunggu Proses Loadingnya Dalam Beberapa Detik, Dan Lihat Hasilnya


             Sebelum                                                                         Sesudah
 

Cara Blokir Situs JEVUSKA - OMDHANI - DLL Dari Pencarian Google

Mungkin Para Googler Disini banyak yang kecewa dengan hasil pencarian di Google...
Kecewa karena pencariannya masuk Ke Jevuska dan Omdhani,,dan Di sana Tidak terdapat Hasil apa yang kita cari...Malah Kalau Diklik linknya kembali  Lagi ke Situs Yang Sama...
JEVUSKA dan OMDHANI ini adalah situs sampah atau biasa disebut Spammer...
untuk Itu saya akan menjelaskan cara Memblokir mereka dari Pencarian Google..
- Cara Blokir Situs JEVUSKA - OMDHANI - DLL Dari Pencarian Google Di Mozilla Firefox
- Cara Blokir Situs JEVUSKA - OMDHANI - DLL Dari Pencarian Google Di Google Chrome

♥Untuk Browser Mozilla FireFox♥
--------------------------------------------------------
• Install GreaseMonkey → https://addons.mozilla.org/en-US/firefox/addon/greasemonkey/ [Restart Browser]
• Install Scriptnya  → http://userscripts.org/scripts/show/95205 [Restart Browser]

Jika 2 Tahap Diatas sudah Anda Jalankan dan Berhasil,,Masuk Ke Proses Berikutnya..

• Buka Google,,Dan Ketik "Jevuska"
• Klik Tulisan "Block" Disamping Kanannya → Kemudian Lanjutkan Dengan "Block Site"

Gambar1
Gambar2

• Untuk Situs Lainnya Seperti Om Dhani dan Kawan2nya,,Silahkan Anda Block sendiri..

♥Untuk Browser Google Chrome♥
-------------------------------------------------------
• Instal Scriptnya → Install [Restart Browser]
• Buka Situs www.jevuska.com [Bukan Dari Google]
• dan Klik Button Yang Mirip Seperti Gambar DIbawah Ini...


• Dan Saat nya Block


• Untuk Situs Lainnya Seperti Om Dhani,,Silahkan Anda Block Sendiri
 

Cara Membuat WinRar Full Version Tanpa Keygen dan Tanpa Software

Winrar adalah sebuah software yang sangat diperlukan dalam setiap komputer....

Karena eh karena meang sangat di perlukan dalam rangka apapun....
Tapi yang menjadi masalahnya adalah,,banyak WINRAR di setiap komputer masih dalam keadaan TRIAL...
dari pada Mencari-Cari keygen atau crack yang Bisa mengandung Virus,,Mending Coba Gunakan Cara Sederhana ini untuk membuat Winrar menjadi FULL VERSION...

• Buka Notepad
• Copy Kode Dibawah ini Kedalam Notepad

RAR registration data
GoDesain
Unlimited Company License
UID=85809e6a0fde94d8fa95
6412212250fa95dc80957d3b78af9245c62d98787c33099debe20a
4d39faf3beaeaf7ba62060fce6cb5ffde62890079861be57638717
7131ced835ed65cc743d9777f2ea71a8e32c7e593cf66794343565
b41bcf56929486b8bcdac33d50ecf77399600ffeefe7a2041d7fe7
9f06594bd79c285c2c19d7d9a786d95f8a05e6141248ddb9d9830f
6977c3aab5c4e4e651e4813323e9eb20ac3fd8b7173262fc601959
515d0a89683aae2654bfd31328af3e331535ea2d85dc1402723610


• Simpan Dengan Nama "rarreg.key" → typenya di ganti "All Files"
• Simpan Di → C:/Program Files/Winrar


• Cara ini sudah saya coba sendiri di Laptop saya sendiri dan memang terbukti

 

Cara MemformatDisk Drive Atau Flash Disk Yang Susah Di Format

Langkah pertama, bila masalah pada sistem Windows
Bila computer hanya bisa mengenal beberapa jenis storage atau Flashdrive. Atau menolak mengenal sama sekali
Perbaikin dari solusi Microsoft dengan Fix It for me. Analisa software dapat dilihat via
Atau gunakan teknik dibawah ini
1. Click Start, click Run, keti REGEDIT, dan click OK.
2. Cari informasi dengan keterangan dibawah ini:
HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Class\{4D36E967-E325-11CE-BFC1-08002BE10318}
3. Pada bagian MENU, click Delete, and OK.
4. Pilih lagi pada bagian lain --> click pada LowerFilters registry value. Yang berisi :
HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Class\{4D36E967-E325-11CE-BFC1-08002BE10318}
5. Pada bagian Edit MENU, click Delete, dan click OK.
6. Exit Registry Editor.
7. Restart the computer.
Pesan ditampilkan pada Windows XP :
Pada pesan pertama, pesan muncul ketika dilakukan format
Pesan ke 2 ketika file lakukan write file atau memindahkan file ke flash disk
Pesan ke 3 adalah pesan lainnya ketika flash disk dimasukan data dari harddisk

Tip dengan CHKDSK dan Format melalui Dos Prompt:

  1. Masuk ke DOS Prompt Windows XP dan ketik CHKDSK /F Drive letter : (chkdsk /f v:)
  2. Selesai memeriksa dari Check Disk (CHKDSK), coba anda buang file yang ada pada Flash Disk dengan perintah Del drive letter:*.*. Contoh pada perintah membuang file dari Flash Disk di drive V: adalah DEL V:*.*
  3. Sekali lagi anda coba format dengan perintah Dos Promt. Format V:
  4. Atau gunakan cara melalui Computer Management dan lihat volume drive V, dan anda coba format. Bila masih terdapat pesan error lakukan boot pada computer
Tahap 1


Tahap 2


Tahap 3.4
 Klik Kanan My Komputer Lalu Pilih Manage
Disini KitaMasuk Ke Disk Drive Atau FlashDisk Anda
Seperti GambarDi Bawah Ini (Klik Yg [Disk Management]
Klik Kanan Lalu Format Tunggu Hingga BenarBenar Selesai
Jika Sudah Klik Kanan Disk Atau Flash Disk Anda Lalu Format Kembali
Agar Sempurna ..




Flashdrive corrup

Kasus lain Flashdrive gagal dibaca oleh Windows. Misalnya anda mengcopy file lalu data belum selesai di simpan, tetapi sudah dicabut dari port USB. Hasilnya, Flashdrive corropt.
Tanda yang terjadi, Data Flashdrive menjadi rusak. Isi didalamnya tidak bisa di baca. Artinya, Flashdrive tidak dapat digunakan. Setiap di colok ke port USB membuat Windows Hang beberapa saat
Untuk memperbaiki Flashdrive Corrupt karena tidak bisa di baca tanpa menyelamatkan data didalamnya adalah dengan mem-format. Caranya
  1. Ketika Windows bekerja, baru masukan / colok Flash drive anda ke USB port
  2. Masuk ke DOS Promt, dan ketik FORMAT nama drive :.
  3. Misalnya anda sudah harus memastikan nama drive dari FlashDrive anda di drive F, ketik saja FORMAT F:.
  4. Selesai memformat Flashdrive, maka drive anda akan bekerja kembali dengan data sudah dikosongkan dengan format.
  5. Teknik ini mempercepat untuk memperbaiki Flashdrive, terkadang dari program Explorer akan membuat hang Windows ketika anda menghubungkan Flashdrive ke port USB.
  6. Hati hati mengunakan perintah FORMAT, jangan menghapus data yang masih anda perlukan.

Result

Flash disk anda mengalami corrupt. Cara yang disebutkan diatas adalah untuk memperbaiki flash disk yang corrupt file dan mengalami file protect ketika mengcopy atau memindahkan data serta tidak dapat melakukan format.
Selesai melakukan format pada Flash Disk, tetapi anda mendapat pesan yang sama ketika melakukan format. Coba anda lakukan boot pada computer untuk me-refresh Windows XP agar mengenal Flash Disk anda. Bila masih mengalami hal sama, coba anda ulangi kembali melakukan chkdsk, bila masih terdapat pesan invalid link. Bila kedua kalinya anda masih mengalami hal tersebut, cara yang kami berikan tidak berlaku untuk flash disk anda ;-)
Kasus Flash Disk Write Protect terkadang hanya terjadi pada satu buah computer sementara beberapa waktu masih dapat digunakan oleh computer berbeda. Tetapi dapat juga langsung terjadi pada semua computer yang ketika anda menghubungkan Flash Disk anda baik pada sistem Windows XP atau OS lain
Hal lain dapat saja membuat error pada flash disk anda dan belum tentu disebabkan karena corrupt file yang membuat kasus seperti diatas.

 Posting Kali ini Berasal Dari Pengalaman Saya Sendiri


Semoga Bermanfaat
 

Cara Menghapus Photo Kiriman Teman Facebook


 logo facebook

Kawan - kawan terkadang ada teman yang kebetulan punya photo kita, mungkin photo bersama atau photo sendiri kita, lalu teman tesebut mengupload photo tersebut di profil facebook nya. saat mengupload dia memberi tag nama pada masing - masing orang yang ada di foto tersebut termasuk photo kita. setelah itu di shared lah photo tersebut sampai tiba di profil facebook kita.
bukan masalah kalau kita suka dengan foto tersebut, tapi bagaimana kalau foto tersebut jelek alias bisa menurunkan popularitas anda cka..kak..kak... ? bagaimana menghapus dari profil kita ?

Jawabannya adalah anda tidak bisa menghapus photo tersebut, karena walaupun itu foto diri anda tapi anda bukanlah pemiliknya ... ! pemilik foto adalah teman anda dan hanya dia yang bisa menghapusnya ... !

Tapi tenang dengan tips n trik berikut anda bisa menghapusnya agar tidak muncul di profil kita, caranya :

- Buka profil dan klik photo kiriman teman yang hendak anda hapus
- Liat bagian bawah photo " In this photo " disitu kan ada " nama anda " ( photo, remove tag )
- klik tulisan " remove tag " dan selesai

coba cek sekarang, photo tersebut tidak muncul lagi kan di profil anda !
 

Membuat Form Berkedip

Sisipkan 1 command , & 1 Module


 •)Pastekan Kode Berikut Di Module


Option Explicit

Public Declare Function FlashWindow Lib "user32" (ByVal hwnd As Long, ByVal bInvert As Long) As Long

Public Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)

•)Lalu Kode Ini Di Form


Private Sub Command1_Click()
Dim x As Long
    For c = 1 To 10
        x = FlashWindow(Form1.hwnd, 1)
        Sleep 100
    Next c
        x = FlashWindow(Form1.hwnd, 0)
End Sub



Disini Saya Akan Memberikan Tutorial Yg Simple Dan Dimengerti

Jadi.....


Selamat Berkreasi
 

Membuat Menu Klik Kanan Dan Tombol Popup Menu

Caranya Hampir Sama Dengan Posting Sebelumnya
Yaitu Membuat Menu Terlebih Dahulu ..


LAngsung Aja Ke TKP..............





    Kita Lihat Pada Atas Form Akan Terlihat Menu File


   



       Kita Akan Menghilangkan Tampilan Menu Tersebut,
Tapi Tidak Menghilangkan Isi Dari Menu Tersebut..
Dengan Cara Hilangkan Centang Pada Visible.............
Nah Itu Untuk Menghilangkan Tampilan Menu ..
••>>) Sekarang Kita Akan Membuat Menu Pada Klik Kanan..

   CaraNya :
•)Sediakan Semangkuk Tai Panas Serta
   Bumbu Balado Lengkap Dengan Bawang Rebus
                      Cuman Bercanda  
•)kita Pastekan Kode Berikut Di Form
  
    Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = vbRightButton Then
PopupMenu mnFile 'memanggil menu menjadi pop up menu'
End If
End Sub



       Beres Deh Untuk Membuat Menu Klik Kanan Pada Form

••>>) Sekarang Menu Di Tombol..   
•)CaraNya Tuliskan Pada Tombol
    Misalkan "


Private sub Command1_click()
PopupMenu MnFile


End Sub

Selesai Deh..!!!!!!!


       Selamat Berkreasi
 

Membuat Menu Pada Visual Basic

CaraNya Mudah Yaitu
•) Klik Kanan Pada Form
•) Lalu Pilih Menu Editor
        Nah Disini Kalian Bisa Berkreasi Sendiri 
  Contoh Seperti Ini !!!





   










             Seperti Gambar Di samping Disana Ada Menu File Dan DiDampingi exit..
Untuk Membuat Yg Seperti Itu Kalian Tinggal Isi Caption dengan "file"
dan Name Dengan MnFile.............


    Nah Jika Sudah, Klik Tombol Next.
Lalu Klik Juga Tombol Panah Kanan.
Lalu Isikan Caption Dengan Exit Dan Name Dengan MnExit Nah Sekarang Tinggal Klik Tombol
Selesai Deh


Lalu Klik File Di VB,
Lalu Klik Make Project.exe


Selamat Berkreasi
 
U Have Website We have Cash
If you have website put our banner on it, make money for each visitor
homezwork.com

Instructions

Wheldthacker. Diberdayakan oleh Blogger.

Translate

Music