منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

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

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

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

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

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

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

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

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

صراحة لم اجرب سابقآ قرائة نص من ملف مضغوط لكن اعتقد الفئة 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)

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

السلام عليكم

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 ويكون في موضوع منفصل ..

السلام عليكم

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

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

موقع المكتبة

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

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

موقع المكتبة

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

--

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

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

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