إعـــــــلان

**Haitham.2012 Haitham.2012** · 25-04-2016, 11:03 AM

لم تحل هذه المشكله بالفعل .. لكن ارى انها ليست مشكله كبيره .. استخدم كود التحقق من وجود الملف وانتهى الأمر :)

**علي قد حالي علي قد حالي** · 25-04-2016, 11:53 AM

المشاركة الأصلية بواسطة Haitham.2012 مشاهدة المشاركة

لم تحل هذه المشكله بالفعل .. لكن ارى انها ليست مشكله كبيره .. استخدم كود التحقق من وجود الملف وانتهى الأمر :)

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

كود PHP:


      result = File.GetCRC("Autoplay\\Audio\\monshed1.txt");
if result == 65786758497 then 
Dialog.Message("Notice", "no change", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);
else
Dialog.Message("Notice", " file changed", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);
Application.Exit(0);
end

وبالنسبة لخطأ الرقم الثابت 4294967295 الذي لم يحلوا مشكلته بعد ....
فهل تتوقع ان يسبب لي اية مشاكل مستقبلا اذا استعملت الكود الذي ذكرته لك للتحقق من عدم حذف او تعديل الملف monshed1.txt ؟

جزاك الله خيرا أخي هيثم و رزقك الفردوس

**Haitham.2012 Haitham.2012** · 25-04-2016, 02:33 PM

هذا كود مختصر وجيد لطلبك ..

كود:

if File.DoesExist(_SourceFolder .. "\\Autoplay\\Audio\\monshed1.txt") == false or File.GetCRC(_SourceFolder .. "\\Autoplay\\Audio\\monshed1.txt") ~= "111" then

Dialog.Message("Notice", "الملف مفقود أو تم تغييره", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);

Window.Close(Application.GetWndHandle(), CLOSEWND_TERMINATE);

end

ملاحظه

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

**عبود عبود عبود عبود** · 25-04-2016, 02:43 PM

كود:

--
d = File.DoesExist("Autoplay\\Audio\\monshed1.txt");
if d~=false then
    result = File.GetCRC("Autoplay\\Audio\\monshed1.txt");
    if result == 65786758497 then 
        Dialog.Message("Notice", "no change", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);
      else
        Dialog.Message("Notice", " file changed", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);
    end
   else
     Application.Exit(0);   --  or Application.ExitScript(); 
end

**علي قد حالي علي قد حالي** · 25-04-2016, 04:48 PM

المشاركة الأصلية بواسطة Haitham.2012 مشاهدة المشاركة

هذا كود مختصر وجيد لطلبك ..

كود:

if File.DoesExist(_SourceFolder .. "\\Autoplay\\Audio\\monshed1.txt") == false or File.GetCRC(_SourceFolder .. "\\Autoplay\\Audio\\monshed1.txt") ~= "111" then

Dialog.Message("Notice", "الملف مفقود أو تم تغييره", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);

Window.Close(Application.GetWndHandle(), CLOSEWND_TERMINATE);

end

ملاحظه

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

مرحبا أخي الحبيب هيثم

كود جميل ومختصر فعلا

... شكرا لك أخي

جزاك الله خيرا ورزقك الفردوس

**علي قد حالي علي قد حالي** · 25-04-2016, 04:51 PM

المشاركة الأصلية بواسطة عبود عبود مشاهدة المشاركة

كود:

--
d = File.DoesExist("Autoplay\\Audio\\monshed1.txt");
if d~=false then
    result = File.GetCRC("Autoplay\\Audio\\monshed1.txt");
    if result == 65786758497 then 
        Dialog.Message("Notice", "no change", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);
      else
        Dialog.Message("Notice", " file changed", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);
    end
   else
     Application.Exit(0);   --  or Application.ExitScript(); 
end

أهلا بك أخي الحبيب عبود

... أفدتني و نورت الموضوع

شكرا للتكويد المفيد و للمرور العطر ... جزاك ربي الجنة والفردوس

إعـــــــلان

هذا الرقم الثابت 4294967295 يظهر مع كود بصمة الملف إذا لم يكن الملف موجودا ... فهل يظهر معكم ايضا ؟0

هذا الرقم الثابت 4294967295 يظهر مع كود بصمة الملف إذا لم يكن الملف موجودا ... فهل يظهر معكم ايضا ؟0

تعليق

تعليق

تعليق

تعليق

تعليق

تعليق

مواضيع تهمك