خواهشا زود باشید . . . کپی کردن فولدر

[Little-Demon]

آقا سلام

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

یه پروژه طراحی کردم که گیر یه قسمتشم اگه تحویل ندم بدبختم . . . . .


می خوام یه فولدر رو کامل کپی کنم . . . یعنی خود فولدر با محتویات کپی شه . ..


کککککککککککککککککککککککمممممممممممممممممممممممممممممککککککککککککککککککککککک......

 

[silvercover]

اينم يه مثال:

http://www.mmbstation.com/CopyProgress.rar

 

[Little-Demon]

واقعا کمک بزرگی به من کردید Silver جان . . .. . . . .

نمی دونم چه جوری از شما تشکر کنم !! ! !! ! ! ! !! !

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

 

[miadbeach]

دوستان منم خیلی احتیاج دارم بهش ولی ظاهرا لینک خرابه
میشه برام ایمیل کنید

 

[silvercover]

دوستان منم خیلی احتیاج دارم بهش ولی ظاهرا لینک خرابه
میشه برام ایمیل کنید

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

destdir$ = 'C:\Program FIles\CopyTest'
dest$ = destdir$ + '\testfile.txt'
source$ = '<Embedded>\text.txt'
SysCommand("CopyFile","source$,dest$")

اما اگر نیاز دارین تا به کرات فایل یا فایل هایی کپی بشه و درصد پیشرفت عملکرد نشون داده بشه باید از پلاگین استفاده کنید. که یکی از این ها Foldy هست:

http://mmbsamples.com/foldy-plugin-12

 

[mmb4us]

حامد جان سلام

ممنون میشم بگی چچوری میتونیم محتویات یک پوشه رو کنار فایل اجرایی کپی کنیم، بنده از پلاگین foldy استفاده کردم که در بالا پیوست کردین و از کلید Copy Folder و فقط مسیر رو بهش دادم ولی کپی نمیکنه البته اگه بخوام داخل پوشه ای که کنار فایل اجرایی هست کپی بشه میشه ولی من می خوام کنار فایل اجرایی کپی بشه. ممنون میشم بفرمائید چجوری باید حلش کنم

اینم کدهاش

[LTR]If (src_input$='') Then
Message("Please enter source folder first.","")
Return()
Else
src$=src_input$
PluginSet("PlugIn","src$")
PluginRun("PlugIn","GetSrcDir")
dest$=<SrcDir>
PluginSet("PlugIn","dest$")
PluginRun("PlugIn","GetDestDir")
pattern$=pattern_input$
PluginSet("PlugIn","pattern$")
PluginRun("PlugIn","Pattern")
End
Show("Group1")
ScriptTimer("Script","100")
[/LTR]
​

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

ممنون میشم راهنمایی کنین

 

[sajadms]

اگه منظورتون اینه که محتوای یه پوشه رو کنار فایل اجرایی کپی کنید باید مسیر اون پوشه رو که می خواین محتواش رو کپی کنین تو کد های بالا به متغیر src بدین
و اگه هم می خواین محتوای یه پوشه رو که کاربر انتخاب می کنه رو کنار فایل اجرایی کپی کنید از کد زیر استفاده کنید مشکلتون حل میشه من که اینجوری حلش کردم اگه کسی دیگه نظر بهتری داره حتما بگه
[PHPS]If (src_input$='') Then
Message("Please enter source folder first.","")
Return()
Else
If (dest_input$='') Then
Message("Please enter destination folder.","")
Return()
Else
src$=src_input$
PluginSet("PlugIn","src$")
PluginRun("PlugIn","GetSrcDir")
** dest$=dest_input$
dest$=<SrcDir>
s=LEN(dest$)
ss$=StrDel(dest$,s,1)
PluginSet("PlugIn","dest$")
PluginRun("PlugIn","GetDestDir")
pattern$=pattern_input$
PluginSet("PlugIn","pattern$")
PluginRun("PlugIn","Pattern")
End
End
Show("Group1")
ScriptTimer("Script","100")
[/PHPS]
نمونه مثالش هم براتون پیوست کردم