تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] عرض ملفات PDF فى الفورم
#1
السلام عليكم من جديد
استخدم هذا الكود لعرض ملف pdf 
كود :
AxAcroPDF1.LoadFile(Application.StartupPath & "\pdf_db\" & DataGridView1.CurrentRow.Cells(22).Value.ToString.Trim)
لكن هناك مشكلة وهي 
فى السجلات التى ليس بها ملفات pdf  يظل يعرض الملف السابق
وهذا ما اريد تعديله بحيث اذا توقفت على صف فى الـــ  DataGridView ولا يوجد به ملفات pdf  لا يعرض شي او حتى يغير الـــ   Visible   الخاص بملفات الــ  pdf  الى   False 
اتمنى ان اجد الحل 
وجزاكم الله خيرا
الرد
تم الشكر بواسطة:
#2
الحل ان تقرا الخليه ثم تنظر الى نهايه اسم الملف
اذا وجد في نهايه اسم الملف pdf. يقوم باظهار اداه AxAcroPDF1 مع فتحها
والا يخفي اداه AxAcroPDF1

يعني تقرا مثل
Dim a = DataGridView1.CurrentRow.Cells(22).Value.ToString.Trim
 فاذا كانت نهايه الاسم pdf. 
If a.EndsWith(".pdf") Then
...
Else
...
End If
الرد
#3
(31-03-19, 07:44 PM)بدري كتب : الحل ان تقرا الخليه ثم تنظر الى نهايه اسم الملف
اذا وجد في نهايه اسم الملف pdf. يقوم باظهار اداه AxAcroPDF1 مع فتحها
والا يخفي اداه AxAcroPDF1

يعني تقرا مثل
Dim a = DataGridView1.CurrentRow.Cells(22).Value.ToString.Trim
 فاذا كانت نهايه الاسم pdf. 
If a.EndsWith(".pdf") Then
...
Else
...
End If
شكرا اخي العزيز بكري
وفقق الله وذادك علما

الكود كامل حتى تعم الفائدة

كود :
Dim a = DataGridView1.CurrentRow.Cells(22).Value.ToString.Trim
       If a.EndsWith(".pdf") Then
           AxAcroPDF1.Visible = True
           AxAcroPDF1.LoadFile(Application.StartupPath & "\pdf_db\" & DataGridView1.CurrentRow.Cells(22).Value.ToString.Trim)
       Else
           AxAcroPDF1.Visible = False
       End If

الرد
تم الشكر بواسطة: بدري , ابراهيم ايبو , elgokr


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  كيفية اضافة اسم وصورة المنتج في الفورم نور الهدى الهدى 2 85 18-07-19, 10:29 PM
آخر رد: asemshahen5
  [VB.NET] الفورم غير مضبوطة على جهاز العميل. programmer 2 90 12-07-19, 08:22 PM
آخر رد: programmer
  ربط الفورم بقاعدة بيانات اكسل ابو العلاء 2 91 09-07-19, 01:16 AM
آخر رد: ابو العلاء
  قص جزء من اسم ملفات فى مجلد Abou Eman 1 91 05-07-19, 07:07 PM
آخر رد: سامي محمد
Exclamation [VB.NET] استفسار بخصوص الفورم دائما في المقدمة sniperjawadino 9 352 21-06-19, 07:17 PM
آخر رد: elgokr
  [كود] نقل ملفات ابو خليل99 23 733 14-06-19, 02:32 AM
آخر رد: elgokr
  [ تمّ الحل ] : إختفاء الأدوات داخل الفورم عبد العزيز البسكري 7 257 10-06-19, 02:05 PM
آخر رد: sendbad100
  اواجه صعوبه في تحديد موضع موشر الماوس علي صوره ما مدرجه في الفورم 01063390896 2 150 04-06-19, 12:59 PM
آخر رد: 01063390896
  [VB.NET] ضبط حجم الفورم مع دقة الشاشة mos3ab 5 2,306 14-05-19, 02:43 PM
آخر رد: اسامه الهرماوي
  تغير شكل ايقونة الفورم في المشروع makky 1 179 11-05-19, 04:22 PM
آخر رد: elgokr

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


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