Cara Download dengan Flashget

Pada 1 Mei yang lalu saya memposting blog dengan judul: Mempercepat Download 15x Lipat. Intinya membahas cara mempercepat download melalui internet menggunakan software download manager FlashGet. Namun ada beberapa pengunjung yang merasa kesulitan melakukan download dengan FlashGet. Sebagian besar karena FlashGet tidak bisa terintegrasi dengan browser yang digunakan. Sehingga ketika klik button atau link download pada halaman web/blog yang muncul tetap proses download default browser, bukan Flashget.

Keadaan itu berbeda ketika menggunakan Internet Download Manager (IDM), begitu klik download maka IDM bisa langsung aktif. Hal ini disebabkan ketika menginstall IDM, otomatis akan menginstall add-ons atau extension pada browser yang digunakan sehingga IDM bisa difungsikan download manager default.

Lalu bagaimana jika menggunakan FlashGet? Memang ada sedikit perbedaan cara download dengan FlashGet sesuai browser yang digunakan. Berikut penjelasan singkat cara download dengan FlashGet.

Pada saat instalasi, jangan hilangkan tanda centang pada As default download manager.

Buka FlashGet, klik menu Tool kemudian pilih Option.

Pada tab General Setting > Monitor, pastikan tanda centang pada IE Browser dan Clipboard dalam keadaan aktif (tercentang)

Cara download dengan Flashget pada browser Chrome 28
Sebelum melalukan download, pastikan FlashGet dalam keadaan aktif. Pada halaman download, klik kanan pada gambar, button atau link download kemudian klik Copy link address

Maka secara otomatis akan muncul kotak dialog Add New Download FlashGet. Lokasi download sudah dikategorikan sesuai ekstensi file yang akan di download. Anda tinggal klik tombol download maka otomatis proses download akan berjalan dengan FlashGet.

Cara download dengan Flashget pada browser Firefox 23
Caranya sama seperti pada browser Chrome, yaitu klik kanan pada link download kemudian klik Copy Link Location.
Jika dalam komputer Anda terinstall beberapa software download manager, untuk mengatur download manager default, Anda perlu menginstall add-ons FlashGot. Kunjungi halaman http://flashgot.net/ kemudian klik buttonFlashGot Install. Ikuti proses install add-ons sampai selesai hingga restart Firefox.

Setelah add-ons FlashGot terinstall pada Firefox, buka salah satu halaman download kemudian klik pada link download yang disediakan (bukan klik kanan). Selanjutnya, aktifkan RadioButton FlashGet kemudian pilih FlashGet 2.x pada list yang disediakan. Kemudian klik Save File, maka proses download akan otomatis menggunakan FlashGet

Cara download dengan Flashget pada browser Internet Explorer 10
Jika menggunakan Internet Explorer (IE), cukup klik kanan pada link download kemudian klik Download by FlashGet

Itulah cara download dengan Flashget pada browser Chrome, Firefox, dan Internet Explorer. Kondisi mungkin akan berbeda pada versi maupun jenis browser yang lain namun prinsipnya tetap sama.

Cara Mudah Kunci Folder Rahasia Anda

Anda memiliki folder khusus yang anda anggap rahasia dan tidak boleh dibuka oleh orang lain selain diri anda, kok bisa sih jadi rahasia, hehehe... tentunya anda sendirilah yang tahu ;)

Anda bisa mencoba software ini "Instant Lock", silah anda klik disini untuk mendownload nya, berikut cara instalasinya :

Setelah anda unpack file "Instant_Lock.rar", double klik ilocksetup.exe, dan ikuti instruksinya, yang agak berbeda adalah dibagian Shortcut Folder yang akan ditampilkan di All Program, lihat ilustrasi berikut 

Cara nya klik panah pada combobox dan pilih nama shortcut nya atau anda bisa menentukannya sendiri dengan memberi nama yang lain sesuai dengan keinginan anda, selanjutnya klik Next, setelah proses instalasi selesai, coba anda jalankan, maka akan muncul 

Anda masukkan sebuag kata kunci atau password yang nantinya selanjutnya akan digunakan untuk masuk keprogram ini, lalu klik OK.

Cara penggunaanya sangat lah mudah sesuai dengan namanya instant, cukup klik tombol Add, lalu akan keluar kotak dialog "Browse For Folder", lalu anda pilih folder mana yang akan di kunci, lalu klik Oke, dan sim..salabin.. folder nya akan hilang.. ya hilang... dari peredaran :), tapi jangan khawatir masih bisa dikembalikan kok, caranya nya sangat mudah cukup pilih folder mana yang ingin anda munculkan kembali lalu klik tombol Remove yang berada di samping tombol Add.

Selamat mencoba.

Membuat Fungsi Terbilang Desimal Inggris Pada Visual Basic 6.0

Fungsi ini hampir sama dengan postingan sebelumnya, tetapi dalam versi bahasa Inggris dengan sedikit perubahan pada bagian codingnya.

Buka project baru (Standard.Exe), pada Form1 letakkan 2 buah textbox dengan properti Name standar (Text1 dan Text2).

Masuk ke mode editor, klick View -> Code, dan masukkan kode berikut ini :

?

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48

Private Function SpellDigit(strNumeric As Integer)  Dim cRet As String  On Error GoTo Pesan  cRet = ""  Select Case strNumeric         Case 0:     cRet = " zero"         Case 1:     cRet = " one"         Case 2:     cRet = " two"         Case 3:     cRet = " three"         Case 4:     cRet = " four"         Case 5:     cRet = " five"         Case 6:     cRet = " six"         Case 7:     cRet = " seven"         Case 8:     cRet = " eight"         Case 9:     cRet = " nine"         Case 10:    cRet = " ten"         Case 11:    cRet = " eleven"         Case 12:    cRet = " twelve"         Case 13:    cRet = " thirteen"         Case 14:    cRet = " fourteen"         Case 15:    cRet = " fifteen"         Case 16:    cRet = " sixteen"         Case 17:    cRet = " seventeen"         Case 18:    cRet = " eighteen"         Case 19:    cRet = " ninetieen"         Case 20:    cRet = " twenty"         Case 30:    cRet = " thirty"         Case 40:    cRet = " fourthy"         Case 50:    cRet = " fifty"         Case 60:    cRet = " sixty"         Case 70:    cRet = " seventy"         Case 80:    cRet = " eighty"         Case 90:    cRet = " ninety"         Case 100:   cRet = " one hundred"         Case 200:   cRet = " two hundred"         Case 300:   cRet = " three hundred"         Case 400:   cRet = " four hundred"         Case 500:   cRet = " five hundred"         Case 600:   cRet = " six hundred"         Case 700:   cRet = " seven hundred"         Case 800:   cRet = " eight hundred"         Case 900:   cRet = " nine hundred"  End Select  SpellDigit = cRet Exit Function Pesan:   SpellDigit = "(maksimal 9 digit)" End Function

?

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28

Private Function SpellUnit(strNumeric As Integer)  Dim cRet As String  Dim n100 As Integer  Dim n10 As Integer  Dim n1 As Integer  On Error GoTo Pesan  cRet = ""  n100 = Int(strNumeric / 100) * 100  n10 = Int((strNumeric - n100) / 10) * 10  n1 = (strNumeric - n100 - n10)  If n100 > 0 Then     cRet = SpellDigit(n100)  End If  If n10 > 0 Then     If n10 = 10 Then        cRet = cRet & SpellDigit(n10 + n1)     Else        cRet = cRet & SpellDigit(n10)     End If  End If  If n1 > 0 And n10 <> 10 Then     cRet = cRet & SpellDigit(n1)  End If  SpellUnit = cRet  Exit Function Pesan:   SpellUnit = "(maksimal 9 digit)" End Function

?

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45

Public Function TerbilangInggris(strNumeric As String) As String  Dim cRet As String  Dim n1000000 As Long  Dim n1000 As Long  Dim n1 As Integer  Dim n0 As Integer    On Error GoTo Pesan    Dim strValid As String, huruf As String * 1    Dim i As Integer    'Periksa setiap karakter masukan    strValid = "1234567890.,"    For i% = 1 To Len(strNumeric)      huruf = Chr(Asc(Mid(strNumeric, i%, 1)))      If InStr(strValid, huruf) = 0 Then        MsgBox "Harus karakter angka!", _               vbCritical, "Karakter Tidak Valid"        Exit Function      End If    Next i%    If strNumeric = "" Then Exit Function  If Len(Trim(strNumeric)) > 9 Then GoTo Pesan    cRet = ""  n1000000 = Int(strNumeric / 1000000) * 1000000  n1000 = Int((strNumeric - n1000000) / 1000) * 1000  n1 = Int(strNumeric - n1000000 - n1000)  n0 = (strNumeric - n1000000 - n1000 - n1) * 100  If n1000000 > 0 Then     cRet = SpellUnit(n1000000 / 1000000) & " million"  End If  If n1000 > 0 Then     cRet = cRet & SpellUnit(n1000 / 1000) & " thousand"  End If  If n1 > 0 Then     cRet = cRet & SpellUnit(n1)  End If  If n0 > 0 Then     cRet = cRet & " and cents" & SpellUnit(n0)  End If  TerbilangInggris = cRet & " only"  Exit Function Pesan:   TerbilangInggris = "(maximum 9 digit)" End Function

?

1 2 3

Private Sub Text1_Change()     Text2.Text = TerbilangInggris(Text1.Text) End Sub

Jalankan project (Tekan F5), dan masukkan nilai angka pada textbox yang pertama, dan hasil kalimat terbilang dalam bahasa Inggris akan ditampilkan pada textbox yang kedua.

Selamat mencoba.