تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
ازالة اختصارات سطح المكتب
#1
السلام عليكم اخوتى
لدى كود يقوم  بعمل مجلد على سطح المكتب ثم يقوم بنقل اختصارات سطح المكتب الى هذا المجلد كلها من مجلدات وما داخل المجلدات وانا اريده ان ينقل ملفات ال exe فقط الموجودة على سطح المكتب ويترك الباقى.

كود :
   FolderBrowserDialog1.ShowDialog()
       Directory.CreateDirectory(FolderBrowserDialog1.SelectedPath & "\اختصارات سطح المكتب")
       Dim fileList = My.Computer.FileSystem.GetFiles(My.Computer.FileSystem.SpecialDirectories.Desktop,
      Microsoft.VisualBasic.FileIO.SearchOption.SearchAllSubDirectories, "*.*")
       On Error Resume Next
       For Each foundFile In fileList
           My.Computer.FileSystem.MoveFile(foundFile,
              FolderBrowserDialog1.SelectedPath & "\اختصارات سطح المكتب\" & My.Computer.FileSystem.GetFileInfo(foundFile).Name)
       Next
الرد
تم الشكر بواسطة:
#2
وعليكم السلام ورحمة الله وبركاته

مرحباً اخى ابو روضة
جمعة مباركة

بخصوص الكود فقط تعال على هذا الجزء
PHP كود :
"*.*" 

واجعله مثل
PHP كود :
"*.exe" 

او الامتداد المطلوب نقله داخل المجلد

تحياتى لك
وتمنياتى لك التوفيق
{ وَقُل رَّبِّ زِدْنِي عِلْمًا }
[ كن على يقين من اعمالنا نخطئ ومن اخطائنا نتعلم ولذلك لا شي مستحيل ]

ساهم دائماً فى تقديم   لكل من يقوم بالمساهمة
فى حل اى مشكلة او استفسار لديك مع اضافة رد بشكره ودعوة له
فالجميع هنا يعمل على مساعدة الاخرين لوجه الله وان تحتسب له اجر عند الله
الرد
تم الشكر بواسطة: alsouf , ابو روضة , ابو روضة , rnmr
#3
(05-10-18, 05:18 PM)elgokr كتب :
وعليكم السلام ورحمة الله وبركاته

مرحباً اخى ابو روضة
جمعة مباركة

بخصوص الكود فقط تعال على هذا الجزء
PHP كود :
"*.*" 

واجعله مثل
PHP كود :
"*.exe" 

او الامتداد المطلوب نقله داخل المجلد

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

أهلا بك أخى الجوكر وجمعة طيبة للجميع إن شاء الله...

انا جربت هذا فعلا  لكنه بينقل ملفات exe  الصحيحة ليست المختصرة.
فأنا أريد نقل الاختصارات كجوجل كروم وفايرفوكس والبرامج التى يتم تصطيبها
 والتى تقوم بعمل اختصار لها على سطح المكتب بعد تنصيبها على الجهاز
الرد
تم الشكر بواسطة: elgokr
#4
جرب هذا الامتداد :

كود :
*.lnk
الرد
تم الشكر بواسطة: ابو روضة , rnmr , elgokr
#5
(05-10-18, 06:22 PM)asemshahen5 كتب : جرب هذا الامتداد :

كود :
*.lnk

ماشاء الله فعلا أخى هذا ما أريد جزاك الله كل الخير ...
الرد
تم الشكر بواسطة: elgokr
#6
مرحباً اخى 

عندما وضعت 
كود :
"*.exe"

ذكرت انه كمثل اى عليك وضع الصيغة المطلوب التنفيذ عليها الامر  Big Grin
والاخر asemshahen5 ما قصر فى توضيح الامتداد المطلوب التعامل معه

تحياتى لك
وتمنياتى لك التوفيق
{ وَقُل رَّبِّ زِدْنِي عِلْمًا }
[ كن على يقين من اعمالنا نخطئ ومن اخطائنا نتعلم ولذلك لا شي مستحيل ]

ساهم دائماً فى تقديم   لكل من يقوم بالمساهمة
فى حل اى مشكلة او استفسار لديك مع اضافة رد بشكره ودعوة له
فالجميع هنا يعمل على مساعدة الاخرين لوجه الله وان تحتسب له اجر عند الله
الرد
تم الشكر بواسطة: ابو روضة
#7
(07-10-18, 08:36 AM)elgokr كتب : مرحباً اخى 

عندما وضعت 
كود :
"*.exe"

ذكرت انه كمثل اى عليك وضع الصيغة المطلوب التنفيذ عليها الامر  Big Grin
والاخر asemshahen5 ما قصر فى توضيح الامتداد المطلوب التعامل معه

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

انا اسف اخى الجوكر يبدو أننى لم أوضح المطلوب على وجه التحديد
فاكيد كود صغير مثل لا يخفى عليك.
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  ازالة الفراغات من textbox nabil.1710 8 313 25-07-18, 10:00 AM
آخر رد: elgokr
  [سؤال] كود مسار سطح المكتب وحفظ ملف ورد أبوسعود 2 173 24-06-18, 11:04 PM
آخر رد: أبوسعود
  احتاج مساعدتكم لتغيير رقم المكتب mram3242 3 169 22-05-18, 03:39 AM
آخر رد: elgokr
  ازالة internet explorer cookies Mohamed20 0 97 23-03-18, 03:30 AM
آخر رد: Mohamed20
Photo [سؤال] كيفية وضع اختصارات االازرار داخل الفورم لتنقل بين Buttons ؟ Iman Mohamed Omran 6 518 22-03-18, 08:14 PM
آخر رد: Iman Mohamed Omran
  استفسار بخصوص اختصارات الاصناف ملهمـ 8 255 20-03-18, 06:13 PM
آخر رد: ahmad omar
  [VB.NET] مشكلة نقل الملف من الريسورس لسطح المكتب محمد اسماعيل 4 195 28-02-18, 11:24 AM
آخر رد: silverlight
  [VB.NET] كيف امنع المستخدم من عدم ازالة صف محدد في اللست بوكس e-coder 1 153 28-02-18, 11:01 AM
آخر رد: ابو محمد القحطاني
  مساعدة في تشغيل اختصارات لوحة المفاتيح مع الالة الحاسبه مرفق المثال nooralcown 7 286 22-01-18, 07:47 PM
آخر رد: nooralcown
  تصميم برنامج تصوير سطح المكتب الميساني 4 242 09-01-18, 08:44 PM
آخر رد: الميساني

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


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