الكبير استاذ @أبو إبراهيم الغامدي لدى نموذج به خانة كود العميل مربوط بملف بى دى اف بنفس كود العميل بملف على الحاسب عند الضغط عليه دبل كليك يفتح الملف مباشرا.
نفس مشكلة الاخ محمد لدى انه عند تعير الكود لا يتغير اسم الملف .
ما اريده هو عند تغير الاسم فى النموذج يتغير اسم الملف بنفس تغير اسم النموذج
Private Sub crn_DblClick(Cancel As Integer)
File_Path = Application.CurrentProject.Path & "\CONTACT\"
File_Name = Me.crn & ".pdf"
Name_Path = File_Path & File_Name
If Dir(Name_Path) <> "" Then
Application.FollowHyperlink Name_Path
Else
MsgBox "صورة ايصال العميل غير محفوظة"
End If
End Sub