Web Hosting, Free Web Site Builder & Domain Name, Web Hosting Made Easy By Brinkster

Upload file on your server to c:\temp\ directory

Added By: cperrywebrat

Rated:

(4 of 5) by 16.

Rate Snippet: 12345

Description:

Single file upload to your server rename file with .aspx extension

Language: Visual Basic .NET

Save to web space
E-mail Link

Code Snippet:

<%@ Import namespace="System.IO"%>
<html>
<head>
<title>Uploading a File</title> 
<script language="VB" runat="server">

Dim savePath As String = "C:\temp\"
Sub Upload_Click(source As Object, e As EventArgs)

If Not (uploadedFile.PostedFile Is Nothing) Then
    Try
      Dim postedFile = uploadedFile.PostedFile
      Dim filename As String = Path.GetFileName(postedFile.FileName)
      Dim contentType As String = postedFile.ContentType
      Dim contentLength As Integer = postedFile.ContentLength

postedFile.SaveAs(savePath & filename)
      message.Text = postedFile.Filename & " uploaded" & _
        "<br>content type: " & contentType & _
        "<br>content length: " & contentLength.ToString()
    Catch exc As Exception
      message.Text = "Failed uploading file"
    End Try
  End If
End Sub 
</script>
 
</head>
<body>
 
<form enctype="multipart/form-data" runat="server">
  Select File to Upload: 
  <input id="uploadedFile" type="file" runat="server">
  <p>
  <input type=button id="upload" 
    value="Upload" 
    OnServerClick="Upload_Click" 
    runat="server">
  <p>
  <asp:Label id="message" runat="server"/>
</form>
 
</body>
</html>