تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
فتح مجلد
#1
السلام عليكم ورحمة الله وبركاته

الاخوة الأعزاء اود الحصول على كود فتح مجلد بالظغط على Command

أتمنى لي ولكم التوفيق والسداد
 Exclamation (سبحان الله العظيم سبحان الله وبحمده) Exclamation
الرد
تم الشكر بواسطة:
#2
السلام عليكم
في المرفقات

.rar   Open _Folder.rar (الحجم : 1.49 ك ب / التحميلات : 46)
الرد
تم الشكر بواسطة: Ahmed_Mansoor , rnmr , rnmr
#3
يعطيك العافيه أستاذ امير على مجهودك الرائع

وجدت ضالتي في هذا الكود


On Error GoTo btnOpenLocation_Click_Err

Dim D As String
D = "c:\HR DOCUMENT\"
If D <> "" Then
Shell "Explorer.exe /select," & Chr$(34) & D & Chr$(34), vbMaximizedFocus
End If

Exit Sub
btnOpenLocation_Click_Err:
'
_Click_Err:
'

مع الشكر
 Exclamation (سبحان الله العظيم سبحان الله وبحمده) Exclamation
الرد
تم الشكر بواسطة: Ahmed_Mansoor



التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم