Rabu, 22 Juni 2011

Darah Versi Animasi Cartoon (Edisi : Lucu2an hehee)

Nah Bagaimana karakteristik golongan darah kamu kalo dibuat dalam animasi ayuk langsung liad di bawah aja hehe..


tempat kesukaan :



Kalau sedang janjian :







Kalau ada unek-unek :







Kalau sedang disuruh :







Kalau Sedang ngobrol/ngerumpi :








Ketika sedang berpikir :







Kalau menyertir mobil :





Ketika diatur :



SUMBER : http://keluargabahgia.multiply.com/journal/item/39

Semoga dapat menjadi insipari teman" hehe ^^

Selasa, 21 Juni 2011

Cara Membuat Captcha Dengan VisualBasic.Net

Captcha pasti sering anda temukan saat ingin berkomentar atau beregistrasi pada sebuah situs.
Fungsi sebenarnya dari captcha untuk mencegah bot/SPAM/sesuatu yang bukan manusia inputkan.

Nah, Sekarang kita tidak menerapkannya pada website tapi pada Visual Basic.Net
Security kode bisa gunakan untuk sebuah verifikasi data.

Ok, kita mulai saja.

Buat sebuah Form baru. Masukan component PictureBox (1), TextBox (1), Button (1).
lalu susun seperti gambar dibawah ini.




Pada Form1 Declaration tepat dibawah Public Class Form1 masukan Variable berikut

Dim DrawingFont As New Font("Arial", 20)
Dim CaptchaImage As New Bitmap(140, 40)
Dim CaptchaGraf As Graphics = Graphics.FromImage(CaptchaImage)
Dim Alphabet As String =
"AaBbCcDdEeFfGgHhIiJjKkLlMmNnOoPpQqRrSsTtUuVvWwXxYyZz"
Dim CaptchaString, TickRandom As String
Dim ProcessNumber As Integer

Lalu Kita buat Method baru dengan nama GenerateCaptcha.
Anda tinggal copy kode dibawah ini, dan paste paada Form1 anda. Maka Method akan langsung dibuat secara otomatis.
Private Sub GenerateCaptcha()
        ProcessNumber = My.Computer.Clock.LocalTime.Millisecond
        If ProcessNumber < 521 Then
            ProcessNumber = ProcessNumber \ 10
            CaptchaString = Alphabet.Substring(ProcessNumber, 1)
        Else
            CaptchaString = CStr(My.Computer.Clock.LocalTime.Second \ 6)
        End If
        ProcessNumber = My.Computer.Clock.LocalTime.Second
        If ProcessNumber < 30 Then
            ProcessNumber = Math.Abs(ProcessNumber - 8)
            CaptchaString += Alphabet.Substring(ProcessNumber, 1)
        Else
            CaptchaString += CStr(My.Computer.Clock.LocalTime.Minute \ 6)
        End If
        ProcessNumber = My.Computer.Clock.LocalTime.DayOfYear
        If ProcessNumber Mod 2 = 0 Then
            ProcessNumber = ProcessNumber \ 8
            CaptchaString += Alphabet.Substring(ProcessNumber, 1)
        Else
            CaptchaString += CStr(ProcessNumber \ 37)
        End If
        TickRandom = My.Computer.Clock.TickCount.ToString
        ProcessNumber = Val(TickRandom.Substring(TickRandom.Length - 1, 1))
        If ProcessNumber Mod 2 = 0 Then
            CaptchaString += CStr(ProcessNumber)
        Else
            ProcessNumber = Math.Abs(Int(Math.Cos(Val(TickRandom)) * 51))
            CaptchaString += Alphabet.Substring(ProcessNumber, 1)
        End If
        ProcessNumber = My.Computer.Clock.LocalTime.Hour
        If ProcessNumber Mod 2 = 0 Then
            ProcessNumber = Math.Abs(Int(Math.Sin(Val(My.Computer.Clock.LocalTime.Year)) * 51))
            CaptchaString += Alphabet.Substring(ProcessNumber, 1)
        Else
            CaptchaString += CStr(ProcessNumber \ 3)
        End If
        ProcessNumber = My.Computer.Clock.LocalTime.Millisecond
        If ProcessNumber > 521 Then
            ProcessNumber = Math.Abs((ProcessNumber \ 10) - 52)
            CaptchaString += Alphabet.Substring(ProcessNumber, 1)
        Else
            CaptchaString += CStr(My.Computer.Clock.LocalTime.Second \ 6)
        End If
        CaptchaGraf.Clear(Color.White)

        For hasher As Integer = 0 To 5
            CaptchaGraf.DrawString(CaptchaString.Substring(hasher, 1), DrawingFont, Brushes.Black, hasher * 20 + hasher + ProcessNumber \ 200, (hasher Mod 3) * (ProcessNumber \ 200))
        Next
        PictureBox1.Image = CaptchaImage
    End Sub

Klik 2 kali pada button Check. Lalu beri kode dibawah ini.

If TextBox1.Text = "" Then
MsgBox("Mohon Masukan Kode Verifikasi", MsgBoxStyle.Information)
GenerateCaptcha()
ElseIf TextBox1.Text = CaptchaString Then
MsgBox("Kode Benar." + Chr(13) + "Coba yang lainya", MsgBoxStyle.Information)
TextBox1.Clear()
GenerateCaptcha()
Else
MsgBox("Kode Salah !", MsgBoxStyle.Exclamation)
TextBox1.Clear()
GenerateCaptcha()
End If
 
kode diatas akan mengeksikusi inputan yang kita masukan pada InputText nantinya.
Klik 2x Form anda. Lalu pada Method Load tambahkan kode dibawah ini yang fungsinya untuk meng-generate Captcha.

GenerateCaptcha()

Yang Terakhir Pilih TextBox1 dengan Method KeyPress. Lalu masukan kode dibawah ini

If e.KeyChar = Chr(13) Then Button2.PerformClick()



Selamat mencoba. Semoga tutorial kali ini berguna dan bermanfaat, terimakasih.

Sabtu, 18 Juni 2011

Vocal Remover With Audacity 1.3 Beta (Unicode)

1. Download Audacity 1.3
    >>Click Here<<
   Contoh lagu silahkan download disni ( emil chau - peng you )
2. Instal Audacitynya ...
3. Buka Audacity
4. Teken Ctrl+O
5. Pilih lagu yang anda ingin kn, teruz ok
6. Pilih Effect -> Vocal Remover (ada dibawahnya )
7. Tunggu ampe loadingnya selesai
8. Pilih File -> Export , truz pilih posisi file maw disave dengan mode mp2 (karena yang lain masih error) , teken ok , truz ok lagi.

9. Jadi de, File No vocal...

NB : Kalo maw ubah mp2 jadi mp3 cari program converter nya ya sendiri ..

Credit : -[P.H]-*{D}anZ-

Kamis, 09 Juni 2011

Fungsi-fungsi "CRUSIAL" dalam Script PHP, untuk mengakses MySQL Database

[1]. Fungsi "mysql_connect" dan "mysql_pconnect"
-------------------------------------------

Digunakan untuk membuat hubungan (koneksi) ke Database MySQL yang terdapat pada suatu HOST.
Syntax-nya :
mysql_connect(host, nama_user, password)
Keterangan :
[x] host, menyatakan nama host (komputer) tempat MySQL berada.
[x] pemakai, nama pemakai (user) yang digunakan untuk melakukan
hubungan (koneksi) ke DBMySQL
[x] password, merupakan password milik pemakai (user)

Fungsi ini menghasilkan nilai balik berupa nilai BOOLEAN, yang menyatakan pengenal hubungan (koneksi) dan digunakan sebagai pengenal diberbagai "mysql_".
Jika benar maka nilainya adalah TRUE dan bila terjadi suatu kesalahan maka nilai balik akan berupa FALSE. (e.g) $id_mysql = mysql_connect("localhost", "zj", "badguy");
dimana, $id_mysql --> merupakan variabel yang diciptakan untuk "pengenal_hubungan".
Selain itu PHP juga mempunyai fungsi "mysql_pconnect" yang serupa dengan "mysql_connect". Fungsi ini digunakan untuk membentuk hubungan (koneksi) yang PERSISTEN, artinya "koneksi tidak akan ditutup, walaupun skrip sudah berakhir". Namun hal ini hanya berlaku pada PHP yang bertindak sebagai modul, misalnya pada Web Server Apache.

(e.g) $id_mysql = mysql_pconnect("localhost", "danz", "pro");

[2]. Fungsi "mysql_close"
--------------------

Fungsi ini berguna untuk menutup hubungan (koneksi) ke database MySQL.
Syntax-nya :
mysql_close(pengenal_hubungan)

Dalam hal ini "pengenal_hubungan" menyatakan pengenal yang diperoleh dari pemanggilan fungsi "mysql_connect" diatas.

(e.g) mysql_close($id_mysql)

Ketika skrip PHP berakhir, koneksi ke Database MySQL yang dibentuk melalui mysql_connect bukan (mysql_pconnect) juga dengan sendirinya akan ditutup dengan fungsi "mysql_close".

[3]. Fungsi "mysql_select_db"
------------------------

Fungsi ini berguna untuk memilih Database, seperti mengunakan perintah USE pada aplikasi MySQL.
Syntax-nya :
mysql_select_db(database, pengenal_hubungan)

Dalam hal ini "pengenal_hubungan" (e.g) $id_mysql) diperoleh juga dari pemanggilan fungsi mysql_connect diatas. Dan argumen/parameter database adalah nama dari database yang dipilih atau yang akan digunakan pada skrip PHP.

(e.g) mysql_select_db("mydatabase", $id_mysql)

[4]. Fungsi "mysql_query"
--------------------

Fungsi ini digunakan untuk mengeksekusi permintaan record pada sebuah tabel atau sejumlah tabel.
Syntax-nya :
mysql_query(permintaan, pengenal_hubungan)

Argumen "permintaan" merupakan penyataan (syntax SQL) untuk mengakses tabel, dimana tabel-tabel dimaksud dan bisa diakses adalah tabel milik database yang disebutkan/dipanggil melalui fungsi "mysql_select_db" diatas.

[5]. Fungsi "mysql_db_query"
-----------------------

Fungsi ini berguna untuk menjalankan suatu permintaan terhadap suatu Database.
Syntax-nya :
mysql_db_query(database, permintaan, pengenal_hubungan)

Dalam hal ini pengenal hubungan adalah menyatakan pengenal hubungan yang diperoleh dari pemanggilan fungsi mysql_connect dan argumen database adalah nama database yang dipilih. Dan argumen permintaan adalah pernyataan (syntax SQL). Khusus untuk argumen ketiga adalah optional bisa ditulis bisa tidak, karena fungsi mysql_db_query selalu sesudah fungsi mysql_connect, argumen ketiga sudah diwakili didalam fungsi mysql_connect.

Fungsi ini memberikan nilai balik berupa suatu angka bulat yang menyatakan pengenal hasil, yang diperlukan pada pada berbagai fungsi berawalan "mysql_" lainnya. Hasilnya FALSE menyatakan bahwa terdapat sesuatu kesalahan.

(e.g) mysql_query_db("mydatabase", "SELECT * FROM mytabel", $id_mysql)

[6]. Fungsi "mysql_num_rows"
-----------------------

Fungsi ini berguna untuk memperoleh jumlah baris dari suatu hasil permintaan (query) yang menggunakan SELECT.
Syntax-nya :
mysql_num_rows(pengenal_hasil)

Dalam hal ini pengenal hasil menyatakan nilai yang diperoleh dari pemanggilan fungsi seperti "mysql_db_query" atau "mysql_query". Sebagai catatan, untuk permintaan yang menggunakan UPDATE, INSERT, atau DELETE menggunakan fungsi "mysql_affected_rows" untuk memperoleh jumlah baris yang terkena operasi-operasi tersebut.

[7]. Fungsi "mysql_affected_rows"
----------------------------

Fungsi ini berguna untuk memperoleh jumlah baris yang dikenai operasi INSERT, UPDATE, dan DELETE.
Syntax-nya :
mysql_affected_rows(pengenal_hubungan)

Dalam hal ini pengenal hubungan menyatakan nilai yang diperoleh dari pemanggilan fungsi "mysql_connect". Dimana argumen ini bersifat opsional. Pada permintaan yang mengandung DELETE tetapi tanpa klausa "WHERE", penghapusan akan dilakukan pada semua baris; namun fungsi "mysql_affected_rows" hanya akan memberikan nilai balik berupa nol 0.

[8]. Fungsi mysql_num_fiedls
-----------------------

Fungsi ini berguna untuk memperoleh jumlah kolom pada suatu hasil permintaan.
Syntax-nya :
mysql_num_fields(pengenal_hasil)

Dalam hal ini pengenal hasil menyatakan nilai yang diperoleh dari pemanggilan fungsi seperti "mysql_db_query" atau "mysql_query".
Skrip dibawah ini akan memberikan gambaran sedikit tentang penggunaan fungsi "mysql_select_db", "mysql_query", "mysql_num_fields", dan "mysql_num_rows".
<html>
<head><title></title></head>
<body>

<?php
/* inisialisasi koneksi */
$pemakai = "danz";
$password = "pro";

/* membuka koneksi ke Database MySQL */
$id_mysql = mysql_connect("localhost", $pemakai, $password)
OR die("Can NOT Connect to MySQL");
/* Database dan Tabel yang dituju */
mysql_select_db("mydatabase, $id_mysql) OR die("Database NOT FOUND!");
$hasil = mysql_query("SELECT * FROM mytable", $id_mysql);

/* jika tabel tidak ditemukan*/
if (! $hasil)
die("Query Aborted");

/* mengambil jumlah kolom */
$jum_kolom = mysql_num_fields($hasil);
echo "Jumlah kolom : $jum_kolom
\n";
/* mengambil jumlah baris */
$jum_baris = mysql_num_rows($hasil);
echo "Jumlah baris : $jum_baris
\n";

/* menutup koneksi ke Database MySQL */
mysql_close($id_mysql);
>?

</body>
</html>

--

credit : Danz-Pro2