ذخیره کردن عکس در 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 (%20Erdik007@yahoo.com) Email :

[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 :

[mohamadsamin]

یه کم واضح تر بنویسی ممنون می شم

[gavanbakht]

ذخیره تصاویر در SQL Server (http://www.developercenter.ir/Forum/showthread.php?t=1136)

[sh2007]

ذخیره تصاویر در SQL Server (http://www.developercenter.ir/Forum/showthread.php?t=1136)

سلام نمي شه اون پروژه رو اينجا بذاري تا ما استفاده كنيم و سطح معلوماتمون رو بالا ببريم
ممنون

[mohamadsamin]

راست می گن. با شرمندگی برنامه vb برای ثبت عکس در sql می خوام
سلام نمي شه اون پروژه رو اينجا بذاري تا ما استفاده كنيم و سطح معلوماتمون رو بالا ببريم
ممنون

[hamidrt]

سلام
چطور ميشه فايلها را در فايل سرور نگهداري كرد و آدرس تنها را ذخيره كرد و در هنگام باز كردن فايل توسط كاربران آنها را به يك پوشه خاص در كامپيوتر آنها فرستاد و سپس باز كرد

[fariba.kalateh]

سلام .
من با این روش نتونستم عکس ذخیره کنم قسمت st.read خطا داره نمی دونم چطوری این کارو انجام بدم ؟
لطفا کمک کنید فوری فوری