ذخیره کردن عکس در SQL Server 2000

[Bigestlier_3000]

من کدی را دارم که در آن با استفاده از ویژوال بیسیک می توان عکس را در بانک اطلاعاتی ذخیره کرد

--------------------

بسم الله الرحمن الرحیم

برای ذخیره عکس در بانک اطلاعاتی SQL Server نوع فیلد عکسی را که در آن جای می گیرد Image انتخاب می کنیم .
برای فعال سازی در Reference موارد زیر را انتخاب می کنیم:

Microsoft ActiveX Data Objects 2.7 Library

Microsoft ActiveX Data Objects Recordset 2.7 Library

حالا دیگه تخصصی می شه !؟
خط زیر متغیری تعریف می کند که فایلی را (هر فایلی عکس , متن و ...) در آن جای می گیرد:

Public st As New ADODB.Stream

کامپوننت زیر را فعال کنید (البته نه شما استاد گرامی).

CommonDialog

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

dbDialog.DialogTitle = "Open File"

CdbDialog.Filter = "*.jpg"

CdbDialog.ShowOpen

(Picture1.Picture = LoadPicture(CdbDialog.FileName

خط زیر را هم برای ذخیره کردن عکس در مسیر زیر است :

SavePicture Picture1.Picture, "c:\arm.bmp"

توضیحات : عکس درون کنترلر Picture Box را فایل قرار می دهد .

st.Read

st.LoadFromFile ("c:\temp\arm.bmp")

SeatRS.Fields("picture").Value = st.Read

مشکل بود ایمیل بزنین (انشاالله نمی شه).
Erdik007@yahoo.com Email :