مشکل:عدم نمایش تصاویر در گریدویو
سلام
من برای ذخیره و بازیابی تصاویر در دیتابیس لز روش زیر استفاده کردم ولی فیلد image در گرید ویو خالی است و تصویری نمایش داده نمیشود.من روش کار ودر در اینجا قرار دادم اگر دوستان محبت کنند اون را چک کنند ممنون میشوم..البته یکی از دوستان خیلی فعال در زمینه برنامه نویسی به من گفته که برنامه مشکلی ندارد ولی نمیدونم چرا من که اجرا میکنم تصویری نمایش داده نمیشود.
من از کد زیر برای ذخیره تصویر استفاده کردم
کد:
Dim id As Integer
id = textbox1.text
' Create a byte[] from the input file
Dim len As Integer = FileUpload1.PostedFile.ContentLength
Dim pic() As Byte = New Byte(len) {}
FileUpload1.PostedFile.InputStream.Read(pic, 0, len)
' Insert the image and comment into the database
Dim connection As New SqlConnection(ConfigurationManager.ConnectionStrings("ssgshopConnectionString").ConnectionString)
Try
connection.Open()
Dim cmd As SqlCommand
cmd = New SqlCommand("insert into tablighat " + "(Picture, Commen,PicId) values (@pic, @text,@picId)", connection)
cmd.Parameters.Add("@pic", pic)
cmd.Parameters.Add("@text", "Your Comment")tttt
cmd.Parameters.Add("@picId", id)
cmd.ExecuteNonQuery()
Finally
connection.Close()
End Try
برای بازیابی تصویر نیز از کد زیر استفاده کردم(در صفحه retriveimage.aspx)
کد:
کد:
Dim id As String
id = Request.QueryString("id")
Dim stream As MemoryStream = New MemoryStream()
Dim connection As New SqlConnection(ConfigurationManager.ConnectionStrings("ssgshopConnectionString").ConnectionString)
Try
connection.Open()
Dim command As SqlCommand
command = New SqlCommand("select Picture from tablighat where picid=" + id, connection)
Dim image() As Byte = CType(Command.ExecuteScalar(), Byte())
stream.Write(image, 0, image.Length)
Dim bitmap As bitmap = New Bitmap(stream)
Response.ContentType = "image/jpeg"
bitmap.Save(Response.OutputStream, ImageFormat.Jpeg)
Finally
connection.Close()
stream.Close()
End Try
بعد در یک usercontrol از کد زیر استفاده کردم
کد:
کد:
Dim _id As String
Public Property AdvertisId() As String
Get
Return Me._id
End Get
Set(ByVal value As String)
Me._id = value
Call FillInfo()
End Set
End Property
Public Sub FillInfo()
Image1.ImageUrl = "~/retriveimage.aspx?id=" + (Me._id)
End Sub
ودر صفحه ای دیگر برای نمایش تصاویر یک گریدویو قرار دادم وگرید ویو را با usercontrol پر کردم.
کد:
کد:
<asp:GridView ID="GridView1" runat="server" DataSourceID="SqlDataSource1">
<Columns>
<asp:TemplateField>
<ItemTemplate>
<uc1:tablighat ID="Tablighat1" runat="server" advertisID='<%# Eval("picid") %>' />
</ItemTemplate>
</asp:TemplateField>
</Columns>
</asp:GridView>
