이미지 컨트롤에 uploded 이미지 표시

내 웹 사이트 폴더에있는 폴더에 이미지를 업로드 한 다음 데이터베이스 경로를 저장하고 컨트롤 이미지에 업로드 된 이미지를 표시하려고합니다. 내 페이지를 실행하면 이미지가 성공적으로 업로드되고 데이터베이스에 저장되지만 이미지 컨트롤에 표시됩니다. 이미지 컨트롤에 uploded 이미지 표시

이

내이다 :

<%@ Page Language="VB" AutoEventWireup="false" CodeFile="Default.aspx.vb" Inherits="_Default" %> 

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"> 

<html xmlns="http://www.w3.org/1999/xhtml"> 
<head runat="server"> 
    <title></title> 
</head> 
<body> 
    <form id="form1" runat="server"> 
    <div> 

    </div> 
    <asp:FileUpload ID="FileUpload1" runat="server" /> 
    <asp:Button ID="Button1" runat="server" Text="Button" /> 
    <asp:Image ID="Image1" runat="server" Height="91px" Width="145px" /> 
    </form> 

    <p> 
     &nbsp;</p> 

</body> 
</html>

이 내 코드입니다 :

Imports System.Data.SqlClient 
Imports System.IO 
Imports System.Data 

Partial Class _Default 
    Inherits System.Web.UI.Page 
    Dim cn As SqlConnection 

    Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click 
     If FileUpload1.PostedFile IsNot Nothing Then 
      Dim FileName As String = Path.GetFileName(FileUpload1.PostedFile.FileName) 

      'Save files to disk 
      FileUpload1.SaveAs(Server.MapPath("~/im/" & FileName)) 

      'Add Entry to DataBase 

      Dim strQuery As String = "insert into dbo.images" & " values(@FileName, @FilePath)" 
      Dim cmd As New SqlCommand(strQuery) 
      cmd.Parameters.AddWithValue("@FileName", FileName) 
      cmd.Parameters.AddWithValue("@FilePath", "~/im/" & FileName) 
      cmd.CommandType = CommandType.Text 
      cmd.Connection = cn 

      Try 
       cn.Open() 
       cmd.ExecuteNonQuery() 

      Catch ex As Exception 
       Response.Write(ex.Message) 
      Finally 

       cn.Close() 
       cn.Dispose() 
      End Try 
     End If 
    End Sub 

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load 
     cn = New SqlConnection("server=SEVO-PC;initial catalog=controle;integrated security=true") 
    End Sub 

    Protected Sub FileUpload1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles FileUpload1.Load 
     Image1.ImageUrl = "im/" & FileUpload1.FileName 

    End Sub 
End Class

출처

2013-05-13 Med Mohamed

다음 편집을 시도

Protected Sub FileUpload1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles FileUpload1.Load 
     Image1.ImageUrl = Server.MapPath("/im/") & FileUpload1.FileName 

    End Sub

출처

2013-05-13 18:02:06 Marcianin

이미지 컨트롤에 uploded 이미지 표시

답변

관련 문제