تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
نسخ ملف يختلف مساره من حاسبة لأخرى
#1
[b]السلام عليكم ورحمة الله وبركاتة
انا مشترك جديد ومبتدى على net. واريد من برنامجي ان يقوم بنسخ الملفات المحددة له مع العلم ان مسار الملفات يتغير من حاسبة لأخرى
[/b]

مثال :C:\Documents and Settings\XX\Application Data\Mozilla\Firefox\Profiles\9ukjkkf6.default

او :C:\Documents and Settings\ahmed\Application Data\Mozilla\Firefox\Profiles\wo7g5fe.default

ولكم جزيل الشكر
الرد }}}
تم الشكر بواسطة:
#2
PHP كود :
Dim path As String Environment.GetFolderPath(Environment.SpecialFolder.LocalApplicationData) & "\Mozilla\Firefox\Profiles\wo7g5fe.default" 
الرد }}}
تم الشكر بواسطة:
#3
الف شكر لك اخي احمد على سرعة الرد
تم حل نصف المشكلة لكن بقى المجلد الأخير "[COLOR="#FF0000"]wo7g5fe[/COLOR].default" يتغير من حاسبة لأخرى فقط الأحرف الملونة بالاحمر هي التي تتغير
هل هناك حل مع جزيل الشكر
الرد }}}
تم الشكر بواسطة:
#4
wo7g5fe
.default
معلش على التدخل لكن اللي يبدو لي ان الملون بالاحمر اسم الملف ومابعد النقطة امتداد الملف.
مدري الشرح التالي يلبي لك الطلب؟؟
[h=1]شرح كيفية برمجة( مثال نسخ الملفات من مكان انت تحدده الى مكان انت تحدده بامتداد انت تحدده)[/h]
الرد }}}
تم الشكر بواسطة:
#5
السلام عليكم

اذن ان اسم هذا المجلد يتم انشائه من الـ FireFox

لذلك اذن انه لن تتمكن من معرفة اسمه ولكن اذا وجدت ملف (مثلا ملف الأعدادات) يحتوى على اسم هذا المجلد فتكون المشكل انحلت

سوف اوحاول ان ابحث عن ملف مثل هذا

و ممكن لو لايوجد إلا ملف واحد يحتوى على كلمة default فى هذا المسار "appdata\Mozilla\Firefox\Profiles" تكون انحلت المشكلة
الرد }}}
تم الشكر بواسطة:
#6
في ويندوز xp دخلت علي المسار أعلاه يبدو أنه ليس ملف إنما مجلد عادي في نهاية اسمه توجد نقطة ثم
default ولا توجد أي ملفات أو مجلدات أخرى بجواره ، وداخل هذا المجلد توجد مجلدات وملفات .

لا أدري هل في ويندوز 7 نفس الحكاية ؟
(وَقُل رَّبِّ زِدْنِي عِلْمًا)

الرد }}}
تم الشكر بواسطة:
#7
جزيل الشكر لكل الأعضاء الكرام
نعم اخواني هو مجلد وليس ملف ويختلف فقط في اسمه الحروف قبل النقطة و default من حاسبة لأخرى و حتى من نظام لآخر وهذا مساره في الويندوز سفن
\C:\Users\QP\AppData\Roaming\Mozilla\Firefox\Profiles\ff3y1j3j.default

وهذا مساره في XP
\C:\Documents and Settings\XX\Application Data\Mozilla\Firefox\Profiles\9ukjkkf6.default

كلمة "default." تبقى ثابتة في اي حاسبة او اي نظام
اريد الكود الي يعرف اسم المجلد مهما تغير
الرد }}}
تم الشكر بواسطة:
#8
هذا الكود سوف يجلب مسار الفولدور الذى تريده
طريقة عمل الكود :
سوف يقوم بحلقة تكرار سوف ياخذ فيها جميع المسارات فى هذا الفولدر "\Mozilla\Firefox\Profiles"
و عندما يجد اول فولدر يحتوى اسمه على هذه الكلمة ".default" سوف ياخذ مسارة ويخرج من التكرار

كود :
[color=#0000FF]Dim[/color][color=#000000] path [/color][color=#0000FF]As[/color] [color=#0000FF]String[/color][color=#000000] = [/color][color=#A31515]""[/color]
        [color=#0000FF]Dim[/color][color=#000000] folder [/color][color=#0000FF]As[/color] [color=#0000FF]New[/color][color=#000000] IO.[/color][color=#2B91AF]DirectoryInfo[/color][color=#000000]([/color][color=#2B91AF]Environment[/color][color=#000000].GetFolderPath([/color][color=#2B91AF]Environment[/color][color=#000000].[/color][color=#2B91AF]SpecialFolder[/color][color=#000000].LocalApplicationData) & [/color][color=#A31515]"\Mozilla\Firefox\Profiles"[/color][color=#000000])[/color]
        [color=#0000FF]For[/color] [color=#0000FF]Each[/color][color=#000000] f [/color][color=#0000FF]In[/color][color=#000000] folder.GetDirectories()[/color]
            [color=#0000FF]If[/color][color=#000000] f.Name.Contains([/color][color=#A31515]".default"[/color][color=#000000]) [/color][color=#0000FF]Then[/color]
[color=#000000]                path = f.FullName[/color]
                [color=#0000FF]Exit For[/color]
            [color=#0000FF]End[/color] [color=#0000FF]If[/color]
        [color=#0000FF]Next[/color]
الرد }}}
تم الشكر بواسطة:
#9
عشت يا اخ احمد
الرد }}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  هل الاستعلام في php يختلف عن vb.net atefkhalf2004 2 372 22-04-23, 11:18 AM
آخر رد: atefkhalf2004
  الة حاسبة ابو اسماعيل33 0 619 05-06-22, 01:47 AM
آخر رد: ابو اسماعيل33
Lightbulb [VB.NET] برنامج آلة حاسبة Doctor GME 6 1,857 24-05-20, 03:17 AM
آخر رد: atefkhalf2004
  [VB.NET] عمل حاسبة بسيطة محمد اسماعيل 6 1,656 12-04-20, 07:48 PM
آخر رد: محمد اسماعيل
  [VB.NET] تصميم حاسبة محمد اسماعيل 1 1,555 22-07-18, 11:21 PM
آخر رد: elgokr
  عند التحزيم باستخدام Setup Factory لا يستطيع تسجيل ملف OCX على حاسبة المستخدم لكن ... alaa.altunsi 4 2,561 13-05-18, 11:48 PM
آخر رد: elgokr
  ما هو كود فتح اله حاسبة خارجية وليس اله حاسبة الويندوز السيد الجوهري 1 1,602 14-01-18, 04:33 PM
آخر رد: السيد الجوهري
  برجاء المساعدة في سورس كود اله حاسبة scientific calculator khaled12345 3 2,222 20-09-17, 12:11 AM
آخر رد: ابوثامر الحربي
  [VB.NET] طلب طريقة حاسبة الحب او قياس النسبه بين اسمين الـ ـجارح 4 3,886 13-05-15, 04:48 PM
آخر رد: الـ ـجارح
Sad [سؤال] كيف أبرمج آلة حاسبة؟ Jehad Kuhail 6 6,520 30-10-13, 08:07 PM
آخر رد: سعود

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


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