(20-06-19, 06:47 AM)ابراهيم ايبو كتب :

السلام عليكم احي محمد

ماذا تقصد بـ ( درايف النسخة) الكود الذي لديك يأتي باسماء الدرايفر في الكومبيوتر وهو صحيح

ولدي كود ابسط منه  

كود :

Imports System.IO

Public Class Form1

   Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
       Dim Drives As String() = Directory.GetLogicalDrives
       Dim Drive As String
       For Each Drive In Drives
           MsgBox(Drive)
       Next
   End Sub
End Class

هذا مافهمته منك ... صباح الخير

(20-06-19, 07:14 AM)محمد اسماعيل كتب :

(20-06-19, 06:47 AM)ابراهيم ايبو كتب :

السلام عليكم احي محمد

ماذا تقصد بـ ( درايف النسخة) الكود الذي لديك يأتي باسماء الدرايفر في الكومبيوتر وهو صحيح

ولدي كود ابسط منه  

كود :

Imports System.IO

Public Class Form1

   Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
       Dim Drives As String() = Directory.GetLogicalDrives
       Dim Drive As String
       For Each Drive In Drives
           MsgBox(Drive)
       Next
   End Sub
End Class

هذا مافهمته منك ... صباح الخير

صباح النور

درايف النسخة المتسطب علية الويندوز

(20-06-19, 06:47 AM)ابراهيم ايبو كتب :

السلام عليكم احي محمد

ماذا تقصد بـ ( درايف النسخة) الكود الذي لديك يأتي باسماء الدرايفر في الكومبيوتر وهو صحيح

ولدي كود ابسط منه  

كود :

Imports System.IO

Public Class Form1

   Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
       Dim Drives As String() = Directory.GetLogicalDrives
       Dim Drive As String
       For Each Drive In Drives
           MsgBox(Drive)
       Next
   End Sub
End Class

هذا مافهمته منك ... صباح الخير

(20-06-19, 08:04 AM)sary كتب :

(20-06-19, 07:14 AM)محمد اسماعيل كتب :

(20-06-19, 06:47 AM)ابراهيم ايبو كتب :

السلام عليكم احي محمد

ماذا تقصد بـ ( درايف النسخة) الكود الذي لديك يأتي باسماء الدرايفر في الكومبيوتر وهو صحيح

ولدي كود ابسط منه  

كود :

Imports System.IO

Public Class Form1

   Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
       Dim Drives As String() = Directory.GetLogicalDrives
       Dim Drive As String
       For Each Drive In Drives
           MsgBox(Drive)
       Next
   End Sub
End Class

هذا مافهمته منك ... صباح الخير

صباح النور

درايف النسخة المتسطب علية الويندوز

لمعرفة الدرايف المسطب عليه الويندوزمثل \:C

PHP كود :

Dim WindowsDrive = IO.Path.GetPathRoot(Environment.SystemDirectory) 


لمعرفة المجلد المسطب عليه الويندوز مثل C:\Windows

PHP كود :

Dim WindowsDirectory = Environment.GetFolderPath(Environment.SpecialFolder.Windows) 


(21-06-19, 07:16 PM)elgokr كتب :

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

اخى الفاضل الكود المستخدم لديك

لا يوجد به اى مشكلة وهو الكود الصحيح لعرض جميع الاحرف المستخدمة

اذا كان هارد او دى فى دى او دى فى دى وهمى وكذلك مسارات الشبكة كا دريف وكذلك الفلاشة

فعندما تقول يعرض احرف غير موجودة لديك

فتاكد بكونك لا تستخدم برنامج لعمل دى فى دى وهمى

او كون الجهاز يحتوى على مدخل لـ Floppy Disks

فى شئ يحمل الاحرف من a:z سيعرض لك فى القائمة

وبخصوص الترتيب فهو ترتيب ابجدي مهمى اختلف D 

اذا كان دى فى دى او دريف او حتى فلاشة

بخصوص تريد عمل شئ مخصص او معين

فبدل من استخدام هذا السطر

كود :

           MsgBox(sDrive)

عليك تسجيل القيمة فى List ومن ثم التعامل معها

طبقاً لما تريده وحتى يفيدك الجميع بالامر

عليك توضيح ما تريده  فعله تماماً ليسهل على الجميع

بوضع الكود المناسب بدلاً من التخمين

تحياتى لك

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