كيف انقل ملف من مكان ما في الكمبيوتر الي مكان اخر عن طريق الكود في الفجوال بيسك دوت نت
كيف انقل ملف من مكان ما في الكمبيوتر الي مكان اخر عن طريق الكود في الفجوال بيسك دوت نت
مغلق
استخدم الدالة MoveFile هذا الكود:
My.Computer.FileSystem.MoveFile("C:\TestDir1\test.txt", "C:\TestDir2\test.txt")حيث تأخذ معاملين الأول المصدر والثاني الوجهة.
تم تعديل هذه المشاركة بواسطة Adel_N في 1 أكتوبر 2007 في 18:39
In order to understand recursion, one must first understand recursion
السلام عليكم ورحمة الله وبركاتة
شكرا جزيلا علي رد حضرتك
ولكن
My.Computer.FileSystem.MoveFile("C:\Documents and Settings\XPPRESP3\Desktop\ss\99.jpg", "C:\Documents and Settings\XPPRESP3\Desktop\ss\New Folder")
دة الكود بتاعي
انا كتبت الكود حضرتك انا عندي مثلا صورة اسمها 99.jpg
انا عايزانقلها من مكان الفيل الاولاني احطها في الفايل التاني
سؤال كمان
انا بشاور علي اي مكتبة من الريفرانس قبل ما بكتب الكود
وشكرا جزيلا ارجو سرعة الرد لان الموضوع دة مهم جدا
وشكرا جزيلا جدا ياباشمندس عادل
eng_sayed كتب:السلام عليكم ورحمة الله وبركاتةشكرا جزيلا علي رد حضرتك
ولكن
My.Computer.FileSystem.MoveFile("C:\Documents and Settings\XPPRESP3\Desktop\ss\99.jpg", "C:\Documents and Settings\XPPRESP3\Desktop\ss\New Folder")
دة الكود بتاعي
انا كتبت الكود حضرتك انا عندي مثلا صورة اسمها 99.jpg
انا عايزانقلها من مكان الفيل الاولاني احطها في الفايل التاني
سؤال كمان
انا بشاور علي اي مكتبة من الريفرانس قبل ما بكتب الكود
وشكرا جزيلا ارجو سرعة الرد لان الموضوع دة مهم جدا
وشكرا جزيلا جدا ياباشمندس عادل
الخطأ الذي وقعت فيه إنك كتبت المصدر صح وهو:
C:\Documents and Settings\XPPRESP3\Desktop\ss\99.jpg
ولكنك كتبت الوجهة خطأ حيث كتبت ما يدل على "مجلد" وليس ملف jpg:
C:\Documents and Settings\XPPRESP3\Desktop\ss\New Folder
هذه مجلد وليس ملف jpg كان المفروض تكتب:
C:\Documents and Settings\XPPRESP3\Desktop\ss\New Folder\99.jpg
أنت لا تحتاج إلى إضافة أي Reference أو استيراد أي مكتبة.
ضع ملف مفكرة a.txt في دليل C:\ وجرب المثال المرفق... ستراه ينقل الملف إلى C:\D\a.txt.
In order to understand recursion, one must first understand recursion
ربنا يباركلك يا هندسة
الكود شغال وزي الفل
بس انا بصراحة طمعان في كود تاني
لو حبيت انشأ فايل في ملف المشروع او انشأ الفيل في اي مكان ما في الكمبيوتر
وازاي اعملو دليت وشكرا جزيلا ربنا يبارك فيك ويكتر من امثالك
eng_sayed كتب:ربنا يباركلك يا هندسةالكود شغال وزي الفل
بس انا بصراحة طمعان في كود تاني
لو حبيت انشأ فايل في ملف المشروع او انشأ الفيل في اي مكان ما في الكمبيوتر
وازاي اعملو دليت وشكرا جزيلا ربنا يبارك فيك ويكتر من امثالك
بالنسبة لإنشاء ملف فعليك استخدام الدالة
My.Computer.FileSystem.CopyFile("c:\a.jpg","d:\a.jpg")والتي تقوم بنسخ الملف من المصدر إلى الوجهة.
وبالنسبة لحذف ملف فعليك استخدام الدالة
My.Computer.FileSystem.DeleteFile("c:\a.jpg")والتي تحذف الملف المحدد.
أرفقت لك مثال مرفق على طريقة الحذف.
--------
لكي تعلم من أي مسار برنامجك يشتغل حالياً استخدم
Application.StartupPath
أخوك
تم تعديل هذه المشاركة بواسطة Adel_N في 1 أكتوبر 2007 في 22:12
In order to understand recursion, one must first understand recursion
والله انا عاجز عن الشكر
بس انا عايز انشاء فايل
نيو فولدر
تاني حاجة عايز اعرف شرح الكرد دة المطلوب منة اية
Catch ex As Exception
MsgBox(Err.Description, MsgBoxStyle.Critical)
End Try
وشكرا جزيلا
إنشاء مجلد يختلف عن إنشاء ملف.
لا أعلم كيف تنشأ ملف من الصفر (وليس نسخه من ملف آخر) وأعتقد أن ذلك يتم بكتابة البايتات Bytes ولكني لست متأكد.
أما إنشاء مجلد فيمكنك كالتالي:
My.Computer.FileSystem.CreateDirectory("C:\New Folder")الكود أعلاه ينشأ مجلد اسمه "New Folder" في الدليل C:/.
----------
أما بالنسبة للسؤال التاني فنحن نستخدم الـ Block التالي:
Try Catch ex As Exception End Try
نستخدمه لضبط الأخطاء التي يمكن أن تنشأ وقت التشغيل Runtime Errors.
الكود الذي نتوقع أنه يمكن أن ينشأ خطأ نضعه بين Try و Catch ex As Exception. مثلاً الدالة DeleteFile كود يمكن أن ينشأ عنه خطأ وقت التشغيل... من بين تلك الأخطاء أن يكون الملف المراد حذفه غير موجود.. عندها ترسل الدالة DeleteFile خطأ مفاده "الملف غير موجود". ولكن هذا الخطأ لا يتضح وقت التكويد فهو ليس خطأ في الكود.
بين Catch ex As Exception و End Try نقوم بوضع الكود الذي يتعامل مع الأخطاء عند حدوثها.. مثلاً هل تريد إذا حصل خطأ أن تتجاهله أيا كان في هذه الحالة لا تكتب شيء.. ربما تريد أن ترسل رسالة للمستخدم ترشده للأخطاء التي نجمت كما فعلنا...
المبرمج الجيد لا بد أن يقوم بالتعامل مع الأخطاء ولا يدعها تظهر للمستخدم وتتسبب في "إحباط" تشغيل البرنامج. التعامل مع الأخطاء في مصطلح المبرمجين يسمى Error Handling.
أخوك.
تم تعديل هذه المشاركة بواسطة Adel_N في 1 أكتوبر 2007 في 23:03
In order to understand recursion, one must first understand recursion
شكرا جزيلا واللي الامام دائما
اسف جدا علي الاطالة
طيب دلوقتي لما انا انشات الفولدر
عايز انشا الفولدر بالاسم اللي انا عايزو
eng_sayed كتب:اسف جدا علي الاطالةطيب دلوقتي لما انا انشات الفولدر
عايز انشا الفولدر بالاسم اللي انا عايزو
عادي أخي أكتب الاسم اللي إنت عايزه.. "New Folder" مجرد مثال.. كان بإمكانك تكتب أي شيء.. مثلاً العبارة التالية تنشأ مجلد اسمه "Ramadan" في C:\.
My.Computer.FileSystem.CreateDirectory("C:\Ramadan")أتمنى أكون فهمتك صح.
أخوك.
In order to understand recursion, one must first understand recursion
شكرا جزيلا ولك قدير الاحترام والتقدير
عفواً.. أتمنى لك التوفيق.
أخوك المخلص دائماً.
In order to understand recursion, one must first understand recursion
هذا الموضوع مغلق.