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

[nazanin_90]

سلام
آیا راهی وجود دارد مادامیکه یک برنامه در حال اجرا است عمل کپی گرفتن یا کات کردن آن وجود نداشته باشد؟
با تشکر

[محسن واژدی]

سلام علیکم
میتوانید فایل برنامه را مادامیکه در حال اجراست، با Open باز و دسترسی خواندن و نوشتن آنرا قفل کنید در اینصورت در روش های معمول امکان کپی و انتقال وجود ندارد:
Open App.Path & "\" & App.EXEName & ".exe" For Binary Lock Read Write As #1


موفق باشید

[nazanin_90]

سلام علیکم
میتوانید فایل برنامه را مادامیکه در حال اجراست، با Open باز و دسترسی خواندن و نوشتن آنرا قفل کنید در اینصورت در روش های معمول امکان کپی و انتقال وجود ندارد:
Open App.Path & "\" & App.EXEName & ".exe" For Binary Lock Read Write As #1


موفق باشید
سلام جناب واژدی !
ظاهراً باکد فوق یک فایل مستقل با عنوان و پسوند exe . یاهر پسوند دیگری بجای exe ایجاد میشود .که همانطور که فرمودید این فایل تا زمان باز بودن یا اجرای برنامه قابل انتقال یا کپی شدن نمی باشد. اما منظور من اینست که همان فایل db1.mdb که در کنار برنامه است قابل انتقال یا کپی شدن نباشد البته نه بصورتی که دسترسی خواندن و نوشتن آن قفل شود ،چون قرار است در زمان اجرای برنامه اصلی این فایل نیز باز شده و عملیات خواندن و نوشتن و ... بر روی آن انجام شود.
با تشکر

[سید حمید حق پرست]

سلام جناب واژدی !
ظاهراً باکد فوق یک فایل مستقل با عنوان و پسوند exe . یاهر پسوند دیگری بجای exe ایجاد میشود .که همانطور که فرمودید این فایل تا زمان باز بودن یا اجرای برنامه قابل انتقال یا کپی شدن نمی باشد. اما منظور من اینست که همان فایل db1.mdb که در کنار برنامه است قابل انتقال یا کپی شدن نباشد البته نه بصورتی که دسترسی خواندن و نوشتن آن قفل شود ،چون قرار است در زمان اجرای برنامه اصلی این فایل نیز باز شده و عملیات خواندن و نوشتن و ... بر روی آن انجام شود.
با تشکر
سلام
در کدتون یک اشتباه وجود داره که شما پسوند رو exe قرار دادید و اسم فایل db1 هم جدا نوشتید
کد باید به شکل زیر بنویسید :
Open App.Path & "\db1.mdb" For Binary Lock Read Write As #1
موفق باشید

یا علی (ع)