فتح ملف pdf من داخل نموذج بالأكسس

[figo82eg]

ارجو المساعده في كيفيه فتح ملف pdf من داخل نموذج اكسس ومرفق مثال للتوضيح أكثر 

New folder1.rar

[jjafferr]

تفضل 

 

هذا الكود:

Private Sub رقم_الحافظه_DblClick(Cancel As Integer)

    'File_Path="C:\Temp"
    File_Path = Application.CurrentProject.Path & "\"
    File_Name = Me.رقم_الحافظه & ".pdf"
    Name_Path = File_Path & File_Name
    
    

    If Dir(Name_Path) <> "" Then
        Application.FollowHyperlink Name_Path

    Else
    
        MsgBox "File not found."
    End If

End Sub

 

جعفر

New Microsoft Office Access Application.zip

[figo82eg]

شكرا جزيلاً علي اهتمامك وهو المطلوب ولكن اطمع في طلب ثاني لو ملف pdf موجود دخل بارتشن D داخل ملف اخر غير ملف الأكسس ما الحل

[jjafferr]

 

موجود في الكود 

 

غيّر المسار في السطر الاول ، واحذف السطر الثاني:

'File_Path="C:\Temp"
    File_Path = Application.CurrentProject.Path & "\"

 

جعفر

[HS Designer]

احسنت سيد جعفر...😘

[μεηηα ΑιιαΗ μοζαμει]

ممكن استاذ جعفر توضحلي اكتر ممكن اعمل اي 

[jjafferr]

وعليكم السلام 🙂

 

واهلا وسهلا بك في المنتدى 🙂

للإستفادة القصوى من المنتدى ، رجاء قراءة قوانين المنتدى : اضغط هنـــــــــامن فضلك لقراءة القواعد كاملة

 

1 ساعه مضت, μεηηα ΑιιαΗ μοζαμει said:

ممكن استاذ جعفر توضحلي اكتر ممكن اعمل اي

لو اخبرتينا بطلبك بالضبط ، علشان اعرف شو اشرح لك 🙂

 

جعفر