دانلود فایل از اینترنت؟

[jafarjafar]

چگونه می توان در وی بی برنامه ساخت که یه آدرس فایل رو تو اینترنت بگیره و در جای مشخصی در هارد دانلود کنه

[mohsengrisly]

سلام ببخشید نمونه نذاشتم
اخه هنوزم امکان ارسال فایلم خرابه
با تابع زیر میتونید این کار رو انجام دهید
اگر احتیاجی به توضیحات تکمیلی بود در خدمتم

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

Private Sub Form_Load()
Dim Url As String, Filename As String

Url = "http://www.google.com"
Filename = "c:\mohsen.htm"
URLDownloadToFile 0, Url, LocalFilename, 0, 0

End Sub

[jafarjafar]

سلام ببخشید نمونه نذاشتم
اخه هنوزم امکان ارسال فایلم خرابه
با تابع زیر میتونید این کار رو انجام دهید
اگر احتیاجی به توضیحات تکمیلی بود در خدمتم

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

Private Sub Form_Load()
Dim Url As String, Filename As String

Url = "http://www.google.com"
Filename = "c:\mohsen.htm"
URLDownloadToFile 0, Url, LocalFilename, 0, 0

End Sub
تشکر
من از این تابع استفاده کردم
ولی من این پارامترها رو چه جوری میتونم بدست بیارم
1-سایز فایل تو اینترنت
2-زمان بارگذاری (می خوام یه progressbar برای دانلودش بزارم)
من این تابع رو تست کردم یه مشکل دیگه که هست اینه که اگه dap نصب باشه فایل رو تو مسیر پیش فرض dap می ریزه
اگه امکانش هست راهنمایی کنید

[mohsengrisly]

سایز فایل رو که میشه مشخص کرد
برای زمان بار گذاری هم راه های متعددی وجود داره
اما در مورد dap بعید می دونم اخه شما خودتون مسیر فایل رو مشخص می کنید
مگر اینکه اون توی کار شما دخالت کنه
دقیقا یادم نیست اما چشم .برگردم کارتو راه میندازم
فعلا با همین بساز چشم.

[jafarjafar]

سایز فایل رو که میشه مشخص کرد
برای زمان بار گذاری هم راه های متعددی وجود داره
اما در مورد dap بعید می دونم اخه شما خودتون مسیر فایل رو مشخص می کنید
مگر اینکه اون توی کار شما دخالت کنه
دقیقا یادم نیست اما چشم .برگردم کارتو راه میندازم
فعلا با همین بساز چشم.
تشکر
اما زمان بارگذاری و سایز رو اگه امکانش هست راه بدست آوردنشو بنویس.