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

نسخة كاملة : إضافة مسار لمستند الوورد للوصول إليه بشكل أسرع
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
السلام عليكم

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

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

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

يمكنك استغلال الخاصية 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
(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 للمشروع
أنت تحتاج الي Genric Dictinary (Of Integer, String و تضيف له اسم الملف شاملا فهرس الملف و تحسب Hashcode الخاص ب stream الملف و تضيفه علي هيئة Integer إلي Generic Dictionary وهذا سيؤدي الي سهولة التعامل مع الملفات من حيث الحذف او عرضها
(10-11-16, 10:06 PM)silverlight كتب : [ -> ]أنت تحتاج الي Genric Dictinary (Of Integer, String  و تضيف له اسم الملف شاملا فهرس الملف و تحسب Hashcode الخاص ب  stream الملف و تضيفه علي هيئة Integer إلي Generic Dictionary وهذا سيؤدي الي سهولة التعامل مع الملفات من حيث الحذف او عرضها

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