[elgokr]

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

استخدم الكود التالى

كود :

       Dim PathApp As String
       Dim PathNew As String
       ' المسار الحالى للبرنامج
       PathApp = Application.StartupPath & "\اسم ملف البرنامج.exe"
       ' المسار الجديد
       PathNew = "D:\الاسم الجديد.exe"
       If System.IO.File.Exists(PathApp) Then
           System.IO.File.Copy(PathApp, PathNew, True)
           MessageBox.Show("تم نسخ الملف")
       End If

على على جملة

PHP كود :

اسم ملف البرنامج 


لاسم الملف المطلوب نسخة الاسم الذى يعرض بالخارج

وكذلك

PHP كود :

الاسم الجديد 


تحياتى لك

وتمنياتى لك التوفيق