منتدى مصر التقني
هل تريد التفاعل مع هذه المساهمة؟ كل ما عليك هو إنشاء حساب جديد ببضع خطوات أو تسجيل الدخول للمتابعة.

تعلم كيفية استخدام الكائن My.Computer.Network لرفع وتحميل الملفات من الانترنت

اذهب الى الأسفل

تعلم كيفية استخدام الكائن My.Computer.Network لرفع وتحميل الملفات من الانترنت Empty تعلم كيفية استخدام الكائن My.Computer.Network لرفع وتحميل الملفات من الانترنت

مُساهمة من طرف أحمد مناع الإثنين أغسطس 05, 2013 9:40 pm

بسم الله الرحمن الرحيم

أهلا و سهلا بكم إخوانى الكرام ....فى هذا الدرس إن شاء الله تعالى سنتعلم سويا كيفية تحميل أو رفع ملف من الانترنت و ذلك باستخدام الكائن My.Computer.Network

أولا : تحميل ملف من الانترنت

أبسط شفرة لفعل ذلك على النحو التالى :
الكود:
My.Computer.Network.DownloadFile("address" ,"destinationFileName")

حيث ان address ...هو عنوان الملف المطلوب تحميلة ...اما destinationFileName هو الواجهة أو المسار الذى سيتم حفظ الملف فيه .....مثال يوضح ذلك :
الكود:
My.Computer.Network.DownloadFile("http://vswe.codecall.net/Test.txt", "C:/Test.txt")
و يمكنك ملاحظة أننا قمنا بتحميل الملف Test.txt من العنوان الموضح أعلاه على القرص الصلب C مع كتابة اسم و امتداد الملف .

معظم الملفات التي يمكن تحميلها على شبكة الانترنت لا تحتاج إلى أي اسم المستخدم أو كلمة المرور ليتم تحميلها،...لكن اذا كان هناك ملفات على سرفر خاص بك مثلا و تحتاج الى اسم المستخدم و كلمة المرور سنقوم باستخدام الشفرة التالية :
الكود:
My.Computer.Network.DownloadFile(address ,destinationFileName ,userName ,password)

مثال :
الكود:
My.Computer.Network.DownloadFile("http://vswe.codecall.net/Test.txt", "C:/Test.txt", "userName", "password")

 يمكنك إضافة بعض المعلمات الاخرى الى الشفرة السابقة لاضافة بعض المميزات و ذلك على النحو التالى :
الكود:
My.Computer.Network.DownloadFile(address ,destinationFileName ,userName ,password ,showUI ,connectionTimeout ,overwrite)

حيث أن showUI ....متغير منطقى أن تم وضع قيمته تساوى True يتم اظهار المربع الحوارى الخاص بالوينذو الذى يكون فية بيانات الملف المحمل و شريط التقديم و كمية البيانات المحملة و الزمن المستغرق فى التحميل 

أما التعليمة  connectionTimeout .....تستخدم لتعين كم من الوقت بالمللي ثانية الذى سيحاول فيه البرنامج لتحميل الملف قبل أن يتخلى عن عملية التحميل، و القيمة الافتراضية هي 100 ثانية (100،000 مللي ثانية). 

أما التعليمة overwrite  ....متغير منطقى تحدد ما إذا كان بالامكان الكتابة فوق الملفات الموجودة أم لا ....فإذا كنت تريد الكتابة فوق الملفات الموجودة، يتم تعيين تلك المعلمة إلى True.

مثال :
الكود:
My.Computer.Network.DownloadFile("http://vswe.codecall.net/Test.txt", "C:/Test.txt", "", "", True, 60000, True)

فى حالة قمنا بتعين التعليمة  showUI الى  True ....معنى ذلك أن المربع الحوارى الخاص بالتحميل سوف يظهر ...ماذا اذن لو قام المستخدم بالنقر على زر إلغاء عملية التحميل ؟.....
 الآن يمكننا أيضا تعيين ما سيحدث إذا قام المستخدم بالنقر فوق إلغاء الأمر على واجهة المستخدم....بإستخدام الشفرة التالية :
الكود:

My.Computer.Network.DownloadFile(address ,destinationFileName ,networkCredentials ,showUI ,connectionTimeout ,overwrite ,onUserCancel)

فى الشفرة أعلاه سنجد الخيار  onUserCancel  و الذى يحدد ماذا سيحدث أذ قام المستخدم بالغاء العملية .....و هو يأخذ قيمتين القيمة الافتراضية هي FileIO.UICancelOption.ThrowException التي سوف يقوم بطرح استثناء

 و الآخر هو FileIO.UICancelOption.DoNothing أى لا تفعل أي شيء إذا كان المستخدم بالنقر فوق إلغاء الأمر
باستخدام .....و يتم أستخدامه على النحو التالى :
الكود:
My.Computer.Network.DownloadFile("http://vswe.codecall.net/Test.txt", "C:/Test.txt", "", "", True, 60000, True, FileIO.UICancelOption.DoNothing)


ثانيا : رفع الملفات الى الانترنت

أبسط شفرة لرفع الملفات على الانترنت على النحو التالى :
الكود:
My.Computer.Network.UploadFile(sourceFileName ,address)

حيث أن  :
sourceFileName ....مسار واسم الملف المراد تحميله. 
 address .....رابط أو عنوان ip للسرفر أو الملقلم المراد رفع الملف عليه

مثال :
الكود:

My.Computer.Network.UploadFile("C:\Test.txt", "ftp://vswe.codecall.net/public_ftp/Test.txt") 


ففى المثال السابق قمنا برفع الملف  Test.txt الموجود على قرص c الى العنوان الموضح أعلاه .....و يمكنك ملاحظة أننا لم نستخدم اسم المستخدم ولا كلمة المرور لان الملقم لم يتطلب ذلك ....أما فى حالة أن الملقلم يتطلب ذلك سيكون المثال على النحو التالى :
الكود:

My.Computer.Network.UploadFile("C:\Test.txt", "ftp://vswe.codecall.net/public_ftp/Test.txt", "userName", "password") 

و ايضا اذا اردنا أن نستخدم كافة الاضافات التى تحدثنا عنها فى حالة التحميل يمكنك فعل ذلك بسهولة على النحو التالى :

الكود:
My.Computer.Network.UploadFile(sourceFileName ,address ,networkCredentials ,showUI ,connectionTimeout ,onUserCancel)


و فى النهاية أتمنى أن أكون قد وفقت فى الشرح واللى اللقاء فى درس جديد أن شاء الله تعالى 

ـــــــــــــــــــ التوقيع ــــــــــــــــــــ
سبحان الله وبحمدة .....سبحان الله العظيم
أحمد مناع
أحمد مناع
.
.

تاريخ التسجيل : 15/02/2011
المساهمات : 1108
النقاط : 202034
التقيم : 144
الدولة : مصر
الجنس : ذكر

https://egy-tech.forumegypt.net

الرجوع الى أعلى الصفحة اذهب الى الأسفل

تعلم كيفية استخدام الكائن My.Computer.Network لرفع وتحميل الملفات من الانترنت Empty رد: تعلم كيفية استخدام الكائن My.Computer.Network لرفع وتحميل الملفات من الانترنت

مُساهمة من طرف المبرمج الطموح الثلاثاء أغسطس 06, 2013 10:12 am

جزاك الله خيرا أخى الكريم على هذا الشرح الممتع
المبرمج الطموح
المبرمج الطموح
الاشراف
الاشراف

تاريخ التسجيل : 18/02/2011
المساهمات : 207
النقاط : 368
التقيم : 17
الدولة : مصر
الجنس : ذكر

الرجوع الى أعلى الصفحة اذهب الى الأسفل

الرجوع الى أعلى الصفحة

ََ

مواضيع ذات صلة


 
صلاحيات هذا المنتدى:
لاتستطيع الرد على المواضيع في هذا المنتدى