[عبد العزيز البسكري]

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

روعة من روائع أعمالك أخي و استاذي الغالي " ELGOKR " ..

بارك الله فيك و لك و جزاك خير الجزاء و زادك من علمه و فضله و نفع بك الاسلام و المسلمين بكل مكان

متابع معكم بإذن الله .. للصغيرة قبل الكبيرة .. رغم أنّ كل إنجازاتك عظيمة بعالم البرمجة

وفّقك الله و سدّد خطاك

تحياتي و تقييماتي

[sendbad100]

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

الله يعطيك الصحة والعافية

ويبارك لك في علمك  عمرك ومالك 

+1

5نجوم

[elgokr]

(18-06-19, 10:44 PM)asemshahen5 كتب : لا فقط معرفة المكتبات و الادوات المرتبطة في اي برنامج تنفيذي سواء كان معمول بلغة الدوت نت او غيرها  .

شوف عليك فهم الفكرة اولاً حتى تستوعب الاجابة

تخيل كده ملف RAR و ZIP يحتوى على 3 ملفات مضغوط كل واحد بداخل الثاني

تخيل هل يمكنك الوصول الى الثالث مباشراً دون فتح الاول والثاني لعرض الثالث

لا اقصد استخراج الملفات حتى تصل للثالث اقصد من حيث العرض

طبعاً لا لكي تتمكن من عرض يجب فتح الاول ومن ثم فتح الثاني ومن ثم فتح الثالث لكي تعرض ما بداخله

الامر هنا ينطبق على سؤالك لكي تتمكن من عمل ما تشير اليه

يجب ان تقوم بعمل حلفة وظيفتها استجراج الملف الذى بداخل الملف 

مثلاً الى temp كما يفعل الـ rar و zip

حتى يتم استدعائه وعرض ما بداخله

وتذكر انت تتحدث على جميع البرامج واى نوع اللغة

فهنا انت محتاج تهيئ بيئة تقوم بالوظيفة طبقاً لكل لغة

فالـ .net يختلف عن الـ java يختلف عن c , c++ وما غيرها

فاجابتي على سؤالك نعم يمكنك اذا هيئت الكود يكون السناريو الخاص به مثل WinRar

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

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

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

تحياتى لك

وتمنياتى لك التوفيق

(19-06-19, 12:27 AM)عبد العزيز البسكري كتب :

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

روعة من روائع أعمالك أخي و استاذي الغالي " ELGOKR " ..

بارك الله فيك و لك و جزاك خير الجزاء و زادك من علمه و فضله و نفع بك الاسلام و المسلمين بكل مكان

متابع معكم بإذن الله .. للصغيرة قبل الكبيرة .. رغم أنّ كل إنجازاتك عظيمة بعالم البرمجة

وفّقك الله و سدّد خطاك

تحياتي و تقييماتي

هذا من ما عندكم اخى عبد العزيز البسكري

فبارك الله لنا جميعاً يارب ووفقنا على كل خيراً فى الحياه الدنيا

تحياتى لك

وتمنياتى لك التوفيق

(19-06-19, 07:26 AM)sendbad100 كتب :

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

الله يعطيك الصحة والعافية

ويبارك لك في علمك  عمرك ومالك 

+1

5نجوم

مرحباً اخى sendbad100

لى ولك وللجميع يارب

تحياتى لك

وتمنياتى لك التوفيق

[asemshahen5]

انت لم تفهم قصدي من السؤال عند تشغيل اي برنامج تحزيم :

1 - أول ما يقوم به يجلب لك كل المكتبات و الادوات المرتبطة بالبرنامج و يضعها بمجلد المشروع هذا ما أسأل عنه عندي كود قريب لهاذا لكن عيبه الوحيد انه يجلب الملفات المرتبطة بالمشروع المشغل اريد تعديله ليجلب لي الملفات المرتبطة باي ملف تنفيذي .
اعمل فورم فارغ و ضع به زر و ريتش تكست بوكس و ضع هذا الكود به و جربه تفهم قصدي :

PHP كود :

Private Sub BtnLoad_Click(sender As Object, e As EventArgs) Handles BtnLoad.Click
        RichTextBox1.Text = ""
        For Each Strd As Assembly In My.Application.Info.LoadedAssemblies
            RichTextBox1.Text += Strd.CodeBase.ToString & vbNewLine
        Next
    End Sub 


[elgokr]

بخصوص الكود المذكور كل ما عليك استخدامه بهذا الشكل

كود :

       RichTextBox1.Clear()
       Dim NFolder As String = Nothing
       For Each Strd As Reflection.Assembly In My.Application.Info.LoadedAssemblies
           If Strd.CodeBase.ToString.Contains(".exe") Then NFolder = Strd.CodeBase.Split("/")(Strd.CodeBase.ToString.Split("/").Count - 2).ToString()
           If NFolder IsNot Nothing Then
               If Strd.CodeBase.ToString.Contains(NFolder) Then
                   NFolder = Strd.CodeBase.Split("/")(Strd.CodeBase.ToString.Split("/").Count - 2).ToString()
                   RichTextBox1.Text += Strd.CodeBase.Split("/").Last.Trim & vbNewLine
               End If
           End If
       Next

ليقوم بعرض الملفات الموجودة بجوار البرنامج

وكذلك سيقوم بعرض اسم الملف والامتداد فقط وليس المسار كاملاً 

مثال:

PHP كود :

program.exe 


الكود التالى

كود :

       RichTextBox1.Clear()
       Dim NFolder As String = Nothing
       For Each Strd As Reflection.Assembly In My.Application.Info.LoadedAssemblies
           If Strd.CodeBase.ToString.Contains(".exe") Then NFolder = Strd.CodeBase.Split("/")(Strd.CodeBase.ToString.Split("/").Count - 2).ToString()
           If NFolder IsNot Nothing Then
               If Strd.CodeBase.ToString.Contains(NFolder) Then
                   NFolder = Strd.CodeBase.Split("/")(Strd.CodeBase.ToString.Split("/").Count - 2).ToString()
                   RichTextBox1.Text += Strd.CodeBase.Replace("file:///", Nothing).Trim & vbNewLine
               End If
           End If
       Next

سيقوم بعرض المسار كاملاً لكل ملف بدون وجود file:///

طبعاً تجنباً الى اى ملف خارج مجلد البرنامج

فاتمنا ان يكون هذا ما تشير اليه

تحياتى لك

وتمنياتى لك التوفيق

[asemshahen5]

تقريبا اذا كان البرنامج معمول بالدوت نت و لكن اذا كان ملف exe معمول باي لغة كانت فما الكود الذي سيجلب الملفات المرتبطة به اي كبرنامج installshield أو برنامج 

advanced installer .

تقريبا نجحت بالكود لكن بقي جلب مكان و امتداد الملف المرتبط .


   

[elgokr]

اتمنى ان يكون النقاش بهذا الموضوع فى موضوع مخصص له

حتى لا يخرج محور الموضوع هنا عن خارج الاطار للدورة

كذلك اتمنى توضيح اكثر لما تقصده بردك الاخير

لان لم تضح الصورة لى حتى الان

تحياتى لك

وتمنياتى لك التوفيق

[asemshahen5]

لقد وضعت موضوع بقسم الاسئلة لكي لا يخرج الموضوع عن اطار الدورة :

http://vb4arb.com/vb/showthread.php?tid=29918

انا عندي مشروع قديم ابتديته من 2011 كنت اعمل به سيت اب لبرامجي اما الان افكر في تطويره ليكون كاي برنامج تحزيم و وقف البرنامج على أمرين :

1- جلب الملفات المرتبطة بالملف التنفيذي كا المكتبات الديناميكية الخاصة بالبرنامج و مكتبات الأدوات المرتبطة به .

2- قاعدة بيانات صغيرة تكون مع البرنامج الرئيسي يخزن فيها معلومات الشركة و النوافذ التي تم اختيارها و الرقم السري إن وجد و ما الى ذلك ففكرت بـ : sqlite و وجدت بها 

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

و مشكور مجددا .......

[elgokr]

لا عليك اخى الغالى asemshahen5

كل ما انت ذكره سيتم شرحه فى هذه الدورة

وكيفية استفادة كل جزء من قواعد بيانات من تسجيلات

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

وكيف تخطى اى برنامج له شاشة تسجيل دخول لدي صاحب البرنامج ( المبرمج )

وغيرها كثيراً الدورة ستطول لدرجة ان كل شاشة يتم شرحها بعد تخطى المرحلة البدائية

سيتم كاعادة الشرح عليها بمراحل متقدمة  والدخول فى تفاصيل اكثر مما تتخيل بامر الله

تحياتى لك

وتمنياتى لك التوفيق

[asemshahen5]

مشكور جدا على ماتقدمه و الله الموفق منتظرين الجزء الثالث من الدورة ان شاء الله .