(08-06-17, 08:48 PM)ddemed كتب : السلام عليكم انا انشي برنامج ليقوم بعمل INSTALL لبرنامجي وفكرته هو ان يظهر open file dialoge لتحديد
المسار الذي يريد المستخدم وضعه فيه ويقوم هو بنقل الملفات البرنامج للمسار وملفات البرنامج تكون في مجلد 
بجانب برنامج ال install و عندما يريد المستخدم عمل unstall يقوم بحذف الملفات من المسار الذي حدده المستخدم
وشكرا

(08-06-17, 09:05 PM)alma2 كتب :

(08-06-17, 08:48 PM)ddemed كتب : السلام عليكم انا انشي برنامج ليقوم بعمل INSTALL لبرنامجي وفكرته هو ان يظهر open file dialoge لتحديد
المسار الذي يريد المستخدم وضعه فيه ويقوم هو بنقل الملفات البرنامج للمسار وملفات البرنامج تكون في مجلد 
بجانب برنامج ال install و عندما يريد المستخدم عمل unstall يقوم بحذف الملفات من المسار الذي حدده المستخدم
وشكرا

بالتوفيق إن شاء الله، ومتى تنتهي منه لنراه ونجربه؟

(09-06-17, 01:45 AM)Amir_alzubidy كتب : السلام عليكم و رحمة الله و بركاته
عليك الاستفادة من هذا العرض ، فالمنتدى لا يقدم برامج متكاملة بالمجان علينا ان ندرك ذلك  .
http://vb4arb.com/vb/showthread.php?tid=12573&highlight=ربيع

(09-06-17, 02:44 AM)alma2 كتب :

كود :

       Dim path As String = String.Empty

       Dim browse As New FolderBrowserDialog
       If browse.ShowDialog = vbOK Then

           path = browse.SelectedPath 'هنا تم قراءة المسار الذي اختاره المستخدم

           MsgBox(path)

       End If

(09-06-17, 02:56 AM)alma2 كتب :

كود :

       Dim sourcePath As String 'المجلد
       Dim destPath As String 'المسار المراد المستهدف

       'نقل مجلد
       My.Computer.FileSystem.MoveDirectory(sourcePath, destPath)

       'نسخ مجلد
       My.Computer.FileSystem.CopyDirectory(sourcePath, destPath)