I wan't your help in Inserting and selecting image from DB

[developers]

Hello Every One ,
I need Help in inserting the user image in my data base. but
unfortunatly I don't know how.I'm using asp with sql server. I tried to
insert the image and i geuss it worked.for the field in the db in not
null and it have this value <Binary> . but when i try to select it in
gives me this error "An unhandled data type was encountered".
this is my code :

To insert the image
sql="insert into users_img (user_image,use r_id) values
('"&image&"','" &userid&"')"
set rs=conn.Execute (sql)

to Select the image :
sql="select * from users_img where user_id='"&user id&"'"
set rs=conn.Execute (sql)
Response.Conten tType = "image/jpg"
Response.Binary Write rs("adv_image" )

Realy Need Your help
thanx alot
Yours, Maii Ali
*** Sent via Developersdex http://www.developersdex.com ***

[Dave Anderson]

developers wrote:

I need Help in inserting the user image in my data base. but
unfortunatly I don't know how.I'm using asp with sql server. I tried
to insert the image and i geuss it worked.for the field in the db in
not null and it have this value <Binary> . but when i try to select
it in gives me this error "An unhandled data type was encountered".
this is my code :

To insert the image
sql="insert into users_img (user_image,use r_id) values
('"&image&"','" &userid&"')"
set rs=conn.Execute (sql)
I don't think you can insert the image as text. This is almost certainly
your problem.
to Select the image :
sql="select * from users_img where user_id='"&user id&"'"
set rs=conn.Execute (sql)
Response.Conten tType = "image/jpg"
Response.Binary Write rs("adv_image" )

1. If you are only going to use [adv_image], why select[*] ?
2. Test for existence.
3. Default properties hurt my eyes. Get in the habit of using explicitly
named ones.
4. When your browser *uploads* JPG images, it sends "image/jpeg", not
"image/jpg", so you should send it back the same way.

Set rs = conn.Execute(sq l)
If NOT rs.EOF Then
Response.Conten tType = "image/jpeg"
Response.Binary Write(rs.Fields ("adv_image").V alue
Else
Response.Redire ct("NotFound.jp g")
End If

--
Dave Anderson

Unsolicited commercial email will be read at a cost of $500 per message. Use
of this email address implies consent to these terms.