مشکل در بازیابی عکس

[rahil_2007]

با سلام
من کد زیر را برای ذخیره در بانک نوشتم . اما هنگام بازیابی از بانک عکس را نمایش نمی دهد:

ProtectedSub Submit_Click(ByVal sender AsObject, ByVal e As System.EventArgs)
' get the application path

Dim savePath AsString = Request.PhysicalApplicationPath
' uploads to a special upload folder

savePath += "uploads\"

If FileUpload1.HasFile Then' verify if there is file to upload

savePath += FileUpload1.FileName
' existing file will be overwritten

FileUpload1.SaveAs(savePath)
Response.Write("File uploaded successfully!")
Else

Response.Write("No file to upload")
EndIf

EndSub

[__H2__]

سلام
این کد شما که اصلاً ارتباطی با بانک ندارد؟؟؟؟؟؟!!!!!!!
فایل آپلود شده را در هارد سرور ذخیره میکند، نمایشش هم خیلی آسان است، کافیست url وبی را وارد نمایید.

برای مسیر هم بهتر است از MapPath استفاده کنید. (یک خط کد نویسی به جای چند خط!)

[headphone]

برای ذخیره عکس از این کد استفاده کن.مثلا در یک Button
Imports System.IO
PrivateSub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim ms AsNew MemoryStream
PictureBox1.Image.Save(ms, PictureBox1.Image.RawFormat)
Dim arrimage() AsByte = ms.GetBuffer
ms.Close()
'------------------------------------------------------------------
SqlDataAdapter1.Fill(DataSet11, "Picture")
Dim dt AsNew DataTable
dt = DataSet11.Tables(0)
dr = dt.NewRow()
dr("Name_User") = TextBox1.Text
dr("Piture") = arrimage
dt.Rows.Add(dr)
SqlDataAdapter1.Update(DataSet11, "Picture")
EndSub

[touraj]

همونطور که H2 گفت، اینی که شما نوشتی ربطی به بانک نداره.
اما میتونی از این کدها برای ذخیره و بازیابی عکس در بانک استفاده کنی.
ذخیره:

Dim P AsByte() = My.Computer.FileSystem.ReadAllBytes("C:\picture.jpg")
خواندن عکس:

Dim Mem AsNew IO.MemoryStream(P)
PictureBox1.Image = Image.FromStream(Mem)

[saman_itc]

آقای H2 مقاله ای در این مورد عکس تو سایت دادن که میتونی همه شمکلات تو با عکس حل کنی