كيف نفك ضغط ملفات بامتداد rar أو zip ؟

اخي الكريم

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

البرنامجين winrar او winzip ..

اما طريقة فك ضغط ملفات ذات الامتداد rar :

اضغط عل الملف وقم بفتحه ثم انقرباليمين(الماوس)عل الملف داخل الملف المضغوط اين كان نوعه

سوى مجلد او غيره من الملفات واختر -> فك الى المجلد المحدد ..

اما طريقة ضغط اللفات :-

اضغط باليمين (الماوس) على الملف الذي تريد ضغطه ثم اختر -> winrar ->ثم ضغط الى rar

اتمنا ان اكون قد افدتك

اكتشفت أن المشكلة لدي في برنامج Winrar نفسه ، حيث أن النسخة التي لدي منه هي النسخة العربية - الإصدار 3.0 ، والبرنامج لا يعمل عندي .

بعدما استخدمت برنامج Winace حلت المشكلة .

وفيما يأتي الكود الذي استخدمته ، مع جزيل الشكر للرد :

Sub main()

Dim SourceDir, AimDir As String

Dim I As Integer

SourceDir = "E:\VBCOdesSite\www.freevbcode.com\code\"

AimDir = """E:\Visual Basic\Codes\"

ZFile = Dir(SourceDir & "*.zip")

I = 0

Do While ZFile <> ""

Shell "C:\Program Files\winace\winace.exe x " & _

SourceDir & ZFile & " " & AimDir & _

Mid(ZFile, 1, Len(ZFile) - 4) & "\"""

Debug.Print I, SourceDir & ZFile & " ==>> " & AimDir & _

Mid(ZFile, 1, Len(ZFile) - 4) & "\"

I = I + 1

ZFile = Dir

Loop

MsgBox "عدد الملفات المفكوكة " & I

End Sub

طيب ماذا لو حللنا طريقة ال winzip مثلا فى ضغط الملفات و عملنا برنامج لفك الضغط ؟؟؟؟؟ مستنى الرد

كلا الامرين في winzip و winrar سواء يحتاج الى استخدام وظائف من خلال ملفي WZ32.DLL (في winzip) و RarExt.dll في (winrar)

واعتقد اني قرات مثل هذا الامر في مواضيع مختلفة في المنتدى.

نعم كما توقعت, هذه نتائج البحث عن كلمة "winzip":

/index.ph...highlite=winzip

انظر الموضوع الثاني (لذا اعتقد ان هذا الموضوع خالف القواعد ولم يستخدم خيار البحث :))

الأخ/ Dahaka

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

وأرغب أن أنوه لك أنني بحثت في الأمر في المنتدى قبل أن أطرح تساؤلي ، ولم أقصد مخالفة قوانين المنتدى .

أنا لم أقصد أستخدام وظائف الملفين WZ32.DLL و rarext.dll

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

كنت أحاول أثراء الحوار و تحويله لموضوع مختلف

السلام عليكم

/index.ph...86183&hl=winrar

net_code كتب:

أنا لم أقصد أستخدام  وظائف الملفين WZ32.DLL و rarext.dll

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

كنت أحاول أثراء الحوار و تحويله لموضوع مختلف

←

شيئ من البحث يظهر أنه يمكن ذلك

يوجد حتى سورس C

هذه بعض الروابط للفائدة

http://www.codeproject.com/cpp/unzip.asp

http://www.codeproject.com/cpp/ZipUnzip.asp

http://www.codeproject.com/cpp/zip.asp

net_code كتب:

طيب ماذا لو حللنا طريقة ال winzip مثلا فى ضغط الملفات و عملنا برنامج لفك الضغط ؟؟؟؟؟ مستنى الرد

←

possible, but leads only in creating another winrar, dont you think?

أبوصهيب كتب:

الأخ/ Dahaka

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

وأرغب أن أنوه لك أنني بحثت في الأمر في المنتدى قبل أن أطرح تساؤلي ، ولم أقصد مخالفة قوانين المنتدى .

←

nvm, im just wondering what keywords did you use!