تقييم الموضوع :
  • 1 أصوات - بمعدل 5
  • 1
  • 2
  • 3
  • 4
  • 5
[كود] كود ارسال مافي الريسورس في ملف البرنامج
#1
السلام عليكم


شباب انا حاب اسوي برنامج فيه اربع ملفات


وابي اسوي لهم نسخ على ملف غير محدد انا اعرف كيف اسوي على طريق محدد وهذا الكود لي تحديد نسخ الملف في هذا المسار

PHP كود :
IO.File.WriteAllBytes("مسار الملف"My.Resources.اسم اللف الي في الريسورس

وهذا الكود تمام لاكن لازم ان اكتب ماسر الملف هل من طريقة اني ما احدد مسار الملف يعني هذا البرنامج في اي ملف على الجهاز مكان ماهو موجود ينسخ الملفات الي في الرسورس في مكانه


وشكرا


اتمنى فهمتو علي
الرد }}}
تم الشكر بواسطة:
#2
رد يا اخوان
الرد }}}
تم الشكر بواسطة:
#3
لستُ ادري بالتحديد ... لكن لمَ لا تصنع مسارك الخاص ؟ .. أي انْ تصنع فولدر على الجهاز و من ثم تضع فيه ما تريد
مثلا : C:\Hassan
فيكون الكود هنا
PHP كود :
IO.Directory.CreateDirectory("C:\Hassan")
IO.File.WriteAllBytes("C:\Hassan\Myfile.***"My.Resources.اسم اللف الي في الريسورس
الرد }}}
تم الشكر بواسطة:
#4
طيب وكيف للبرنامج ان يعرف اين تريد ان تضع الملف
هل تقصد عن طريق اظهار رسالة للمستخدم يحدد مكان الحفظ
ام مثلا يوجد ملفات في مكان ما تحمل نفس الاسم وتريد للبرنامج ان يستبدلها
الرد }}}
تم الشكر بواسطة:
#5
(02-06-14, 04:55 PM)Ali Wisam كتب : لستُ ادري بالتحديد ... لكن لمَ لا تصنع مسارك الخاص ؟ .. أي انْ تصنع فولدر على الجهاز و من ثم تضع فيه ما تريد
مثلا : C:\Hassan
فيكون الكود هنا
PHP كود :
IO.Directory.CreateDirectory("C:\Hassan")
IO.File.WriteAllBytes("C:\Hassan\Myfile.***"My.Resources.اسم اللف الي في الريسورس
اخي مو هذا قصدي انا قصدي اي مجلد مو مجلد محدد يعني وين ما احط البرنامج في اي مجلد يستخرج في المجلد الي البرنامج فيه
الرد }}}
تم الشكر بواسطة:
#6
اتفضل
Application.StartupPath
هذه الدالة ترجع بمسار البرنامج يمكنك وضعها مكان "مسار الملف" واضف لها اسم الملف
مثال
كود :
IO.File.WriteAllBytes(Application.StartupPath & My.Resources.About.ToString & ".txt" _
                    , My.Resources.About)
الرد }}}
تم الشكر بواسطة:
#7
(02-06-14, 05:21 PM)ali.alfoly كتب : اتفضل
Application.StartupPath
هذه الدالة ترجع بمسار البرنامج يمكنك وضعها مكان "مسار الملف" واضف لها اسم الملف
مثال
كود :
IO.File.WriteAllBytes(Application.StartupPath & My.Resources.About.ToString & ".txt" _
                    , My.Resources.About)

مافهمتك ممكن تشرح لي
الرد }}}
تم الشكر بواسطة:
#8
.....

كود :
Dim sv As New SaveFileDialog
If sv.ShowDialog = Windows.Forms.DialogResult.OK Then
    IO.File.WriteAllBytes(sv, My.Resources.اسم_ملف_الريسورس)
End If

.....
الرد }}}
تم الشكر بواسطة:
#9
اذا كنت تريد وضعه في الفولدر الذي فيه البرنامج .. فاحفظه دون كتابة اسم فولدر
مثلا :
PHP كود :
IO.File.WriteAllBytes("Program.exe",My.Resources.Program
الرد }}}
تم الشكر بواسطة:
#10
(02-06-14, 06:22 PM)Ali Wisam كتب : اذا كنت تريد وضعه في الفولدر الذي فيه البرنامج .. فاحفظه دون كتابة اسم فولدر
مثلا :
PHP كود :
IO.File.WriteAllBytes("Program.exe",My.Resources.Program

الله يعطيك العافيه ما تقصر ضبط الكود



شكرا
الرد }}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  تعديل كود ارسال صورة الى الواتس new_programer 2 114 21-03-24, 10:07 PM
آخر رد: new_programer
  مشكلة عند نقل البرنامج من فيجوال 2013 الى فيجوال 2017 strongriseman 5 149 12-03-24, 10:37 AM
آخر رد: strongriseman
  محتاج تشفير فيديو وتشغلية عن طريق البرنامج فقط new_programer 1 112 22-02-24, 12:09 PM
آخر رد: AHMED213
  مطلوب كود الطباعة لهذا البرنامج melad2002 2 234 13-01-24, 06:42 PM
آخر رد: melad2002
  مشكلة تعليق البرنامج في حال عدم وجود ماسح ضوئي متصل بالكمبيوتر صالح عبدالله 1 210 09-01-24, 10:51 PM
آخر رد: صالح عبدالله
  [VB.NET] ارسال رسالة واتساب h2551996 0 187 07-01-24, 12:17 PM
آخر رد: h2551996
  حل مشكلة بعد تثبيت البرنامج في جهاز العميل Adel27213 3 467 02-12-23, 11:00 PM
آخر رد: justforit
  كيف اجعل البرنامج في بداية الشهر ينفذ حدث معين بالاصح اريد البرنامج في تاريخ واحد من Adel27213 3 484 05-11-23, 01:45 AM
آخر رد: justforit
  [VB.NET] كيف اجعل البرنامج يحدد اخر يوم من كل شهر Adel27213 2 361 03-11-23, 06:50 AM
آخر رد: Adel27213
  [سؤال] عمل البرنامج على أى resoluation dr.programming 0 244 02-11-23, 12:08 AM
آخر رد: dr.programming

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


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