在ASP.NET中实现文件上传

用vs自带组件FileUpload

  Protected Function upfileGif() As System.Boolean
        Dim path As String = Server.MapPath("/UploadFile/")
        Dim fileOK As Boolean = False
        If FileUpload1.HasFile Then
            Dim fileExtension As String
            fileExtension = System.IO.Path.GetExtension(FileUpload1.FileName).ToLower()
            Dim allowedExtensions As String() = {".jpg", ".jpeg", ".png", ".gif"}

            For i As Integer = 0 To allowedExtensions.Length - 1
                If fileExtension = allowedExtensions(i) Then
                    fileOK = True
                End If
            Next
            If fileOK Then
                Try
                    Dim fileNewName = Trim(Str(Year(DateTime.Now))) + Trim(Str(DateTime.Now.Month)) + Trim(Str(DateTime.Now.Day)) + Trim(Str(DateTime.Now.Hour)) + Trim(Str(DateTime.Now.Second)) + Trim(Str(DateTime.Now.Millisecond))
                    FileUpload1.PostedFile.SaveAs(path & fileNewName & fileExtension)
                    TextBox1.Text = fileNewName & fileExtension
                    Return True

                Catch ex As Exception
                    Return False

                End Try
            Else
                Return False
            End If
        End If

    End Function