Jumat, 30 Januari 2009

Cara Share Internet dengan 2 LAN CARD

Pada Artikel kali ini saya akan mejelaskan bagaiman cara share koneksi internet menggunakan 2 LAN card dengan modem Handphone pada windows XP anda.
Intinya kita akan berbagi koneksi internet dengan komputer-komputer lain menggunakan Lan Card/Pci Card, itung2 bikin warnet mini gitu...
Anda Bisa Download Tutorial lengkapnya Disini

Mematikan Deep Freeze

Berawal dari pertanyaan seseorang tentang bagaimana menonaktifkan deep freeze, memang sangat mudah untuk menonaktifkannya, tapi bagaimana kalau kita lupa passwordnya, apa mungkin bisa, jawabannya bisa... langsung saja, download softwarenya yang bernama deepunfreeze atau klik disini
Setelah download softwarenya, anda jalankan dan pilih boot thawed, klik save status, restart komputernya, deep freeze telah non aktif.. Lihat Gambar di bawah



Sekian Dulu Triknya...

Kamis, 29 Januari 2009

TRIK INTERNET GRATIS

Baiklah.. Kali Ini Penulis akan berbagi sedikit tentang trik Gprs gratis, mudah-mudahan belum di blok..!!! Pada dasarnya bukan gratis melainkan kita diberikan sebuah IP untuk internet gratis oleh provider tertentu, yaitu Your Freedom... Langkah pertama yang harus disiapkan adalah:
1. Handphone gsm yang sudah ada fasilitas GPRS
2. PC/Laptop
3. Alat penghubung dengan Laptop/PC, Ex. Bluetooth, Kabel Data atau Infrared
4. Kartu Perdana XL
5. Software bernama Your Freedom Dan Java
Untuk mendapatkannya silahkan Klik di www.java.com.
dan di www.your-freedom.net, jangan lupa untuk registrasi di Your Freedomnya

Caranya:
1. Aktifkan perdana XL
2. Lakukakn setting di PC/Laptop
APN : www.xlgprs.net
username : xlgprs
password : proxl
kode perintah: buka control panel phone and modem options modem properties advanced isi dengan
at+cgdcont=1,"IP","www.xlgprs.net
3. Hubung
kan Handphone dengan PC/Laptop langsung DIALUP
4. Setelah dialup buka software your freedom yang telah anda download

di Configure isi

address : ems01.your-freedom.de

port : 53

Protocol: udp

Option yang harus di centang:

Automatically select best server

Reconnect after seerver shutdown

Redirect SOCKS4/5 DNS to Freedom server

Enable encryption

Enable re-keying


setelah itu di bagian account information di isi dengan usename dan password yang telah anda daftarkan di

www.your-freedom.net

setelah selesai save and exit

lselanjutnya klik start connection

6. setelah selesai setting di YF,selanjutnya lakukan setting di browser(browser apa saja bisa firefox,dll)

7. ubah proxy di browser pilih manual proxy : 127.0.0.1 port:8080

selesai…silahkan browsing.

Untuk Tutorial lengkapnya silahkan Download Disini

Catatan:

YF memberikan gratis dengan kecepatan 64kb/s,jika anda ingin yang lebih silahkan membeli produknya.

YF akan dissconnect setiap 1 jam sekali,maka lakukan start lagi.

Jika YF tidak bisa connect ke XL,coba test browsing dulu di HP,dan coba lagi(XL kadang suka ada gangguan pada

GPRS)

Sekian triknya semoga bermanfaat...

Rabu, 28 Januari 2009

Trik Mempercepat Windows XP

Dari hasil sharing dengan teman-teman, saya akan sedikit berbagi tentang mempercepat komputer kita, pada dasarnya komputer kita lambat di karenakan banyaknya program yang kita instal di komputer kita, salah satu cara untuk mempercepat Booting Screen, Loading2 aplikasi, dll. kita bisa memanfaatkan program Notepad… anda Copy Paste Saja Script dibawah ini.. Save dengan extention Vbs


1. Mempercepat Loading Aplikasi

dim firman
masuk()
sub masuk()
set firman = wscript.CreateObject(”wscript.shell”)
keterangan = “Masukkan nilai delay yang Pengen kamu masuKin:” & vbcrlf &_
“JangkauAn Angka: 100 sampai 20000 Tidak BoLeh Lebih apalagi Kurang” & vbcrlf &_
“[BagusNya Sih:0 Byar Lbih CepEt]” & vbcrlf & vbcrlf &_
“** Buatan Anak manusia Bukan anak Setan…He,,he,,LP3I Metos **”

tanya = inputbox(keterangan,”Percepat Windows” )
if tanya=”" then
msgbox “lo masukin Dulu Waktunya”
else
firman.RegWrite “HKEY_CURRENT_USER\Control Panel\Desktop\WaitToKillAppTimeout”,tanya,”REG_SZ”
msgbox “Delay dah di Ubah, coba ja di Test”,vbInformation,”Percepat windows”
end if
end sub

2. Mempercepat Control 1

dim firman
masuk()
sub masuk()
set firman = wscript.CreateObject(”wscript.shell”)
keterangan = “Masukkan nilai delay yang Pengen kamu masuKin:” & vbcrlf &_
“JangkauAn Angka: 100 sampai 20000 Tidak BoLeh Lebih apalagi Kurang” & vbcrlf &_
“[Lbih Kecil,Lbih CepEt KeluAr]” & vbcrlf & vbcrlf &_
“** Copy Right :firman_1989@yahoo.co.id **”

tanya = inputbox(keterangan,”Percepat Windows”,20000)

firman.RegWrite “HKEY_LOCAL_MACHINE\SYSTEM\ControlSet001\Control\WaitToKillServiceTimeout”,tanya,”REG_SZ”
msgbox “Beres dah, Tinggal Lo Test”,vbInformation,”Percepat windows”
end sub


3.
Mempercepat Control 2

dim firman
masuk()
sub masuk()
set firman = wscript.CreateObject(”wscript.shell”)
keterangan = “Masukkan nilai delay yang Pengen kamu masuKin:” & vbcrlf &_
“JangkauAn Angka: 100 sampai 20000 Tidak BoLeh Lebih apalagi Kurang” & vbcrlf &_
“[Lbih Kecil,Lbih CepEt KeluAr]” & vbcrlf & vbcrlf &_
“** Copy Right :firman_1989@yahoo.co.id **”

tanya = inputbox(keterangan,”Percepat Windows”,20000)

firman.RegWrite “HKEY_LOCAL_MACHINE\SYSTEM\ControlSet002\Control\WaitToKillServiceTimeout”,tanya,”REG_SZ”
msgbox “Registry Lo dah Ke RubAh,, Lo Test NdiRi”,vbInformation,”Percepat windows”
end sub

3. Mempercepat Delay

dim firman
masuk()
sub masuk()
set firman = wscript.CreateObject(”wscript.shell”)
keterangan = “Masukkan nilai delay yang Pengen kamu masuKin:” & vbcrlf &_
“JangkauAn Angka: 0 sampai 400 Tidak BoLeh Lebih apalagi Kurang” & vbcrlf &_
“[BagusNya Sih:0 Byar Lbih CepEt]” & vbcrlf & vbcrlf &_
“** Buatan Anak manusia Bukan anak Setan…He,,he,, **”

tanya = inputbox(keterangan,”Percepat Windows”,5)
firman.RegWrite “HKEY_CURRENT_USER\Control Panel\Desktop\MenuShowDelay”,tanya,”REG_SZ”
msgbox “Delay dah di Ubah, coba ja di Test”,vbInformation,”Percepat windows”
end sub

Keterangan:

Cpetin Aplikasi = BWat Ktika lo buka program aplikasi byar lebih cpEt,, Aplikasi2 yg ga penting ga perlu ke Buka NglAmain Loading Doangan.
Cpetin Delay = Bawaan dari sononYa Wktu delay a/ 400, Cape deh NunggunyA,,, MendingaN lo CPetiN Okey……
CpetinControL1 = ni dia yang paling bikin KeseL ktika Lo main Komputer dari sonoNya aja 20000 , (artinya bukan 20000 menit tapi 20000 Mili-mili-mili Detik. tapi tetep ja lebih Cepet Lebih Enak Okey…
CpetinControlke2= Sma ma yang di atasnya, Gw ga tau kLw spesipikasi FungsiNya,,, Tapi intinya Cuma bikin Kesel nungGu Doang…..
Sekian Dulu Yach Triknya

Selasa, 27 Januari 2009

Tips Membuat Aplikasi Ramalan

Banyak aplikasi2 ramalan yang di tawarkan di internet, pada kali ini penulis akan membuat aplikasi ramalam menggunakan Notepad dengan extention vbs… Pada Msg Box Anda bisa ganti sesuka hati anda, Langsung aja deh… Copy Paste Aja Script di bawah ini
Baca Selanjutnya
dim Firman
masuk()
sub masuk()
set Firman = wscript.CreateObject(”wscript.shell”)
keterangan = “Masukan Angka Favourite anda…???:” & vbcrlf &_
“[0].Zero [3].Three [6].Six” & vbcrlf &_
“[1].One [4].Four [7].Seven” & vbcrlf &_
“[2].Two [5].Five [8].Eight [9].Nine ” & vbcrlf & vbcrlf &_
“[Firman_1989@yahoo.co.id]“
tanya = inputbox(keterangan,”Ramalan”,0)

if tanya=0 then
msgbox “Anda termasuk orang yang pintar”,vbInformation,”Ramalan”
else
if tanya=1 then
msgbox “Anda suka makan”, vbinformation, “Ramalan”
else
if tanya=2 then
msgbox “Kamu Boros Ya”,vbInformation,”Ramalan”
else
if tanya=3 then
msgbox “Menurut ramalan, anda salah satu keturunan Raja”, vbInformation,”Ramalan”
else
if tanya=4 then
msgbox “Ok”, vbinformation, “Ramalan”
else
if tanya= 5 then
msgbox “Sip”, vbinformation, “Ramalan”
else
if tanya= 6 then
msgbox “Kronjo, vbinformation, “Ramalan”
else
if tanya= 7 then
msgbox “Oke”, vbinformation, “Ramalan”
else
if tanya= 8 then
msgbox “Kamu Ok”, vbinformation, “Ramalan”
else
if tanya= 9 then
msgbox “Anda belum beruntung”, vbinformation, “Ramalan”
else
msgbox “Masukkan angka 0 s/d 9!”,vbInformation,”Ramalan”
masuk()
end if
end if
end if
end if
end if
end if
end if
end if
end if
end if
end sub