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

mojtabafuladii · Jun 1, 2019

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

نمونه ای از فایل مورد نظر هم پیوست شده است

FileExist("G:\mobin khodro\aqhsat\MFA CHEK.exe","an")
If (an=1) Then
LoadText("EditBox777","C:\mobin khodro\")
LoadText("EditBox778","G:\mobin khodro\aqhsat\Z-F23KLP-BN-F77\")
RunScript("copyfile")
End

-----------script (copyfile)
dest$=EditBox777$+'1.png'
from$=EditBox778$+'1.png'
SysCommand("Copyfile","from$,dest$")

لطفا با ذکر مثال
با تشکر

the_king · Jun 1, 2019

mojtabafuladii گفت:
با سلام خدمت دوستان
در برنامه مولتی مدیا بیلدر چگونه باید فولدر را از مکان مشخص به مکان مشخص دیگر انتقال داد یا کپی کرد؟
من ازدستور زیر برای انتقال فایل استفاده می کنم ولی نمی تونم بجای فایل فولدر را معرفی کنم

نمونه ای از فایل مورد نظر هم پیوست شده است

FileExist("G:\mobin khodro\aqhsat\MFA CHEK.exe","an")
If (an=1) Then
LoadText("EditBox777","C:\mobin khodro\")
LoadText("EditBox778","G:\mobin khodro\aqhsat\Z-F23KLP-BN-F77\")
RunScript("copyfile")
End

-----------script (copyfile)
dest$=EditBox777$+'1.png'
from$=EditBox778$+'1.png'
SysCommand("Copyfile","from$,dest$")

لطفا با ذکر مثال
با تشکر

CopyFile یک وظیفه مشخص داره که اونم کپی کردن فایل ئه. باید با XCOPY کپی رو انجام بدید و بعد اگه عملیات انتقال ئه مسیر مبدا رو با RMDIR حذف کنید :

کد:

source$ = 'E:\Folder 1'
dest$ = 'D:\Folder 2'
args$ = 'WAIT,HIDE /E /I /H /Y "' + source$ + '" "' + dest$ + '"'
Run("<System>\XCOPY.EXE","args$")

args$ = 'WAIT,HIDE /C "RMDIR /S /Q "' + source$ + '""'
Run("<System>\CMD.EXE","args$")

mojtabafuladii · Jun 19, 2019

the_king گفت:
CopyFile یک وظیفه مشخص داره که اونم کپی کردن فایل ئه. باید با XCOPY کپی رو انجام بدید و بعد اگه عملیات انتقال ئه مسیر مبدا رو با RMDIR حذف کنید :

کد:

source$ = 'E:\Folder 1' dest$ = 'D:\Folder 2' args$ = 'WAIT,HIDE /E /I /H /Y "' + source$ + '" "' + dest$ + '"' Run("<System>\XCOPY.EXE","args$") args$ = 'WAIT,HIDE /C "RMDIR /S /Q "' + source$ + '""' Run("<System>\CMD.EXE","args$")

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

the_king · Jun 19, 2019

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

مشکلی نداره، عملیات انتقال (Move) کارش همینه. کپی میکنه به مقصد و بعد از مبدا پاک میکنه. عرض کردم که اگر عملیات انتقال ئه مسیر مبدا رو با RMDIR حذف کنید.
اگر عملیات تون انتقال نیست خوب کد RMDIR رو اجرا نکنید.