اجرای اتوران با تشخیص حجم فایل یا وفولدر (خیلی فوری)

torist · Sep 10, 2011

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

loo30fer · Sep 10, 2011

کد:

FileExist("C:\File.chk","i1")
FileExist("C:\Folder","i2")
If (i1<>1 | i2<>1) Then
  Exit()
End

torist · Sep 12, 2011

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

m javad · Sep 12, 2011

من می خوام که قبل از اجرا بره یه فایلی رو چه از روی دیسک و بعد از روی هارد از لحاظ حجم اندازه بگیره ....

وقتی هنوز اجرا نشده ، چطوری چک کنه !!!!!
برای به دست آوردن حجم یه فایل از پلاگین کمک بگیرید:
کد برای پلاگین MFilesAndFolders:

کد:

set$='c:\MyApp.exe|KB'
PluginSet("MFilesAndFolders","set$")
PluginRun("MFilesAndFolders","Get_File_Size")
PluginGet("MFilesAndFolders","get$")
If (get$='error') Then
Message("File not found","")
Else
get$=get$+' KB'
Message("Size of file is","get$")
End