السلام عليكم أعضاء المنتدي المحترمين
لدي استفسار بسيط
سبق وأن قمت بإرسال سؤال ولم أجد رد من أعضاء المنتدي ولا اعرف السبب هل هو لصعوبة سؤالي أم لتفاهة السؤال.
سوؤالي كان كيف يمكنني أن إدرج ملف pdf داخل النموذج ويتم مشاهدتة من داخل النموذج.
ولقد توصلت إلى هذا الكود:
Option Compare Database
Option Explicit
Private Sub btnBrowse_Click()
Dim fdialog As Office.FileDialog
Dim filepath As String
Set fdialog = Application.FileDialog(msoFileDialogFilePicker)
With fdialog
.Title = "Select Image"
.AllowMultiSelect = False
.Filters.Clear
.Filters.Add "Imge File", "*.jpg; *.bmp; *.png"
.Filters.Add "PDF File", "*.pdf"
If .Show Then
filepath = .SelectedItems(1)
[txtImagepath] = filepath
Else
Exit Sub
End If
End With
End Sub
مع العلم انني قمت بتنفيذ هذا الكود علي اكسيس نسخة 2013 وتم عرض ملف pdf داخل النموذج عن طريق web browser control
الأن عندما أقوم بتنفيذ هذا الكود علي اكسيس نسخة 365 يتم تنفيذ الكود ولكن بدلاً من عرض ملف pdf داخل نموذج اكسيس في web browser يتم عرض الملف عن طريق adobe acrobat خارج اكسيس
ما هو حل هذه المشكلة؟
وشكراً