دانلود فایل و انتقال به دایرکتور

[amiralavi74]

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

c:\programfiles\amiralavi74​

و پوشه دانلودی خودکار جایگزین پوشه amiralavi74 بشه
ضمنا اسم همه ی پوشه های دانلودی همینه و مشکلی از نظر آدرس دهی پیش نمیاد فقط این مویثر بشه که پوشه دانلود و خودکار جایگزین بشه
ممنون

 

[MahmoodM30]

خب با کد کپی خود mmb چرا اینکار رو انجام نمیدید؟

 

[amiralavi74]

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

 

[MahmoodM30]

ببخشید الان وقتی ندارم نمونه مثال قرار بدم در مورد دانلود فایل که قبلا کلی نمونه توی انجمن قرار داده شده حتی من خودمم قرار دادم این از این مثلا فایل رو به پوشه C:\Data دانلود کرد با اسم Data.dll

حالا بعده دانلود کد مربوط به کپی رو باید بنویسید تا بعد دانلود به مسیر مثلا D:\Data کپی کنه

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

اینم کد کپی هستش

MasireDawnload$='C:\Data\Data.dll'
MasirCopyFile$='D:\Data\Data.dll'
SysCommand("CopyFile","MasireDawnload$,MasirCopyFile$")

 

[amiralavi74]

محمود جان من الان چطوری فایلو دان کنم ؟ این کد رو کجا بزارم ؟ تازه من فایل ندارم یک پوشه دارم مشکل پیش نمیاد؟؟؟

 

[MahmoodM30]

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

یا بهتره فقط فایل رو دانلود کنید و پوشه رو ایجاد کنید

URL$ = 'http://upload.file.com/Data.dll'
PluginSet("MiscPlugIn","URL$")
PluginRun("MiscPlugIn","URL")
**-------
Dest$ = 'C:\Data\Data.dll'
PluginSet("MiscPlugIn","Dest$")
PluginRun("MiscPlugIn","Download")
**--------
MasireDawnload$='C:\Data\Data.dll'
MasirCopyFile$='D:\Data\Data.dll'
SysCommand("CopyFile","MasireDawnload$,MasirCopyFile$")

 

[amiralavi74]

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