تقييم الموضوع :
  • 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
عشت يا اخ احمد
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [VB.NET] طلب طريقة حاسبة الحب او قياس النسبه بين اسمين الـ ـجارح 4 531 13-05-15, 04:48 PM
آخر رد: الـ ـجارح
Sad [سؤال] كيف أبرمج آلة حاسبة؟ Jehad Kuhail 6 2,245 30-10-13, 08:07 PM
آخر رد: سعود
  [سؤال] التركيز على العنصر يختلف ؟ kafi2030 2 575 06-10-13, 07:31 PM
آخر رد: kafi2030
  ظهور مشكلة بعد تحزيم البرنامج وتنصيبه على حاسبة العميل الشجرة الطيبة 5 1,255 09-07-13, 02:50 PM
آخر رد: مبرمج بلا حدود

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


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