دانلود از هاست

[(سیدشریفی)]

با سلام
دوستان من وقتی از هاست دانلود میکنم آیا در آدرس www رو بنویسم خوبه یا ننویسم مثلا :

http://www.domain.ir/download/test.txt

یا

http://domain.ir/download/test.txt

لطفا راهنمایی کنید

[www.pc3enter.tk]

علیک

نه عزیز هیچ فرقی ندارن.
خیالت راحت.

[(سیدشریفی)]

با تشکر از پاسختون
یه مشکل دیگه اینکه وقتی داخل فایل تکست رو بر روی هاست تغییر میدم و برنامه رو اجرا میکنم همون قبلی خونده میشه و مثل اینکه اصلا تغییر ندادم و متن قبلی رو میخونه
فکر کنم سرور فایل رو کش کرده
چطور میتونم این مشکل رو حل کنم یعنی بلافاصله بعد از تغییر متن داخل فایل از برنامه بتونیم متن جدید رو بخونیم
درضمن فایل درون پوشه هستش یعنی تو ریشه نیست مشکلی که ایجاد نمیکنه ؟
لطفا راهنمایی کنید با تشکر

[www.pc3enter.tk]

نمونه کد یا سورسی که نوشتی را بده ببینم!

[(سیدشریفی)]

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



Public Function DownloadFile(sSourceUrl As String, sLocalFile As String) As Boolean DownloadFile = URLDownloadToFile(0&, sSourceUrl, sLocalFile, BINDF_GETNEWESTVERSION, 0&) = ERROR_SUCCESS
End Function



Dim sSourceUrl As String Dim sLocalFile As String

sSourceUrl = "http://www.domain.ir/download/test.txt"
sLocalFile = App.Path & "\test.txt"

If DownloadFile(sSourceUrl, sLocalFile) Then
Open App.Path & "\test.txt" For Input As #1
Input #1, my_test
Close #1
End If


دیروز خیلی روش کار کردم
وقتی فایل رو تو ریشه قرار میدم درست میشه ولی وقتی تو پوشه قرار میدم رفرش نمیشه و قبلی رو میخونه

با تشکر

[ammar_moghadam]

سلام دوستان عزیز
هر جا پرسیدم کسی جواب این سوال مارو نداد خواهشا اگر کسی بلده جواب بده.....


ی برنامه با وی بی6 که با وینسوک نوشته شده دارم که میخوام کامپیوترهایی که به شبکه وصل هستن رو شناسایی کنه و بعد خودشو روی کامپیوترها کپی کنه و بعد اجرا بشه....ممنون میشم اگر جواب بدین