لود از اينترنت

[erfanonline]

سلام دوستان من 1 سوال دارم كه هرچي فكر كردم به ذهنم نرسيد بايد چي كار كنم اين شد كه گفتم از شما بپرسم
من يه فايل نوت پد txt رو روي هاست اپلود كردم مي خوام بدونم چه طوري مي شه محتواي اون يا همون نوشته هاش توي يه ليس باكس توي وي بي لود بشه ممنون مي شم اگه كمكم كنيد

[erfanonline]

جون من كمك كنيد

[erfanonline]

؟

[Iron_Fist]

دوست عزیز شما می تونی فایل رو با تابع URLDownloadToFile روی هاردت ذخیره کنی و بعد بیای از روی هاردت بخونی

[erfanonline]

ولي من مي خوام از اينترنت انجام شه

[Pedram_HookEx]

خوب URLDownloadToFile  که Iron جان گفتن همین کار رو میکنه

کد:

Private Declare Sub URLDownloadToFile Lib "URLMON.dll" (ByVal lpunknown As Long, ByVal lpcstr As String, ByVal lpcstr As String, ByVal dword As Long, ByRef TLPBINDSTATUSCALLBACK As LPBINDSTATUSCALLBACK)

یه مثال برای دانلود کردن Setup.exe و ذخیره اون در درایو C

کد:

URLDownloadToFile(0, "http://www.MySite.com/Setup.exe", "C:\Setup.exe", 0, 0)

اگه متوجه نشدید مقاله های در مورد API رو که در سایت هست رو بخون

[erfanonline]

خيلي ممنون اين خيلي كمكم مي كنه
ولي نمي شه اين كه مثل يه بوتر كه اي دي از هارد لود مي كنه همين كار رو از اينتر نت انجام بره مثله www.mysite.com/bots.txt

[erfanonline]

در ضمن اگه مي شه همين كد رو سورس كنيد و براي دانلود بزاريد
چون من به مشكل بر خوردم

[Pedram_HookEx]

چرا نمیشه
وقتی که فایل رو Download کردی باید با دستور open اونو باز کنی و اطلاعات توش رو بخونی که نحوه باز کردن یه فایل هم توی تاپیکها بحث شده بگردی پیدا میکنی

اما اون مشکلی که بهش بر خوردی  
LPBINDSTATUSCALLBACK رو  باید تعریف کنی یا اینکه تبدیلش کنی به Long

[erfanonline]

خوب يكي برام سورسش كنه يزاره ممنون مي شم
WwW.Scary-Boys.Com

[Pedram_HookEx]

اینم سورس  حله