[EMAD268716]

لو سمحتم عندي برنامج البحث بالاسم مؤلف من الرقم - الاسم -  مسار الكتاب لهذا الاسم   عندما اضغط على فتح المسار يفتح لي الكتاب الخاص به من مجلد موجود ضمن debug اسمه مجلد  d لهنا لاتوجد مشكلة عندي 
اريد فقط عندما ارغب في اضافة مسار لاسم معين اضفط على بوتن اضافة مسار يفتح لي المجلد d وعندما اضفط على الكتاب الخاص به مثلا الكتاب رقم 5 يتم تنزيل مسار هذا الكتاب تلقائيا في التكست بوكس مسار الملف

[اسامه الهرماوي]

السلا عليكم...
قم بوضع هذا الكود في زر جلب المسار + اضافة اداة openfiledialog  من قائمة dialog من toolbox.

كود :

   OpenFileDialog1.ShowDialog()
       TextBox1.Text = OpenFileDialog1.FileName

[EMAD268716]

(22-09-19, 02:42 AM)اسامه الهرماوي كتب : السلا عليكم...
قم بوضع هذا الكود في زر جلب المسار + اضافة اداة openfiledialog  من قائمة dialog من toolbox.

كود :

   OpenFileDialog1.ShowDialog()
       TextBox1.Text = OpenFileDialog1.FileName

اخي الكريم شكرا لك على المساعدة قمت باضافة الكود المرسل من قبلك والادات openfpledialog
لكن المسار الذي يضهر لي طويل جدا ولايفتح من بوتن فتح الكتاب اما المسار الذي اضيفه يدويا قصير جدا  وهو 1.docx ويفتح الكتاب اعتقد بوجود خطا بكود فتح الكتاب فهو لايتناسب مع الكود الذي ارسلته لي
ارجو المساعدة

[EMAD268716]

اخي الكريم قمت بالتعديل الموجود على زر فتح المسار وجعلته
 Try

            
            Dim path As String = TextBox10.Text
            Process.Start(path)
        Catch ex As Exception
            Dim msg As String = "الملف غير موجود"
            MessageBox.Show(msg & vbNewLine & ex.Message, "معلومات")
        End Try
فاصبح يفتح لي الكتاب المطلوب
لكن عندما اضع برنامجي على كمبيوتر اخر او انقله من قرص c لمكان اخر لايفتح كون المسار تغير
كيف بقدر اجبر المسار ان يبدأ قورا من المجلد d الموجود اصلا ضمن البرنامج
ارجو المساعدة وشكرا