29-09-19, 01:34 AM
(28-09-19, 10:28 PM)asemshahen5 كتب :PHP كود :
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
TextBox1.Text = Application.StartupPath & "\ss"
Dim filePath As String = TextBox1.Text
Dim directory As String = Path.GetDirectoryName(filePath)
directory = filePath.Replace(directory, "")
TextBox2.Text = directory.Replace("\", "")
End Sub
شكرا لكل من تعذب واجابني عن سؤالي لكن يا اخواني ما اشتغلت معي هذه الاكواد مابعرف السبب
كل ما اريده عندي مجلد بداخل debug اسمه all بداخله مجلدات اخرى اريد لما اضيف مسار مجلد خاص بالاسم يكون هذا المسار يفتح من اي كمبيوتر اخر كون المسارات تتغير من كمبيوتر لاخر
راح ارفق مشروعي وياريت المساعدة وبارك الله بكل من اعان وشكرا لكم ياريت وضع الاكواد داخل المشروع وشكرا مرة اخرى
