Components ASP.Net

  1. Home
  2. ASP.Net
  3. Components
  4. File Uploading in ASP NET (VB net)
<%@ Page Language="vb" %>

   
      File Uploading in ASP.NET
   
      Sub UploadBtn_Click(Sender as Object, e as EventArgs)
         If InStr(Request.ContentType, "multipart/form-data") Then
            Dim Counter1 As Integer
            Dim Keys() As String
            Dim Files As HttpFileCollection
 
            Files = Request.Files
            Keys = Files.AllKeys
            For Counter1 = 0 To Keys.GetUpperBound(0)
               Response.Write("File ID: " & Keys(Counter1) & "
")
               Response.Write("File Name/Path: " & Files(Counter1).FileName & "
")
            Next Counter1
         Else
            Response.Write("No files uploaded, or wrong content type!")
         End If
      End Sub
   
   


   Select File To Upload to Server: 
   

   
   

   
   

   



<%-- retrieveFiles.aspx
<%@ Page Language="vb" %>

   
      File Uploading in ASP.NET
   
      Sub Page_Load()
         If InStr(Request.ContentType, "multipart/form-data") Then
            Dim Counter1 As Integer
            Dim Keys() As String
            Dim Files As HttpFileCollection
 
            Files = Request.Files
            Keys = Files.AllKeys
            For Counter1 = 0 To Keys.GetUpperBound(0)
               Response.Write("File ID: " & Keys(Counter1) & "
")
               Response.Write("File Name/Path: " & Files(Counter1).FileName & "
")
            Next Counter1
         Else
            Response.Write("No files uploaded, or wrong content type!")
         End If
      End Sub
   
   





--%>