اذهب الي المحتوي
أوفيسنا

الملف القاتل (ملف يحوي كود لحذف أي ملف تحدده)


الردود الموصى بها

السلام عليكم ورحمة الله وبركاته

إخواني الكرام ..

أقدم لكم اليوم (الملف القاتل .. Killer File) ..

حلو العنوان وجذاب ، بيفكرني بالحوت القاتل .. Killer Whale

 

الآن أصبح بمقدورك استئجار ملف للتخلص من ملف آخر .. الملف القاتل سيقتل الضحية في هدوووووووووووء وبدون إزعاج ، لأنه سيستخدم الكود الصامت ..

 

معنا اليوم مصنف يحوي كود ، يمكنك من خلال الكود كتابة اسم الملف الضحية (الملف المراد حذفه) ، ولا تنسى أن تحدد هوية الضحية من خلال كتابة الامتداد أيضاً ..حتى تساعد الملف القاتل على إنجاز المهمة بشكل صحيح .. :angry:

في الملف المرفق : الملف القاتل اسمه Killer File ، والملف الضحية اسمه FileToBeKilled

وأترككم الآن بعد فك الضغط مشاهدة حادثة القتل العمد ..

كان معكم مصمم الملف القاتل أبو البراء (وربنا يكفينا شر القتل)

:blink: :blink: :blink:

Killer File.rar

  • Like 3
رابط هذا التعليق
شارك

اخى الكريم

انت مالكش حل - بجد بجد فنبلة 

رينا يكرمك اخى ياسر على هذة الادوات الجميلة التى تساعد على القتل فى هدوء

  • Like 1
رابط هذا التعليق
شارك

يعني لازم نثيرك يا أستاذ ياسر علشان تطلع الحاجات الحلوة دي شكلنا كدا هنستغلك في حاجات كتيرررررررررر جاري تجربة القاتل خلي بالك لو اتمسك القاتل هيكون هيحكم عليه بالقصاص لان القتل عمدا مع سابق الاصرار بس لو اتمسكتوا أنا مقلتش حاجة واوعى تبلغ عني

رابط هذا التعليق
شارك

مشكور إخواني الكرام على مروركم العطر ..

الأخ حسام ..خلي بالك القنابل ممنوعة في المنتدى ، لأن المنتدى سلمي ، فممكن يمنعوني من المنتدى لو عرفوا إني قنبلة ... مشكور على كلامك الطيب أخي حسام ميلكان

الأخ الجديد المجتهد خالد عمر .. بارك الله فيك ، ونحن سنكون بانتظار ظهور نجمك عما قريب إن شاء الله ...

الأخ أبو إيمان ..تسلم على مرورك العطر ، وفي انتظار الكود اللي هيعجبنا إن شاء الله ، عايزين كود مضاد للكود اللي اتعمل .. يعني عايزين مثلا الملف الضحية يكون لابس واقي ضد الرصاص !! فكرة مش كدا

الأخ ياسر فتحي البنا ..مشكور على كلماتك الرقيقة وشعورك الطيب تجاهي

تقبلوا تحياتي

رابط هذا التعليق
شارك

مش حرام تقتل ملف صغير  كان عملك حاجة ؟!

 

بلاغ فى أبوالبراء الى سيادة الاكسل العام  من النت مباشرةً

هذا اعتراف رسمى منه

============

فكرة أفضل من قتل الملف احنا نمسّكه السلك عريان ونحذفه الى سلة المهملات

ممكن نحتاجه فى يوم  والملف الأسود ينفع فى اليوم الأبيض

واذا قررنا اعدامه خالص نعمله كود 106 ونفرغه من السلة

فيه أكتر من كده بهدله للملف

 

تحياتى للقاتل

:fff:  :fff:  :fff: 

تم تعديل بواسطه مختار حسين محمود
  • Like 1
رابط هذا التعليق
شارك

بلاش الصعايدة يعرفوا بالموضوع ، عشان إنت عارف ممكن يطاردوني عشان ياخدوا الطار ..

مشكور مرورك الكريم أخي الحبيب الغالي مختار ..

تحياتي لك بالليل والنهار ..

وادعي معايا وقول يا رب استر يا ستار ..

ونصيحة مني بلاش تفشي الأسرار ..

  • Like 1
رابط هذا التعليق
شارك

الأخ الفاضل أكرم

بعد دخول محرر الأكواد Alt + F11 ستجد الكود


Sub KillSpecificFile()
    'اكتب اسم الملف المراد حذفه بالامتداد
    KillProperly (ThisWorkbook.Path & "/FileToBeKilled.xlsx")
End Sub

اسم الملف FileToBeKilled استبدله باسم الملف الذي تريد حذفه ، ولا تنسى أن يكون اسم الملف مصحوب بالامتداد

تم تعديل بواسطه YasserKhalil
رابط هذا التعليق
شارك

جدو الغالي ..مشكور على مرورك العطر يا كبير

وشكرا على الصقفة الجامدة دي ...

تقبل تحياتي يا غالي .. وفي انتظار تجربتك للملف وإبداء أية إضافات ... بس الدور عليك تضيف إنت عليه :yes:

رابط هذا التعليق
شارك

استاذ ياسر 

رفض هذا القاتل القيام بإغتيال ملف صوره رغم توفير الامتداد ( هل هو معني بملفات الاكسيل فقط )

برجاء عمل اللازم ، وإفادتنا بما تم

نشكركم سلفا

رابط هذا التعليق
شارك

جدو الحبيب شغال مع أي ملف ..بس متنساش تحدد هوية الضحية

جرب الملف التالي ..ملف صورة بامتداد JPG ..أنا جربته وشغال

Kill JPG.rar

  • Like 1
رابط هذا التعليق
شارك

جرب هذا الكود لحذف جميع الامتدادات txt في نفس مسار المصنف

Public Sub KillProperly(Killfile As String)
    If Len(Dir$(Killfile)) > 0 Then
        Kill Killfile
    End If
End Sub

Sub KillSpecificFile()
    'اكتب اسم الملف المراد حذفه بالامتداد
    KillProperly (ThisWorkbook.Path & "/*.txt")
End Sub

رابط هذا التعليق
شارك

  • 10 months later...

الإخوة الأحبة السلام عليكم

دائماً يحمل هذا المنتدي كل شيء مفيد وجميل، ولكن لي طلب صغير بمناسبة خذف الملفات

هل يمكن حذف الملف المفتوح بعد فتحه بمدة  10 دقائق مثلاً ؟

تقبلوا تحياتي

رابط هذا التعليق
شارك

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information