[DOX.1]

السلام عليكم ورحمة الله وبركاته 


أستخدمت OpenFileDiloge  

محتاج كود  بحيث أنه لما تفتح النافذه ويتم أختيار الملف ( أجلب المسار + أسم الملف ) وأغير أسم الملف إلى تسميه جاهزه عندي 
وأحصل على المسار الجديد 


لاحظ محتاج أن أعملها كلها في فتح نافذه واحده كييييف..؟

الكود اللي أستخدمته 

كود :

Dim OpenFileBr As New OpenFileDialog
               OpenFileBr.Filter = "Files (*.pdf)|*.pdf"

               If OpenFileBr.ShowDialog = Windows.Forms.DialogResult.OK Then
                   FileGetName = OpenFileBr.FileName
                   MsgBox(FileGetName)

محتاج أغير أسم الملف بنفس الأمتداد