منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
موضوع مهم جدا جدا ( فك ضغط ملف zip ) - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : موضوع مهم جدا جدا ( فك ضغط ملف zip ) (/showthread.php?tid=10099)

الصفحات: 1 2 3 4 5


موضوع مهم جدا جدا ( فك ضغط ملف zip ) - ali.alfoly - 17-08-13

الشاكي لله كتب :تقدر تسوي ملف معطوب بسهولة

افتح الارشيف بواسطة النوت باد

واحذف لك كم حرف واحفظ

طريقة تقليدية ههههههه


ههههههه معلم والله ما خطرت لى على بال


معلش اريد مساعدة

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



موضوع مهم جدا جدا ( فك ضغط ملف zip ) - 3booody - 18-08-13

صراحة لم اجرب سابقآ قرائة نص من ملف مضغوط لكن اعتقد الفئة ZipEntry هي المختصة بها شوف هذا الكود لعرض جميع الملفات داخل ملف الـZip

كود :
Dim msg As String = ""
        Using zip As Ionic.Zip.ZipFile = Ionic.Zip.ZipFile.Read("مسار الملف")
            For Each ZE As Ionic.Zip.ZipEntry In zip
                msg &= ZE.FileName & vbNewLine
            Next
        End Using
        MsgBox(msg)



موضوع مهم جدا جدا ( فك ضغط ملف zip ) - hoob computer - 18-08-13

والله شرح روعة يا شباب ... جزاكم الله خيراً و يا ريت لو يتثبت الموضوع لفترة معينة أو يتم وضع الشرح في ملف pdf ويكون في موضوع منفصل ..



السلام عليكم


موضوع مهم جدا جدا ( فك ضغط ملف zip ) - ali.alfoly - 18-08-13

3booody كتب :صراحة لم اجرب سابقآ قرائة نص من ملف مضغوط لكن اعتقد الفئة ZipEntry هي المختصة بها شوف هذا الكود لعرض جميع الملفات داخل ملف الـZip

كود :
Dim msg As String = ""
        Using zip As Ionic.Zip.ZipFile = Ionic.Zip.ZipFile.Read("مسار الملف")
            For Each ZE As Ionic.Zip.ZipEntry In zip
                msg &= ZE.FileName & vbNewLine
            Next
        End Using
        MsgBox(msg)


شوف كده التعاون الحمد لله رب العالمين

كود :
[color=#008000]' قرءاة المحتوا واستخراج ملف معين[/color]
    [color=#0000FF]Private[/color] [color=#0000FF]Sub[/color][color=#000000] Button4_Click(sender [/color][color=#0000FF]As[/color] [color=#0000FF]Object[/color][color=#000000], e [/color][color=#0000FF]As[/color] [color=#2B91AF]EventArgs[/color][color=#000000]) [/color][color=#0000FF]Handles[/color][color=#000000] Button4.Click[/color]
        [color=#0000FF]Using[/color][color=#000000] zip [/color][color=#0000FF]As[/color][color=#000000] Ionic.Zip.[/color][color=#2B91AF]ZipFile[/color][color=#000000] = Ionic.Zip.[/color][color=#2B91AF]ZipFile[/color][color=#000000].Read([/color][color=#0000FF]Me[/color][color=#000000].TxtFile.Text)[/color]
            [color=#0000FF]For[/color] [color=#0000FF]Each[/color][color=#000000] ZE [/color][color=#0000FF]As[/color][color=#000000] Ionic.Zip.[/color][color=#2B91AF]ZipEntry[/color] [color=#0000FF]In[/color][color=#000000] zip[/color]
                [color=#0000FF]If[/color][color=#000000] ZE.FileName [/color][color=#0000FF]Like[/color] [color=#A31515]"*aaaa*"[/color] [color=#0000FF]Then[/color]
                    [color=#0000FF]Try[/color]
[color=#000000]                        ZE.ExtractWithPassword([/color][color=#0000FF]Me[/color][color=#000000].TxtSave.Text, 1, [/color][color=#A31515]"12345"[/color][color=#000000])[/color]
                    [color=#0000FF]Catch[/color][color=#000000] ex [/color][color=#0000FF]As[/color] [color=#2B91AF]Exception[/color]
[color=#000000]                        MsgBox(ex.Message)[/color]
                    [color=#0000FF]End[/color] [color=#0000FF]Try[/color]
                [color=#0000FF]End[/color] [color=#0000FF]If[/color]
            [color=#0000FF]Next[/color]
        [color=#0000FF]End[/color] [color=#0000FF]Using[/color]
    [color=#0000FF]End[/color] [color=#0000FF]Sub[/color]



hoob computer كتب :والله شرح روعة يا شباب ... جزاكم الله خيراً و يا ريت لو يتثبت الموضوع لفترة معينة أو يتم وضع الشرح في ملف pdf ويكون في موضوع منفصل ..



السلام عليكم


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


موضوع مهم جدا جدا ( فك ضغط ملف zip ) - ali.alfoly - 18-08-13

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

موقع المكتبة

ويمكنك تحميلها من هذه المشاركة[SIZE=5]
[/SIZE]#25


موضوع مهم جدا جدا ( فك ضغط ملف zip ) - الشاكي لله - 19-08-13

ali.alfoly كتب :الرجاء من الاخوة الكرام الموضوع بالنسبة لى بالغ الاهمية
اريد شرح دوال هذه المكتبة فى اسرع وقت وجزاكم الله خيرا

موقع المكتبة

ويمكنك تحميلها من هذه المشاركة[SIZE=5]
[/SIZE]#25

اخي في الله ....
"الاعتماد على النفس خير وسيلة للنجاح".


موضوع مهم جدا جدا ( فك ضغط ملف zip ) - ali.alfoly - 19-08-13

الشاكي لله كتب :اخي في الله ....
"الاعتماد على النفس خير وسيلة للنجاح".

والله اخى انا بحاول قدر ما استطيع لاكن اللغة عندى تعبانه خالص

يعنى شفت لما تعاون معى اخى
3booody وصلت لدالة مكنتش احلم بيها وهى استخراج ملف واحد من ملف مضغوط

وانا بقالى يومين مفيش شغلانه لى غيرها بس انا فى البرمجه لسه بدرى عليا ههههههه

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



موضوع مهم جدا جدا ( فك ضغط ملف zip ) - 3booody - 19-08-13

طيب اخي علي انته اكتب الاشياء يلي تحب تعرفها وتفيدك في برنامجك وان شاء الله نساعدك لان شرح كل الخصائص والدوال طويل كما تعلم


موضوع مهم جدا جدا ( فك ضغط ملف zip ) - ali.alfoly - 19-08-13

3booody كتب :طيب اخي علي انته اكتب الاشياء يلي تحب تعرفها وتفيدك في برنامجك وان شاء الله نساعدك لان شرح كل الخصائص والدوال طويل كما تعلم

اسئل الله تعالى ان يبارك فيك ويعلها فى موازين حسناتك يوم تلقاه

اريد دالة ضغط برقم سرى وضغط بدون رقم سرى

ويوجد دوال اخرى لاكن دعنا نسير خطوة خطوة



موضوع مهم جدا جدا ( فك ضغط ملف zip ) - الشاكي لله - 19-08-13

ali.alfoly كتب :
والله اخى انا بحاول قدر ما استطيع لاكن اللغة عندى تعبانه خالص

يعنى شفت لما تعاون معى اخى
3booody وصلت لدالة مكنتش احلم بيها وهى استخراج ملف واحد من ملف مضغوط

وانا بقالى يومين مفيش شغلانه لى غيرها بس انا فى البرمجه لسه بدرى عليا ههههههه

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


اللغة الانجلينزية اهم شيئ في البرمجة< على الاقل بالنسبة لي

والسبب واضح . وجود مصادر كثيرة جدا عند الانجلينز + شروحات الدوال متوفرة بالغة الانجلينزية فقط (mdsn)

لحد يجي يقول ليي عندك mdsn عربي << قاهرني هلموقع ترجمته من قوقل وماينفهم منه شي:mad: (عطوني disLike ادري مصختها ههه)

واذا حبيت تستعمل دوال win32 API ، هناك موقع اجنبي يحتوي على كل دوال API مشروحة ومعاها امثله < مستحيل تلاقي موقع مثله عربي

وهذا الموقع للإفادة http://www.pinvoke.net

--

ولهذا قلت اللغة الانجلينزية اهم شي للمبرمج



كنت اتمنى اني اساعدك ولكن مافي وقت للأسف
عندي مشروعين قيد التطوير + احضر جن هههه
اقصد اقوم حاليا بتحضير مقالتي القادمة = وقتي محدود جدااا