上传文件的问题,Object reference not set to an instance of an object错误

gzhantonio 2009-04-29 11:57:23
Upload按钮代码如下,每次执行到 FilenamePath = CType(Me.FindControl("FileUpload"), FileUpload).PostedFile 就出Object reference not set to an instance of an object错误,是FilenamePath没有实例化?该怎么改,谢谢
Protected Sub ButtonUpload1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles ButtonUpload1.Click
Dim FileUpload As New FileUpload '= Nothing
Dim FilenamePath As HttpPostedFile
Dim DisplayFilename As String

Try
'FileUpload.ID = "FileUpload" & i
FilenamePath = CType(Me.FindControl("FileUpload"), FileUpload).PostedFile
If FilenamePath.FileName <> "" Then
DisplayFilename = FilenamePath.FileName.Substring(FilenamePath.FileName.LastIndexOf("\") + 1)
'// Generate TimeStamp filename
Dim FileNameLength As String = InStr(1, StrReverse(FilenamePath.FileName), "\")
Dim ExtensionLength As String = InStr(1, StrReverse(FilenamePath.FileName), ".")
Dim Extension As String = Mid(FilenamePath.FileName, (Len(FilenamePath.FileName) - ExtensionLength) + 1)
Dim FileName As String = Left(DisplayFilename, (Len(DisplayFilename) - ExtensionLength))
Dim TimeStamp As String = Date.Now.ToString("ddHHmmss")
Dim StoredFilename As String = FileName + "_" + TimeStamp + Extension
'//
' set the upload directory
Dim UploadDirectory As String = ConfigurationManager.AppSettings("UploadDirectory")
'Me._InvoiceID = Request.QueryString("invoiceID")
'Me._CaseID = Session("CaseID")
Dim StoredFilePath As String = UploadDirectory & "\" & StoredFilename
FilenamePath.SaveAs(StoredFilePath)
InsertDocFile(Me._DocID, DisplayFilename, StoredFilename, StoredFilePath)
'AuditMan.log("upload", FilenamePath, UserID)
GridViewFiles.EditIndex = -1
'GridViewUploadFiles.Columns(5).Visible = True
'BindDataGrid()
End If
Catch ex As Exception
LabelMessage.Text = "Upload failed: " & ex.Message()
End Try
'BindGridView(True)
End Sub
...全文
338 4 打赏 收藏 转发到动态 举报
写回复
用AI写文章
4 条回复
切换为时间正序
请发表友善的回复…
发表回复
gzhantonio 2009-04-29
  • 打赏
  • 举报
回复
[Quote=引用 1 楼 cpp2017 的回复:]
Me.FindControl("FileUpload") 可能是空,检查一下。
[/Quote]
前台有ID为FileUpload的控件
cpp2017 2009-04-29
  • 打赏
  • 举报
回复
Me.FindControl("FileUpload") 可能是空,检查一下。
gzhantonio 2009-04-29
  • 打赏
  • 举报
回复
顶上去,等解答

62,268

社区成员

发帖
与我相关
我的任务
社区描述
.NET技术交流专区
javascript云原生 企业社区
社区管理员
  • ASP.NET
  • .Net开发者社区
  • R小R
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告

.NET 社区是一个围绕开源 .NET 的开放、热情、创新、包容的技术社区。社区致力于为广大 .NET 爱好者提供一个良好的知识共享、协同互助的 .NET 技术交流环境。我们尊重不同意见,支持健康理性的辩论和互动,反对歧视和攻击。

希望和大家一起共同营造一个活跃、友好的社区氛围。

试试用AI创作助手写篇文章吧