ASP.NET：圖片不顯示

Question

Protected Sub Upload_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Upload.Click 
    If Me.FileUpload1.HasFile Then 

     Dim intWidth, intHeight As Integer 
     Dim UlFileName, NewFileName As String 

     intWidth = 200 '*** Fix Width ***' 
     intHeight = 0 '*** If = 0 Auto Re-Cal Size ***' 
     'intHeight = 120 

     If Path.GetExtension(FileUpload1.FileName).ToLower <> ".gif" Then 
      'Pop Up. File needs to be a GIF 
      vLabel.Text = "Only .GIF files allowed. Please convert your image to a .GIF" 

     Else 

      UlFileName = "\\bk00app0001\Images\Temp_" & Me.ItemNumber.Text & "_" & Me.Year.Text & Path.GetExtension(FileUpload1.FileName).ToLower 


      '*** Save Images ***' 
      Me.FileUpload1.SaveAs(UlFileName) 

      NewFileName = "\\bk00app0001\Images\" & Me.ItemNumber.Text & "_" & Me.Year.Text & Path.GetExtension(FileUpload1.FileName).ToLower 

      Dim objGraphic As System.Drawing.Image = System.Drawing.Image.FromFile(UlFileName) 

      Dim objBitmap As Bitmap 
      '*** Calculate Height ***' 
      If intHeight > 0 Then 
       objBitmap = New Bitmap(objGraphic, intWidth, intHeight) 
      Else 
       If objGraphic.Width > intWidth Then 
        Dim ratio As Double = objGraphic.Height/objGraphic.Width 
        intHeight = ratio * intWidth 
        objBitmap = New Bitmap(objGraphic, intWidth, intHeight) 
       Else 
        objBitmap = New Bitmap(objGraphic) 
       End If 
      End If 

      '*** Save As ***' 
      objBitmap.Save(NewFileName, objGraphic.RawFormat) 

      '*** Close ***' 
      objGraphic.Dispose() 

      '*** Delete Original Image ***' 
      File.Delete(UlFileName) 

      '*** View Images ***' 
      Me.imgPicture.Visible = True 
      Me.imgPicture.ImageUrl = NewFileName 

     End If 
    End If 
End Sub 

圖片後上傳它沒有顯示在網頁上像它應該是：

   '*** View Images ***' 
      Me.imgPicture.Visible = True 
      Me.imgPicture.ImageUrl = NewFileName 

謝謝！

Answer 1

好像你的路徑不正確，請儘量使用Server.MapPath() 請仔細閱讀本文檔中關於ASP.NET Web Project Paths