امتیاز موضوع:
  • 0 رأی - میانگین امتیازات: 0
  • 1
  • 2
  • 3
  • 4
  • 5
کپی کردن هر نوع فایل ؟! و ...
نویسنده پیام
User-Name آفلاین
كاربر تک ستاره
*

ارسال‌ها: 39
موضوع‌ها: 7
تاریخ عضویت: اردیبهشت ۱۳۸۵

تشکرها : 0
( 0 تشکر در 0 ارسال )
ارسال: #1
کپی کردن هر نوع فایل ؟! و ...
سلام
اینکه مثلا یک فایل exe یا عکس و یا هر نوع فایلی رو
چطور میشه به صورت RES داخل برنامه گذاشت و مثلا کلیدی گذاشت تا اون فایل رو در آدرسی که ما میخواهیم کپی کنه


سوال بعدی در مورد مسیر های ویندوز هست
چطور میشه مثلا system32 ر در هر کامپوتری مقصد قرار داد
چون مثلا ویندوز طرف روی درایو D باشه ..... !!!

سوال بعدی هم در مورد اینکه چطور میشه فایل مشخصی رو که در آدرس معینی قرار داره Delete کرد

اگر سورس بزارید با توضیحات لازم ممنون میشم

البته احتمال میدم که این مباحث قبلا تکرار شده
اما من گشتم پیدا نکردم
ممنون میشم
خدانگهدار
۲۸-خرداد-۱۳۸۵, ۱۹:۳۹:۵۸
ارسال‌ها
پاسخ
محمد حسینی آفلاین
کاربر فعال بخش رباتیک
****

ارسال‌ها: 1,363
موضوع‌ها: 139
تاریخ عضویت: آذر ۱۳۸۴

تشکرها : 974
( 1781 تشکر در 620 ارسال )
ارسال: #2
RE: کپی کردن هر نوع فایل ؟! و ...
از منوی add in manager
resource editor رو add کن. بعد هر فایلی رو با add custom اضافه کن.
با این می تونی کپیش کنی

کد:
Private Sub RES_Extract(ID_Ressource As String, Typ_Ressource As String, FileName As String)
  Dim sType As String
  Dim lFile As Long
  Dim lID As Long
  Dim Mt() As Byte
  On Error Resume Next
  lFile = FreeFile
  Open FileName For Binary As #lFile
  lID = CLng(ID_Ressource)
  sType = Typ_Ressource
  Mt = LoadResData(lID, sType)
  Put #lFile, , Mt()
  Close #lFile
End Sub

به راه بادیه رفتن، به از نشستن باطل ------------- اگرچه وصل نیابم، بقدر وسع بکوشمRolleyes
۲۸-خرداد-۱۳۸۵, ۲۰:۲۹:۳۱
ارسال‌ها
پاسخ
محمد حسینی آفلاین
کاربر فعال بخش رباتیک
****

ارسال‌ها: 1,363
موضوع‌ها: 139
تاریخ عضویت: آذر ۱۳۸۴

تشکرها : 974
( 1781 تشکر در 620 ارسال )
ارسال: #3
RE: کپی کردن هر نوع فایل ؟! و ...
سوال دوم هم با API
getwindowsdirectory
getsystemdirectory
gettemppath

یه متغیر معرفی کن . چندتا space بزن توش Biggrin  بعد با اون API ها مسیر پیدا کن بعد با Trim فاصله رو حذف کن. اگه سرچ می کردی توضیح کامل هم پیدا می شد. تنبل Biggrin  (شوخی کردم!)

به راه بادیه رفتن، به از نشستن باطل ------------- اگرچه وصل نیابم، بقدر وسع بکوشمRolleyes
(آخرین ویرایش در این ارسال: ۲۸-خرداد-۱۳۸۵, ۲۰:۳۸:۴۴، توسط محمد حسینی.)
۲۸-خرداد-۱۳۸۵, ۲۰:۳۴:۲۶
ارسال‌ها
پاسخ
User-Name آفلاین
كاربر تک ستاره
*

ارسال‌ها: 39
موضوع‌ها: 7
تاریخ عضویت: اردیبهشت ۱۳۸۵

تشکرها : 0
( 0 تشکر در 0 ارسال )
ارسال: #4
RE: کپی کردن هر نوع فایل ؟! و ...
مرسی
ولی
؟!
فکر کنم چند جای کد مثل اینا که گفتم نیاز به توضیح داره
ID_Ressource
Typ_Ressource
۲۹-خرداد-۱۳۸۵, ۰۰:۴۴:۱۷
ارسال‌ها
پاسخ
User-Name آفلاین
كاربر تک ستاره
*

ارسال‌ها: 39
موضوع‌ها: 7
تاریخ عضویت: اردیبهشت ۱۳۸۵

تشکرها : 0
( 0 تشکر در 0 ارسال )
ارسال: #5
RE: کپی کردن هر نوع فایل ؟! و ...
کاش سورس میزاشتی
اونجوری بهتر بود

و اینکه من میخواستم تو آدرس مشخصی کپی بشه
اگر سورس بدین ممنون میشم
اینجوری چیزی مشخص نیست
(آخرین ویرایش در این ارسال: ۲۹-خرداد-۱۳۸۵, ۰۱:۵۹:۵۳، توسط User-Name.)
۲۹-خرداد-۱۳۸۵, ۰۱:۵۵:۳۱
ارسال‌ها
پاسخ
hamed_Arfaee آفلاین
مدیر بخش
*****

ارسال‌ها: 1,334
موضوع‌ها: 231
تاریخ عضویت: تير ۱۳۸۳

تشکرها : 1250
( 2635 تشکر در 730 ارسال )
ارسال: #6
RE: کپی کردن هر نوع فایل ؟! و ...
با سلام
مرد عنکبوتی یک زیر برنامه نوشته که با دریافت سه رشته فایل رو استخراج می کند به صورت زیر :
ID_Ressource شماره ای که کنار فایلهای ریسورست زده که معمولا از 101 شروع می شن

Typ_Ressource نوع داده ی ریسورس است که بطور پیشفرض CUSTOM نام گذاری می شود و با دابل کلیک روی فایل ریسورس می تونی همه اینا رو ببینی
آخرین آرگومان هم مر بوط به آدرس فایل هست که می خواهی در آنجا ذخیره شود
-----------------------------------------------------------
برای استفاده از ای پی آی هم می تونی از برنامه API text viewer استفاده کنی و داخل آن فایل متنی زیر رو باز کنی :
Win32API.txt
ونحوه فراخوانی تابع مورد نظر رو ببینی و کپی کنی
فقط اگر داخل بخش جنرال فرم بنویسی (فراخوانی تابع رو میگم)باید Public رو به Private تغییر بدی
و در ضمن برای استفاده از تابع می تونی از مثال زیر استفاده کنی :
کد:
dim Sysdir as string
sysdir=space(255)
getsystemdirectory sysdir ,255
text1.text=trim(sysdir)
برای حذف فایل می تونی از Kill استفاده کنی که بعد از دستور باید آدرس فایل رو هم بنویسی البته می تونی از API هم استفاده کنی که اونو هم می تونی از همون api text viewer  که به اسم Public Declare Function
deletefile
هست پیدا کنی

حامد ارفعی

موفقيت، پيش رفتن است، نه به نقطه ي پايان رسيدن.(آنتوني رابينز)


تریگرها در SQL server

آیا میدانید SQL ای
(آخرین ویرایش در این ارسال: ۲۹-خرداد-۱۳۸۵, ۰۲:۴۱:۱۵، توسط hamed_Arfaee.)
۲۹-خرداد-۱۳۸۵, ۰۲:۳۸:۳۰
وب سایت ارسال‌ها
پاسخ
User-Name آفلاین
كاربر تک ستاره
*

ارسال‌ها: 39
موضوع‌ها: 7
تاریخ عضویت: اردیبهشت ۱۳۸۵

تشکرها : 0
( 0 تشکر در 0 ارسال )
ارسال: #7
RE: کپی کردن هر نوع فایل ؟! و ...
متوجه این نشدم :
آخرین آرگومان هم مر بوط به آدرس فایل هست که می خواهی در آنجا ذخیره شود

؟؟؟؟؟؟؟!!!!!
مرسی به خاطر توضیحاتتت
۲۹-خرداد-۱۳۸۵, ۰۳:۰۳:۴۲
ارسال‌ها
پاسخ
hamed_Arfaee آفلاین
مدیر بخش
*****

ارسال‌ها: 1,334
موضوع‌ها: 231
تاریخ عضویت: تير ۱۳۸۳

تشکرها : 1250
( 2635 تشکر در 730 ارسال )
ارسال: #8
RE: کپی کردن هر نوع فایل ؟! و ...
فایل ریسورس برای اجرا رشدن باید بصورت باینر ی یکجای هارد ذخیره بشه و به اوجایی که ذخیره بشه آدرسشو می نویسی مثلا :
C:\test\App.exe

حامد ارفعی

موفقيت، پيش رفتن است، نه به نقطه ي پايان رسيدن.(آنتوني رابينز)


تریگرها در SQL server

آیا میدانید SQL ای
۲۹-خرداد-۱۳۸۵, ۰۳:۱۸:۵۹
وب سایت ارسال‌ها
پاسخ
User-Name آفلاین
كاربر تک ستاره
*

ارسال‌ها: 39
موضوع‌ها: 7
تاریخ عضویت: اردیبهشت ۱۳۸۵

تشکرها : 0
( 0 تشکر در 0 ارسال )
ارسال: #9
RE: کپی کردن هر نوع فایل ؟! و ...
متوجه شدم
آدرس باید کجای کد اضافه بشه ؟!
۲۹-خرداد-۱۳۸۵, ۰۳:۵۷:۲۹
ارسال‌ها
پاسخ
محمد حسینی آفلاین
کاربر فعال بخش رباتیک
****

ارسال‌ها: 1,363
موضوع‌ها: 139
تاریخ عضویت: آذر ۱۳۸۴

تشکرها : 974
( 1781 تشکر در 620 ارسال )
ارسال: #10
RE: کپی کردن هر نوع فایل ؟! و ...
تابع res_extract رو که نوشتی بجای filename (که همون آرگومان آخر) آدرس رو بنویس

به راه بادیه رفتن، به از نشستن باطل ------------- اگرچه وصل نیابم، بقدر وسع بکوشمRolleyes
۲۹-خرداد-۱۳۸۵, ۱۱:۱۵:۵۵
ارسال‌ها
پاسخ
محمد حسینی آفلاین
کاربر فعال بخش رباتیک
****

ارسال‌ها: 1,363
موضوع‌ها: 139
تاریخ عضویت: آذر ۱۳۸۴

تشکرها : 974
( 1781 تشکر در 620 ارسال )
ارسال: #11
RE: کپی کردن هر نوع فایل ؟! و ...
منم به یه مشکلی بر خوردم. وقتی آدرس پوشه ویندوز یا temp رو در میارم. آخرش یه space می مونه! (بعد از trim). وقتی میزارمش تو یه تکست باکس حذف میشه. کسی میدونه باید چیکار کرد. حامد جان همون کدی که خودت نوشتی رو با debug.print امتحان کن. من برامم فقط یه sub main داره. تکست باکس هم ندارم که بفرستمش اونجا تا فاصله آخرش حذف بشه. چیکار کنم؟!

به راه بادیه رفتن، به از نشستن باطل ------------- اگرچه وصل نیابم، بقدر وسع بکوشمRolleyes
۲۹-خرداد-۱۳۸۵, ۱۲:۵۴:۴۹
ارسال‌ها
پاسخ


موضوعات مرتبط با این موضوع...
موضوع نویسنده پاسخ بازدید آخرین ارسال
Shy [فوری] خواندن فایل تکست و تبدیل آن به فایل اکسل توسط CommandButton ahmadelectron 1 3,530 ۰۵-خرداد-۱۳۹۴, ۱۶:۵۲:۲۷
آخرین ارسال: Ghoghnus
  پیدا کردن فایل ها با پسوند خاص و کپی آن ها در یک فولدر ppcsoft 5 8,156 ۰۹-بهمن-۱۳۹۱, ۱۹:۳۷:۲۶
آخرین ارسال: fararaz
  پیدا کردن یک فایل در کامپیوتر با ویژوال بیسیک silent718 11 11,632 ۱۱-مهر-۱۳۹۱, ۰۸:۱۰:۵۲
آخرین ارسال: loack
  ایجاد فایل فوق مخفی از فایل اجرایی برناممون RAMA2009 1 4,326 ۰۸-اردیبهشت-۱۳۹۱, ۱۰:۲۶:۱۷
آخرین ارسال: Ghoghnus
  اتوران کردن فایل ها در فلش مموری download69 10 28,308 ۲۷-فروردین-۱۳۹۱, ۲۰:۳۸:۲۷
آخرین ارسال: iman2025
  bind کردن برنامه vb با یه فایل دیگه RAMA2009 22 10,587 ۱۱-بهمن-۱۳۹۰, ۱۲:۱۳:۳۲
آخرین ارسال: Payman62
  پاک کردن یه فایل از رجستری _soda_ 7 6,930 ۲۸-دى-۱۳۹۰, ۱۱:۲۴:۲۸
آخرین ارسال: Payman62
  replace کردن یا delete کردن فایل سیستمی ویندوز ppcsoft 6 5,903 ۱۳-آذر-۱۳۹۰, ۲۲:۰۵:۰۶
آخرین ارسال: ppcsoft
Wink openwith کردن فایل مخصوص برنامه خودمون (خیلی خیلی مهم) naser13 6 8,088 ۰۷-شهریور-۱۳۹۰, ۱۲:۰۰:۴۲
آخرین ارسال: AbbasShVB
  [سوال] connectionString ها و مشکل در atach کردن فایل در VB one hacker alone 1 3,210 ۳۱-تير-۱۳۹۰, ۰۲:۰۵:۰۳
آخرین ارسال: Shayani

پرش به انجمن:


کاربرانِ درحال بازدید از این موضوع:

صفحه‌ی تماس | IranVig | بازگشت به بالا | | بایگانی | پیوند سایتی RSS