By Yeni Ramadhani

Advertise Here

animasi blog

Selasa, 06 Januari 2015

EDIT-EDIT PHOTO SERU!! Disini..

Mau edit photo jadi lucu unik dan keren, guys? Tapi bingung karena tidak bisa, Silahkan coba edit foto online di internet, ya kini edit photo bisa di lakukan secara online karena di internet telah banyak beredar situs edit photo dengan banyak fitur efek photo yang wajib kamu coba.

sebagai contohnya adalah http://photofunia.com/ di situs tersebut kamu bisa mengedit photomu jadi lebih keren dengan cara menambahkan efek photo, frame atau bingkai, contoh nya photo di bawah ini : 
 
Cukup bagus dan Keren kan guys hasil nya.. ^_^
untuk situs edit foto online lainya yang tak kalah bagus fasilitas efek photonya dan bisa kamu coba diantaranya :
 
Sebuah editor photo online gratis. Memungkinkan untuk memperbaiki, menyesuaikan, dan menyaring gambar, memilki fitur seperti adobe photoshop.

BeFunky Photo Editor memungkinkan Anda menerapkan efek photo, mengedit photo dan membuat kolase photo dengan pembuat kolase, banyak hal bisa di lakukan di sini.
 
piZap.com editor photo online gratis, menambahkan gambar lucu, efek mudah, kolase, mengedit photo Facebook & Instagram bisa langsung di share di sosial media fb, twitter, dll..

Dapatkan pengalam Editing photo online yang menyenangkan di fotor, banyak efek photo yang bisa di coba termasuk Photo Collage, Filter, Frames, Effects, Seni Klip, Font, ...
 
Demikianlah beberapa daftar situs edit foto online yang Lucu, Unik & Keren, jangan lupa gunakan daya kreatifitas sobat agar photo yang sobat edit bisa bagus hasilnya. ^_-.

Ini : Sumbernya!

Cara Mengaktifkan IDM Tanpa Serial Number!

Mengaktifkan IDM Permanen - setelah anda hanya registrasi 1 kali. 
Jadi, anda tidak perlu menggunakan patch/crack setiap IDM merilis versi terbaru karena patch/crack biasanya mengandung virus berbahaya. jadi, apakah anda ingin mencobanya. silahkan lihat tutorial di bawah ini: 

AKTIVASI IDM TANPA PATCH FOREVER :

1. Pertama Kali install terlebih dahulu Internet Download Manager nya, kalau bisa update dulu ke versi  
    terbarunya

2. (Khusus Windows 7 )Buka notepad. tapi di run as admin terlebih dahulu dengan cara klik kanan pada
    notepad lalu Properties>Compatibility>Pada Privilage Level cheklist di run as program as administrator,  
    lalu OK
 
3. Open hosts dengan cara masuk ke C:\WINDOWS\system32\drivers\etc

4. Jangan lupa ganti text document .txt menjadi all files agar file hosts nya kelihatan
 
5. Di bawah "127.0.0.1       localhost", tambahkan kode berikut:
 
     127.0.0.1 tonec.com
     127.0.0.1 www.tonec.com
     127.0.0.1 registeridm.com
     127.0.0.1 www.registeridm.com
     127.0.0.1 secure.registeridm.com
     127.0.0.1 internetdownloadmanager.com
     127.0.0.1 www.internetdownloadmanager.com
     127.0.0.1 secure.internetdownloadmanager.com
     127.0.0.1 mirror.internetdownloadmanager.com
     127.0.0.1 mirror2.internetdownloadmanager.com
     127.0.0.1 mirror3.internetdownloadmanager.com
     127.0.0.1 star.tonec.com
     Sehingga hasilnya
 
    (anda bisa langsung copy hosts kode ke C:\WINDOWS\system32\drivers\etc)

6. Silahkan masuk ke menu registrasi IDM, untuk first dan last name serta email terserah anda, tapi serial
    nya pilih salah satu di bawah ini:

    W3J5U-8U66N-D0B9M-54SLM
    EC0Q6-QN7UH-5S3JB-YZMEK
    GZLJY-X50S3-0S20D-NFRF9                     
    Di akhir tutorial ini anda bisa mendownload serial dan kode host nya melalui mediafire 

7. Selamat menggunakan Internet Download Manager Full Version tanpa patch/crack
 
8. Sedikit tambahan, jika anda menggunakan tutorial ini, anda tidak dapat mengakses situs resmi IDM, tapi
     anda masih bisa mendownloadnya.. ^_^.
    
Jika anda ingin mengupdate versi terbarunya kalau sudah rilis, anda harus mengikuti cara di bawah ini:
Download lewat link mirror yang telah disediakan beberapa situs dan bisa juga download di situs resmi IDM nya menggunakan Proxy..anda bisa mendownload versi terbarunya di  Softpedia
Jadi, jangan hapus kode host yang anda tambahkan agar IDM nya tidak terdeteksi
 

Jumat, 02 Januari 2015

Membuat Tampilan Facebook Menjadi Kerennn!

Siapa sih yang tidak kenal dengan facebook??? yang kini merupakan situs jejaring sosial yang paling populer di dunia, Nah bagi kamu kamu nih yang suka dengan akun Sosmed Facebook, Supaya tidak Bosan, Kini ada cara untuk merubah Theme / Tampilan Facebook agar lebih Menarik.

Misalnya Seperti ini :

Disini saya akan membahas tentang bagaimana cara merubah tampilan facebook yang terkesan monoton menjadi tampilan yang berbeda dari biasanya.

1. Bukalah browser Modzilla firefox.

2. Kemudian Installah Add-ons User Styles klik di sini kemudian klik Add to firefox.


3. Kemudian untuk memilih themes facebook sobat silahkan kunjungi halaman   
    ini https://userstyles.org/styles/browse/facebook, kemudian pilih Theme yang Kamu sukai.

4. Setelah sobat memilih theme yang sobat sukai kemudian pilih Install with Stylish


4. Kemudian Klik Install

5. Sekarang coba sobat login ke facebook milik sobat dan lihat perubahannya.
Selamat mencoba... ^_^


Jenis-Jenis Virus Komputer!

10 Virus Komputer Paling Mematikan Di Dunia


Virus Komputer adalah program / aplikasi yang dapat menggandakan dirinya sendiri dan menyebar dengan cara  menyisipkan dirinya pada program dan data lainnya . biasanya user tidak mengetahui jika komputer yang di milikinya terjangkit virus sampai salah satu data hilang atau program yang ada pada komputer tidak bisa di jalankan.

Efek negatif yang di timbulkan oleh virus komputer seperti memperbanyak dirinya sendiri sehingga memori menjadi kecil, hal ini membuat komputer sering hang atau freeze, lalu mengubah ekstensi pada file dan program yang membuat program/file tersebut tidak bisa di gunakan, dan dapat juga mencuri data pribadi seseorang tanpa sepengetahuan orang tersebut. selain itu juga virus dapat merusak hardware pada komputer.

Faktanya hampir 95% virus menyerang pengguna sistem operasi windows. Sisanya menyerang Linux/GNU, Mac, FreeBSD, OS/2 IBM, dan Sun Operating System.

1.Storm Worm
Muncul taon 2006, disebut “Storm Worm” karena nyebar via email dengan judul “230 dead as storm batters Europe”. Storm worm adalah program Trojan house. beberapa versinya bisa buat komputer menjadi bots. Atau biasa digunakan hacker untuk spam mail melalui internet.

2. Leap-A/Oompa- A
Mac yang punya konsep security through obscurity yakin tidak akan terserang virus karena OS nya sistem tertutup. Tapi tahun 2006, virus Leap-A atau biasa disebut Oompa-A muncul. Nyebar lewat iChat pada Mac. Setelah Mac terserang, virus itu akan mencari kontak melalui iChat dan kirim pesan ke tiap kontak itu. Pesannya itu berisi file corrupt yang berbentuk JPEG. Memang tidak berbahaya, namun hal ini menyatakan bahwa masih mungkin akan ada virus berbahaya yang menyerang MAC.

3. Sasser and Netsky
Penciptanya anak Jerman umur 17 tahun, Sven Jaschan. Sasser nyerang Microsoft Windows. Sasser ini ga nyebar via email. Tapi jika satu komputer koneksi ke komputer yang kena virus ini. Virus ini bikin komputer tidak bisa di-shutdown tanpa cabut power. Netsky nyebar melalui email dengan 22 Kb attachment file dan jaringan Windows. Bisa bikin serangan DoS. Sven Jaschan tidak dipenjara hanya diberi masa percobaan 1 taon 9 bulan, karena umurnya masih di bawah 18 taon.

4. MyDome (Novarg)
Mulai nyerang tanggal 1 Februari 2004, virus ini buat backdoor di OS. Pertama kali tanggal 1 itu mulai DDoS. Kedua, tanggal 12 Feb, virus ini berhenti menyebar dan mulai buat backdoors. MyDoom menyebar via email, selain itu selalu search di search engines, seperti Google mulai menerima jutaan permintaan pencarian dan bikin lambat sampai akhirnya crash. Gara2 MyDoom, Senator US Chuck Schumer mengajukan pembuatan National Virus Response Center.

5.SQL Slammer/Saphire
Muncul Januari 2003, nyebar cepet lewat internet. Waktu itu bikin layanan ATM Bank Amerika crash, ancurnya layanan 911 Seattle, dan Continental Airlines membatalkan beberapap penerbangan karena eror check in ama tiketing. Bikin rugi lebih dari $1 milliar sebelum dipacthed.

6.Nimda
Ini juga tahun 2001, kebalikan dari kata “admiN”. Penyebarannya sangat cepat, menurut TruSecure CTO Peter Tippet, Nimda hanya butuh 22 menit buat menjadi Top Ten saat itu. Target nya server2 Internet, menyebar lewat Internet. Nimda akan ngebuat backdoor ke OS. jadi penyerang bisa akses ke server dan berbuat apa saja Nimda juga menjadi DDoS.

7.Code Red & Code Red II
Muncul musim panas 2001, nyerang OS Windows 2000 & NT. Virusnya bakal bikin buffer penuh jadi ngabisin memori. Paling seru waktu berhubungan ama White House, semua komputer yang kena virus ini bakalan otomatis akses ke web server di White House barengan, jadi bikin overload, alias serangan DDoS. Akhirnya Microsoft rilis patchnya saat itu.

8.The Klez
Nongol taon 2001, menyebar via email, replikasi trus kirim ke orang2 di address book. Bikin komputer ga bisa beroperasi, bisa berhentiin program antivirus.

9.ILOVEYOU
Abis “Melissa”, muncul dia dari Filipina, bentuk nya worm, program standalone dapat me-replikasi sendiri. Menyebar via email, judulnya”surat cinta” dari pengagum rahasia . Original file nya LOVE-LETTER- FOR-YOU.TXT. vbs. VBS singkatan Visual Basic Scripting. Penciptanya adalah Onel de Guzman dari Filipina.

10.Melissa
Dibikin taon 1999 sama David L Smith, basicnya Microsoft Word macro. Menyebar via email dengan dokumen “Here is that document you asked for, don’t show it to anybodey else.”. Kalau sampe dibuka, virus akan replikasi dan otomatis ngirim ke top 50 di address book email. Smith dipenjara 20 bulan ama denda $5000 dan melarang akses komputer tanpa pengawasan.

Saran saya agar tidak terkena virus , sebaiknya menginstall antivirus pad akomputer atau smartphone. dan jangan lupa untuk selalu mengupdate antivirus tersebut.

Minggu, 07 Desember 2014

Yuk! Belajar Pemrograman Visual Basic dot Net Di Mesran.Net



JUDUL SOAL : Latihan Listview Perhitungan Penjualan Barang


BERIKUT JAWABAN PROGRAM :

 
Public Class Form1

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        kdbarang.Items.Add("TS001")
        kdbarang.Items.Add("TS002")
        kdbarang.Items.Add("VG001")
        kdbarang.Items.Add("VG002")

        buattabel()
    End Sub

    Sub buattabel()
        lv.Columns.Add("No. Pembeian", 80, HorizontalAlignment.Center)
        lv.Columns.Add("Kode Barang", 80, HorizontalAlignment.Center)
        lv.Columns.Add("Nama Barang", 80, HorizontalAlignment.Center)
        lv.Columns.Add("Merk", 80, HorizontalAlignment.Center)
        lv.Columns.Add("Harga", 80, HorizontalAlignment.Center)
        lv.Columns.Add("Jumlah Beli", 80, HorizontalAlignment.Center)
        lv.Columns.Add("Total Harga", 80, HorizontalAlignment.Center)
        lv.View = View.Details
        lv.GridLines = True
        lv.FullRowSelect = True
    End Sub


    Sub isitabel()
        Dim i As New ListViewItem
        i.Text = nopembelian.Text
        i.SubItems.Add(kdbarang.Text)
        i.SubItems.Add(namabarang.Text)
        i.SubItems.Add(merk.Text)
        i.SubItems.Add(harga.Text)
        i.SubItems.Add(jumlahbeli.Text)
        i.SubItems.Add(ttlharga.Text)
        lv.Items.Add(i)
    End Sub

    Sub smpn(ByVal t As Form)
        nopembelian.Text = ""
        kdbarang.Text = ""
        namabarang.Text = ""
        merk.Text = ""
        harga.Text = ""
        jumlahbeli.Text = ""
        ttlharga.Text = ""
    End Sub

    Private Sub kdbarang_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles kdbarang.SelectedIndexChanged
        Dim x As String
        x = Microsoft.VisualBasic.Left(kdbarang.Text, 2)
        Select Case x
            Case "TS" : merk.Text = "Toshiba"
            Case "VG" : merk.Text = "V-Gen"
        End Select
        Dim j As String
        j = Microsoft.VisualBasic.Right(kdbarang.Text, 3)
        Select Case j
            Case "001" : namabarang.Text = "Flashdisk 4GB"
            Case "002" : namabarang.Text = "Flashdisk 2GB"
        End Select
        Dim a As String
        a = Microsoft.VisualBasic.Mid(kdbarang.Text, 1)
        Select Case a
            Case "TS001" : harga.Text = "105000"
            Case "TS002" : harga.Text = "75000"
            Case "VG001" : harga.Text = "90000"
            Case "VG002" : harga.Text = "60000"
        End Select
    End Sub

    Private Sub simpankelist_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles simpankelist.Click
        isitabel()
        smpn(Me)
    End Sub


    Private Sub hapussd_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles hapussd.Click
        lv.Items.Clear()
    End Sub

    Private Sub hapusdataydp_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles hapusdataydp.Click
        lv.Items.Remove(lv.SelectedItems(0))
    End Sub


    Private Sub bersih_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles bersih.Click
        nopembelian.Text = ""
        kdbarang.Text = ""
        namabarang.Text = ""
        merk.Text = ""
        harga.Text = ""
        jumlahbeli.Text = ""
        ttlharga.Text = ""
    End Sub


    Private Sub keluar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles keluar.Click
        Me.Close()
    End Sub

    Private Sub jumlahbeli_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles jumlahbeli.KeyPress

        If Asc(e.KeyChar) = 13 Then
            ttlharga.Text = harga.Text * jumlahbeli.Text
        End If

    End Sub
End Class



GAMBAR TAMPILAN HASIL PROGRAM :