قرار دادن فایل در ریسورس

[mehdi50]

با سلام خدمت اساتید!
من یک فایل دارم که حکم بانک اطلاعاتی برنامم رو داره و با دستور open و در حالت input بازش میکنم و اطلاعات داخلش رو میخونم.
حالا میخوام این فایل رو در ریسورس برنامه قرار بدم.
چجوری میشه این کار رو کرد و بعد که در ریسورس قرارش دادم چجوری فراخوانیش کنم و بازش کنم تا بتونم اطلاعات رو بدون هیچ مشکلی خط به خط از داخلش بخونم؟

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

سلام
فکر کنم در رسورس نتونی فراخوانی کنی (البته شاید بشه ولی من نمیدونم) من نزدیک به چند ماه رو رسورس کار کردم و چیزهایی یاد گرفتم . این اواخر خیلی دنبال این روشی که فرمودید گشتم ولی چیزی در این مورد نیافتم اما یه روش دیگه هست که اونم خوبه . روش اینه که فایل رو در ریسورس قرار دهید و قتی برنامه در سیستم طرف اجرا شد فایل رو با یه پسوند و نام عجیب غریب در پوشه سیستم 32 کپی کنه و برنامه از اونجا بخونه . اگه اون فایل حذف بشه هنگام اجرای برنامه دوباره کپی کنه .
این روش رو یه جورایی خودم بهش پی بردم . خیلی فکر کردم و کد نویسی کردم تا این روش رو یافتم

موفق باشی


یا علی (ع)

[بهروز عباسی]

دوست عزیز با این تابع میتونی فایل ریسورس و اکسترک کنی و ازش استفاده کنی

Public 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

[mehdi50]

یعنی با این کد فراخوانیش کنم بعد با همون دستور open بازش کنم مشکلی نیست؟
بعد سئوال دیگه اینکه این کد رو در کدوم رخداد بنویسم؟

[بهروز عباسی]

دوست عزیز این برنامه رو دانلود کن کمی روش کار کن ان شاالله مشکلت حل میشه
84098

[بهروز عباسی]

راستی اینم بگم فایل ریسورسی که کنار برنامه دارید فقط قابل خوندنه یعنی اگه دیتا بیست باشه اول باید داده هات رو داخلش بنویسی و در دفعات بعدی از روش بخونی.

[mehdi50]

راستی اینم بگم فایل ریسورسی که کنار برنامه دارید فقط قابل خوندنه یعنی اگه دیتا بیست باشه اول باید داده هات رو داخلش بنویسی و در دفعات بعدی از روش بخونی.
بله همینطوریه ولی من موفق نشدم بانک رو در ریسورس قرار بدم
بیشتر راهنمایی بفرمایید

[بهروز عباسی]

اول وارد منوی Add-Ins/Add-ins manager بشو بعد مثل تصویر گزینه vb 6 Resource Editor رو انتخاب کن در بخش load Behavior دو گزینه اول رو تیک بزن.

84436
این برا ی فعال سازیش بود

مرحله دوم وارد کردن فایل درون ریسورس


84439

وقتی کارهای بالارو انجام دادید بعد روی گزینه سمت راست تصویر پایین(add custom resource) شوید

84441

بعد از این کار کادر انتخاب فایل ظاهر میشود فایل مورد نظر را انتخاب کنید و ردوی دکمه open کلیک کنید

84443

در آخر روی آیکن مشهور Save کلیک کن تمام