تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] طلب كود (فتح ملفات PDF)
#1
Shocked 
السلام عليكم
1- هل يمكن إضافة ملفات pdf إلى روسورس البرنامج و عرضها على الفورم من خلال Abode Pdf Reader من خلال ربطها باداة Listebox
2- هل هناك اشكال في العرض من Ressources
الرد
تم الشكر بواسطة:
#2
السلام عليكم ورحمة الله وبركاته
اخي الكريم
اي ملف تضيفه على الريسورس يزيد م حجم ملف التشغبل ويلتهم الداكرة 
لذلك ينصح بوضع هكذا ملفات في قاعدة البيانات او يوضع مسار الملف في قاعدة البيانات
اعمل الخير واجرك لاتنتظره فالله خير من اليك يرده
البرمجة ليست مجرد كود بل هي منهج تفكير منطقي لحل المشكلات







الرد
تم الشكر بواسطة:
#3
(29-05-20, 12:52 AM)ابراهيم ايبو كتب :
السلام عليكم ورحمة الله وبركاته
اخي الكريم
اي ملف تضيفه على الريسورس يزيد م حجم ملف التشغبل ويلتهم الداكرة 
لذلك ينصح بوضع هكذا ملفات في قاعدة البيانات او يوضع مسار الملف في قاعدة البيانات

شكرا اخي على التنبيه
هي ملفات صغيرة الحجم لن يتعدى مجموعها 10 ميقا
ممكن الاكواد المستعملة لاستدعاء الملف
الرد
تم الشكر بواسطة: ابراهيم ايبو
#4
السلام عليكم ورحمة الله وبركاته
اخي الكريم ضع ملف pdf  في Resources هنا الملف اسمه  "test1.pdf" غير الاسم حسب اسم الملف الذي عنك
استدعي المكتبة
كود :
Imports System.IO

ثم في زر بوتون الكود التالي
كود :
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
       Dim kk As Byte() = My.Resources.test1
       Using tmp As New FileStream("test1.pdf", FileMode.Create)
           tmp.Write(kk, 0, kk.Length)
       End Using
       Process.Start("test1.pdf")
   End Sub
اعمل الخير واجرك لاتنتظره فالله خير من اليك يرده
البرمجة ليست مجرد كود بل هي منهج تفكير منطقي لحل المشكلات







الرد
تم الشكر بواسطة: paveldida
#5
(29-05-20, 10:56 AM)ابراهيم ايبو كتب : السلام عليكم ورحمة الله وبركاته
اخي الكريم ضع ملف pdf  في Resources هنا الملف اسمه  "test1.pdf" غير الاسم حسب اسم الملف الذي عنك
استدعي المكتبة
كود :
Imports System.IO

ثم في زر بوتون الكود التالي
كود :
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
       Dim kk As Byte() = My.Resources.test1
       Using tmp As New FileStream("test1.pdf", FileMode.Create)
           tmp.Write(kk, 0, kk.Length)
       End Using
       Process.Start("test1.pdf")
   End Sub
شكرا أخي ابراهيم على كل ما تقدموه لنا من دعم
- ممكن تعديل الكود أنا عندي أكثر من ملف pdf على listbox ممكن تعديل الكود باستعمال الجملة الشرطية
If ListBox2.Text = "القانون المدني" Then
            Process.Start("Civ.pdf")
        ElseIf ListBox2.Text = "القانون التجاري" Then
            Process.Start("Com.pdf")
        ElseIf ListBox2.Text = "قانون الأسرة" Then
            Process.Start("Fam.pdf")
        End If
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  منع الوصول الى ملفات برنامجي alshandodi 4 157 30-06-20, 05:25 PM
آخر رد: alshandodi
  [سؤال] تشفير ملفات yasob 1 115 24-05-20, 01:40 PM
آخر رد: سعود
  ممكن شرح ايه هو ملفات ال xml منه 1 107 20-05-20, 12:17 AM
آخر رد: boudyonline
  [سؤال] تشفير ملفات ال html yasob 0 104 09-05-20, 06:48 PM
آخر رد: yasob
  برنامج دمج ملفات المشروع في ملف تنفيذي واحد ابو محمد محمد محمد 4 237 03-05-20, 04:23 AM
آخر رد: ابو محمد محمد محمد
  كيفية قراءة ملفات كقاعدة. بيانات أمجد وضاح 2 168 02-05-20, 08:49 PM
آخر رد: أمجد وضاح
  طريقة تقسيم مابدخل اليسة بوكس علي مجموعات ملفات Ali Edal 2022 0 109 20-04-20, 05:24 PM
آخر رد: Ali Edal 2022
  [VB.NET] فتح ملفات Doc, Pdf من داخل البرنامج tahaayyoub 4 299 30-03-20, 02:38 AM
آخر رد: ابراهيم ايبو
  [سؤال] محتاج ضروري لو سمحتم كود عمل نسخه احتياطيه من ملفات usb Ali09765 3 265 11-03-20, 03:09 AM
آخر رد: سعود
  [سؤال] ما هي طريقة وضع ملفات ال dll الخاصة بالبرنامج داخل مجلد princelovelorn 4 512 18-11-19, 08:45 AM
آخر رد: princelovelorn

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


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