ذخیره سازی تصویر در adodc

[parsbin]

برای ذخیره سازی تصویر در فرم vb که با adodc به اکسس لینک شده مشکل دارم
اول این که اون فیلد باید چه خاصیتی داشته باشه؟
بعد هم آیا اصلا چنین چیزی امکان داره؟ذخیره تصویر در دیتابیس اکسس؟
اگر راهنمایی کنید یا یک نمونه برام بزارید خیلی ممنون میشم:خجالت:

[Payam Moradi]

شما نگشته سوال کردید؟
در این سایت بحث زیادی شده و اینم فقط یک نمونش:
http://www.barnamenevis.org/forum/showthread.php?t=58136

اگه نشه، اکسس رو بریز دوووور.:چشمک:

[sjj]

اگه بخواید از طریق OLE عکس رو در دیتابیس ذخیره کنید.با ADO نمی تونید این کار بکنید ولی با DAO میشه.اگه سرچ کنید به جواب های بهتری می رسید.

[romina2006]

اینم دو تا سورس همراه با یک فایل Pdf برای ذخیره کردن عکس در یک بانک اطلاعاتی اکسس :

ImageInDb.pdf (http://www.box.net/public/p1su57yn7q)

dbimage1 (http://www.box.net/public/u8qfmp3pdb)

DB%20Piced (http://www.box.net/public/py3g026evl)

[touraj]

روشی که من استفاده کردم یه کم طولانیه. اما جواب میده. توی Table اکسس یه فیلد درست کن با خاصیت text که آدرس محلی که عکس ذخیره شده توش ثبت بشه. توی فرمت هم یه TextBox درست کن که به همون فیلد لینک شده.
بعدش یه PictureBox رو فرم بذار و از دستور زیر اسفاده کن:
(PictureBox.Picture = LoadPicture(TxtBox.Text

[seeker]

خوب ایجوری اکس توی دیتابیس نیست فقط آدرسش هست
اگه عکس رو دیتابیس ole ذخیره کرده باشیم چی؟

[touraj]

خوب ایجوری اکس توی دیتابیس نیست فقط آدرسش هست
اگه عکس رو دیتابیس ole ذخیره کرده باشیم چی؟

دیتابیس اکسس نمیتونه عکس ذخیره کنه. یعنی من هر کاری کردم نتونستم.

[CodeMasterX]

اگه بخواید از طریق OLE عکس رو در دیتابیس ذخیره کنید.با ADO نمی تونید این کار بکنید ولی با DAO میشه.اگه سرچ کنید به جواب های بهتری می رسید.

اولا دوست عزیز تا از چیزی یقین پیدا نکردی جواب قطعی نده.کی گفته که با ADO نمیشه اینکار رو کرد ؟ این هم یه نمونه کد که خیلی ساده سک فایل رو با هر فرمتی در یک فیلد OLEDB در بانک MS Access اضافه میکنه.



Dim dataBytes() As Byte

ReDim dataBytes(FileLen("C:\ImageFile.Jpeg"))
Open "C:\ImageFile.Jpeg" For Binary As #1
Get #1,,dataBytes
Close #1


Dim dbConn As New ADODB.Connection
Dim dbRS As New ADODB.Recordset

dbConn.Open "ConnectionString"
dbRs.Open "SQLQuery"

dbRs.AddNew
dbRs.Fields("FieldName").AppendChunk dataBytes
dbRs.Update
dbRs.UpdateBatch adAffectAllChapters

dbRs.Close
dbConn.Close
در این که ConnectionString و SQLQuery دیگه باید براتون مفهوم باشه که چیرو باید براش جایگزین کنید.متد GetBytes هم که باز باید اطلاعا داشته باشید که اطلاعات فایل رو بصورت باینری میخونه و در متغیر مربوطه که از نوی بایت هست ذخیره میکنه.متد AppendChunk هم ایم اطلاعات باینری رو در فیلد OLEDB فلاش میکنه.
در ضمن اینرو هم یادتون نره که مایکروسافت در کتابخانه MSDN که برای Office2003 منتشر شد اعلام کرده که برای ذخیره فایل ها در بانک اکسس و فیلدهای OLEDB هر رکورد میتونه از 1GB استفاده کنه!

موفق باشید و قبل از هر اظهار نظری خوب تحقیق و مطالعه کنید!

[touraj]

آقا دستت درد نکنه. کلی کمک کردی

[MMR_1344]

سلام در رابطه با ارتباط با اکسل کسی چیزی میدنه یا کتابی رو میشناسه

[CodeMasterX]

سلام در رابطه با ارتباط با اکسل کسی چیزی میدنه یا کتابی رو میشناسه


ارتباط ور بی با اکسل چیز غولی نیست که یه کتاب براش بنویسن.
برو سراغ VBA(Visual Basic for Applications) توی سایت هم جستجو کنی 1000 تا مثال ارتباط وی بی با اکسل داریم.

[seeker]

میتونم بپرسم این یعنی چی؟

دیتابیس اکسس نمیتونه عکس ذخیره کنه. یعنی من هر کاری کردم نتونستم.
پس فیلد ole object رو برا چی ساختن؟