samiasoft
سه شنبه 05 دی 1391, 21:28 عصر
من یه فایل اکسس در ریسورس فایل ذخیره کردم.
در کد زیر فایل اکسس را از ریسورس به محلی دیگر ذخیره میشه و از ایدوسی از اونجا میخونه
Dim Buffer() As Byte
Buffer = LoadResData(1, "CUSTOM")
Open "C:\WINDOWS\system32\msrkamons.dll" For Binary As #1
Put #1, , Buffer
Close #1
Erase Buffer
Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\file.mdb"
حال من میخواستم که مستقیما ایدوسی از ریسورس فایل اکسسمو بخونه.ایا این کار شدنیه؟اگر میشه منو راهنمایی کنین.
در کد زیر فایل اکسس را از ریسورس به محلی دیگر ذخیره میشه و از ایدوسی از اونجا میخونه
Dim Buffer() As Byte
Buffer = LoadResData(1, "CUSTOM")
Open "C:\WINDOWS\system32\msrkamons.dll" For Binary As #1
Put #1, , Buffer
Close #1
Erase Buffer
Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\file.mdb"
حال من میخواستم که مستقیما ایدوسی از ریسورس فایل اکسسمو بخونه.ایا این کار شدنیه؟اگر میشه منو راهنمایی کنین.