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

**غريب يا فؤادي غريب يا فؤادي** · 28-01-2020, 11:06 PM

توصلت لعمل البرنامج
شكرا لكم

عبد الهادي بهاب · 28-01-2020, 11:42 PM

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

السلام عليكم

من فضلكم احتاج ملف مفتوح او كود
لعمل برنامج ضغط بالاوتوبلي

7

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

قي زر الضغط ضع الكود التالي

كود PHP:


archive_files = Dialog.FolderBrowse("Files to Add", _DesktopFolder);

if (archive_files ~= "CANCEL") and (archive_files ~= "") then

   StatusDlg.Show();

  found = File.Find(archive_files, "*.*", true, false);

    if (found) then

    Zip.Add(_DesktopFolder.."\\NewArchive.zip",found, true, "", 5, nil, false);

    StatusDlg.Hide();

    File.ExploreFolder(_DesktopFolder, SW_SHOWNORMAL);

    end

end

امافي زر فك الضغط ضع الكود

كود PHP:


   result = Dialog.FileBrowse(true, "Load File", _DesktopFolder, "Microsoft Word Document (*.*)|*.*|All Files (*.*)|*.*|", "", "", false, true);



-- If CANCEL was not chosen, then let's get the file path

if (result[1] ~= "CANCEL") then

Distination = Dialog.FolderBrowse("Please select a folder:", _DesktopFolder);



 StatusDlg.Show();

 Zip.Extract(result[1], {"*.*"}, Distination, true, true, "", 3, nil);

 StatusDlg.Hide();

end

بالتوفيق

عبد الهادي بهاب · 28-01-2020, 11:43 PM

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

توصلت لعمل البرنامج
شكرا لكم

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

جميل شاركنا الحل

**غريب يا فؤادي غريب يا فؤادي** · 28-01-2020, 11:52 PM

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

7

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

قي زر الضغط ضع الكود التالي

كود PHP:


archive_files = dialog.folderbrowse("files to add", _desktopfolder);

if (archive_files ~= "cancel") and (archive_files ~= "") then

   statusdlg.show();

  found = file.find(archive_files, "*.*", true, false);

    if (found) then

    zip.add(_desktopfolder.."\\newarchive.zip",found, true, "", 5, nil, false);

    statusdlg.hide();

    file.explorefolder(_desktopfolder, sw_shownormal);

    end

end

امافي زر فك الضغط ضع الكود

كود PHP:


   result = dialog.filebrowse(true, "load file", _desktopfolder, "microsoft word document (*.*)|*.*|all files (*.*)|*.*|", "", "", false, true);



-- if cancel was not chosen, then let's get the file path

if (result[1] ~= "cancel") then

distination = dialog.folderbrowse("please select a folder:", _desktopfolder);



 statusdlg.show();

 zip.extract(result[1], {"*.*"}, distination, true, true, "", 3, nil);

 statusdlg.hide();

end

بالتوفيق

الله يجازيك الخير ما قصرت
مشروعك افضل من اللي انا عملته
شكرا لك

ولي طلب ثاني منك ان امكن
اطلبه بموضوع اخر

عبد الهادي بهاب · 28-01-2020, 11:52 PM

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

ملفات ممكن تستفيد منها

https://top4top.io/downloadf-14884gnnw1-rar.html

عبد الهادي بهاب · 28-01-2020, 11:53 PM

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

الله يجازيك الخير ما قصرت
مشروعك افضل من اللي انا عملته
شكرا لك

ولي طلب ثاني منك ان امكن
اطلبه بموضوع اخر

الحمد لله
تفضل ان كان بالامكان لن نبخل

**غريب يا فؤادي غريب يا فؤادي** · 28-01-2020, 11:57 PM

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

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

ملفات ممكن تستفيد منها

https://top4top.io/downloadf-14884gnnw1-rar.html

جزاك الله خيرا
تم التحميل

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

طلب ملف مفتوح لبرنامج ضغط الملفات وفك الضغط

طلب ملف مفتوح لبرنامج ضغط الملفات وفك الضغط

تعليق

تعليق

تعليق

تعليق

تعليق

تعليق

تعليق

مواضيع تهمك