من فضلكم محتاج اداة aDownloadFile

لا أعرف تلك الأداة

ولكن إذا كنت تريد تنزيل ملف من الإنترنت إلى الجهاز فستخدم دوال API

فمثلا :

Private Declare Function URLDownloadToFile Lib "urlmon" Alias "URLDownloadToFileA" (ByVal pCaller As Long, ByVal szURL As String, ByVal szFileName As String, ByVal dwReserved As Long, ByVal lpfnCB As Long) As Long

وعند الإستدعاء يكون :

Call URLDownloadToFile(0, "http://xxx.xx", Path & "FileName", 0, 0)

تحيااااااااتي

URLDownloadToFile متنفعش لو الملف اللى هينزل كبير أو النت بطئ.

Download files from the Web (No Winsock)

أسهل و أسهل تستخدم اداه Explorer و تديها URL و الIE6 حيتكفل بالمهمه بالكامل و يمكنك اخفاء الاداة

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

فى توقيعى شرح لل Ftp واذا عجبتك طريقة التنزيل هذة فل لى

ASDen كتب:

أسهل و أسهل تستخدم اداه Explorer و تديها URL و الIE6 حيتكفل بالمهمه بالكامل و يمكنك اخفاء الاداة

مش بالضرورة : DoFileDownload ;)

تفضل اخي الكريم

حمل من هنا

بالنسبة لهذه الاداة : (من موضوع الاخ محمد السيد) عجبتني

انا غيرت اسمها مع الايقونة

المهم في ثلاثة احداث :

1- download complite

2- download progress

3- download error

المهم اذا اردتها تحمل ايشيء :

download1.bigindownload  ("url" , path ' & \fff.exe)

ايضا لمعرفة حجم الملف :

maxbytes

او لمعرفة المحمل :

curbytes

تستطيع عمل progreess bar و label

وفي حدث download1_downloadprogress اكتب :

progressbar.max = maxbytes
progressbar.value = curbytes
label1.caption = curbytes & " \ " & maxbytes

انتهى شرح الاداة وهي بالمرفقات

downloadfiles.rar

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