سوال: ساخت فایل Rar [بایگانی]

abolfazl-z

چهارشنبه 08 شهریور 1391, 11:13 صبح

سلام دوستان :لبخندساده:

چطوری میشه با وی بی یک فایل rar ساخت ؟؟؟؟؟؟؟ :متفکر::متفکر:

setroyd

چهارشنبه 08 شهریور 1391, 16:21 عصر

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

abolfazl-z

چهارشنبه 08 شهریور 1391, 17:50 عصر

مرسی :لبخندساده:

setroyd

چهارشنبه 08 شهریور 1391, 18:03 عصر

برای تشکر کامنت نزارید دکمه ی تشکر رو بزنید .

just4froum

چهارشنبه 08 شهریور 1391, 20:36 عصر

با سلام :

با shell می تونی چنین کاری رو بکنی ولی حتما باید Winrar نصب باشه.

دقیقا یادم نیست Winrar رو بریز بعد Help شو بخون توش دستوراتشو نوشته.

one hacker alone

چهارشنبه 08 شهریور 1391, 21:30 عصر

سلام
برای اینکار ما چند راه منطقی و غیر منطقی داریم
1- اسرار ما استفاده از برنامه نصب شده بر روی سیستم کاربر باشه
در این حالت گام اول اینه که چک کنیم ایا برنامه winrar روی سیستم طرف نصب هست یا نه اگه نصب باشه به مسیر نصب میریم و با دستور rar از طریق شل فایلمون رو فشرده میکنیم یعنی با shell به مسیر نصب میریم و اونجا با نسخه کنسول برنامه کارمون رو انجام میدیم استفاده از شل برای حالی هست که ما بخوایم به صورت مخفی کار رو انجام بدیم

2- راه حل دوم استفاده از کامپوننت های برنامه winrar هست

3- این راه حل برای حالتی هست که شما بخواهین از دستورات خود ویندوز استفاده کنین که زیاد جواب گو نیست و خروجی هم rar نیست و این کار با دستور Compact انجام میشه

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

5- استفاده از کامپوننت های اماده که تو اینترنت هست

6- اگر شما بخواهین این کار آشکارا انجام بشه کارتون خیلی راحت میشه چون میتونید نسخه کنسول برنامه winrar رو در برنامه خودتون به صورت Embed قرار بدین و در هر سیستمی که خواستین فایل خودتون رو فشرده کنین

mohammadriano

چهارشنبه 08 شهریور 1391, 22:47 عصر

سلام دوستان :لبخندساده:
چطوری میشه با وی بی یک فایل rar ساخت ؟؟؟؟؟؟؟ :متفکر::متفکر:
ساختن فایل Rar مشکلی نداره یک فایل Rar رو بسازید و در کنار فایل اجرایی قرار بدید App.Patch و در مسیر دلخواه - کپی و تغییر نام - رو انجام بدید

Dim fs As Variant
Set fs = CreateObject("scripting.filesystemobject")
fs.copyfile app.patch+ "\newrar.rar", "e:\mydata\bestdata\"
Name "e:\mydata\bestdata\newrar.rar" As "e:\mydata\bestdata\yourname.rar"

این جواب شما

حال انتقال فایل ها به داخل فایل rar مسئله است نه ساخت فایل rar