السلام عليكم ورحمة الله
windir USERPROFILE USERNAME USERDOMAIN TMP TEMP SystemRoo SystemDrive SESSIONNAME ProgramFiles PROCESSOR_REVISION PROCESSOR_LEVEL PROCESSOR_IDENTIFIER PROCESSOR_ARCHITECTURE NUMBER_OF_PROCESSORS PERL5LIB PATHEXT OS MSDevDir LOGONSERVER lib include HOMEPATH HOMEDRIVE ComSpec COMPUTERNAME CommonProgramFiles CI_HOLOS_CLI APPDATA ALLUSERSPROFILE
ممكن تصل لجميع مسارات المجلدات السابقه بدون API و بداله واحده وهى
داله بسيطه جدا من ضمن الدوال المدمجه فى الVB ولكن لا يستخدمها الكثيييييييير
, اسمها $Environ
استخدامها مثلا كالتالى:
dim sWinDir
sWinDir= Enviorn$ ("WinDir") 'understoodالمفروض ان المتغير اللى اسمه sWinDir من النوع String يكون متخزن فيه مسار الويندوز الآن .
ان كنت متوسط قليلا فى الVb وتعرف الأرقام التى تدل على متغيرات النظام لهذه الداله " يمكنك الأستعاضه بأرقام فقط بدلا من كتابه "WinDir
وانا وضعت هنا "WinDir" فقط للتسهيل وللتعلم .. واذا اردت ان تعرف كل المتغيرات العامة التى بترجعها هذه الداله فببساطه استخدم حلقه تكراريه كالتالى واستكشف بنفسك . . .:
افتح مشروع جديد و ارسم ListBox على الForm ,ثم ضع الكود التالى فى حدث Form_Load()
dim i as integer For i = 1 To 31 List1.AddItem i & " >> " & Environ(i) Next
والآن مارأيكم ؟
