تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
إضافة مسار لمستند الوورد للوصول إليه بشكل أسرع
#1
السلام عليكم

لدي عدة مستندات وورد ، اريد أن اعمل لها اختصار في برنامجي بحيث يسهل علي الوصول إليها

المطلوب كتابة الكود للوصول إلى المسار وثم حفظة في زر (RadioButton) و لكم التقدير و العرفان

المشروع في المرفقات


الملفات المرفقة
.rar   Visul 4 arab.rar (الحجم : 80.37 ك ب / التحميلات : 36)
الرد }}}
تم الشكر بواسطة:
#2
وعليكم السلام

يمكنك استغلال الخاصية Tag لوضغ المسار بها

استفد من هذا الكود
كود :
Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
    Using open As New OpenFileDialog With {.Filter = "‫Microsoft Word Document‬ ‎(*.docx)‎|*.docx"}
        If open.ShowDialog = Windows.Forms.DialogResult.OK Then

            Dim title As String = IO.Path.GetFileNameWithoutExtension(open.FileName)
            Dim path As String = open.FileName

            MsgBox(title)
            MsgBox(path)

        End If
    End Using
End Sub
الرد }}}
تم الشكر بواسطة:
#3
(10-11-16, 04:59 PM)ممدوح كتب : وعليكم السلام

يمكنك استغلال الخاصية Tag لوضغ المسار بها

استفد من هذا الكود
كود :
Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
   Using open As New OpenFileDialog With {.Filter = "‫Microsoft Word Document‬ ‎(*.docx)‎|*.docx"}
       If open.ShowDialog = Windows.Forms.DialogResult.OK Then

           Dim title As String = IO.Path.GetFileNameWithoutExtension(open.FileName)
           Dim path As String = open.FileName

           MsgBox(title)
           MsgBox(path)

       End If
   End Using
End Sub

ممتاز اخي ممدوح

و لكن ممكن بعد اذنك ، اريد كود لحذف المسار مستقبلاً

و إذا أمكن كود فتح لمسار الملف لنفترض أنه على Button3

أقصد عند أختيار زر .. رادوبوتين .... و الضغط على Button3 يفتح معي المستند المحدد

نسيت أضافة الـ Button3 للمشروع
الرد }}}
تم الشكر بواسطة:
#4
أنت تحتاج الي Genric Dictinary (Of Integer, String و تضيف له اسم الملف شاملا فهرس الملف و تحسب Hashcode الخاص ب stream الملف و تضيفه علي هيئة Integer إلي Generic Dictionary وهذا سيؤدي الي سهولة التعامل مع الملفات من حيث الحذف او عرضها
الرد }}}
تم الشكر بواسطة:
#5
(10-11-16, 10:06 PM)silverlight كتب : أنت تحتاج الي Genric Dictinary (Of Integer, String  و تضيف له اسم الملف شاملا فهرس الملف و تحسب Hashcode الخاص ب  stream الملف و تضيفه علي هيئة Integer إلي Generic Dictionary وهذا سيؤدي الي سهولة التعامل مع الملفات من حيث الحذف او عرضها

معليش اخي انا معلوماتي في الاكواد ضعيفة ممكن لو تكرمت تعدل على البرنامج أو تكتب لي الكود لمراجعته و نسخة على برنامجي
الرد }}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  هل يمكن جعل عناوين الهيدر بشكل عمودي مصمم هاوي 2 112 16-04-24, 03:59 AM
آخر رد: مصمم هاوي
  اريد اضافة حفظ PDF فى مسار على الهارد- مثال الاستاذ عبدالله الدوسري new_programer 0 49 13-04-24, 12:59 PM
آخر رد: new_programer
  تغيير المسار الي مسار البرنامج في تقرير ميكروسوفت atefkhalf2004 2 107 02-04-24, 05:05 PM
آخر رد: atefkhalf2004
Heart اقدم لكم هدية تصفح منتدى vb4arb.com بشكل أفضل من قبل مع ( vb4arb Code Highlighter ) عبدالله الدوسري 5 1,794 24-01-24, 10:31 PM
آخر رد: annagui
  [VB.NET] إضافة أو حذف حقل فى قاعدة بيانات باستخدام كود VB.net AmeenRashed 21 1,226 30-12-23, 03:47 PM
آخر رد: Taha Okla
  كيف يتم تعبئة قريد فيو بدون قاعدة بيانات بشكل مباشر؟ nowiglah 1 386 01-12-23, 10:57 PM
آخر رد: Taha Okla
  [سؤال] كيف نستعيد قيمة من دالة ضمن مسار مستقل justforit 2 399 21-11-23, 10:51 AM
آخر رد: justforit
Rainbow [سؤال] إضافة شريط ضبط الكتابة في أداة RichTextBox أبو خالد الشكري 0 230 29-10-23, 08:19 AM
آخر رد: أبو خالد الشكري
  ما أسرع استضافة يمكن رفع المشروع عليها ؟ hazim1 0 200 03-10-23, 08:55 AM
آخر رد: hazim1
Rainbow [كود] معرفه حجم كل المجلدات في القرص C بشكل واضح محمد مسافر 7 458 10-09-23, 01:56 AM
آخر رد: أبو خالد الشكري

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم