Code to upload and download files via SFTP using WinSCP
Hi,
I have developed a website that allows users to upload/download files to and from an FTP server.
The requirements have now been changed in that the files need to be uploaded and downloaded using SFTP.
I have downloaded WinSCP and set it up to connect to my FTP server.
I am now stumped though as to what I need to change or add in to my Visual Studio VB.Net project.
I have read that I need to create a SessionOptions class that stores the authentication details, but still dont understand how this is supposed to work.
Below is the code I have:
How would I now do the code to be able to upload and download files using SFTP from my .aspx forms that I have created.
All help and advice will be much appreciated.
Dwinn86
I have developed a website that allows users to upload/download files to and from an FTP server.
The requirements have now been changed in that the files need to be uploaded and downloaded using SFTP.
I have downloaded WinSCP and set it up to connect to my FTP server.
I am now stumped though as to what I need to change or add in to my Visual Studio VB.Net project.
I have read that I need to create a SessionOptions class that stores the authentication details, but still dont understand how this is supposed to work.
Below is the code I have:
Imports System
Imports WinSCP
Imports System.Globalization
Imports System.IO
Public Class SessionOptions
Dim HostName As String
Dim UserName As String
Dim Password As String
Public Shared Function Main() As Integer
Try
' Setup session options
Dim sessionOptions As New SessionOptions
With sessionOptions
'.Protocol = Protocol.Sftp
.HostName = "XX.XX.XX.XX"
.UserName = "user"
.Password = "password"
End With
Using session As Session = New Session
' Connect
session.Open(sessionOptions)
' Upload files
Dim transferOptions As New TransferOptions
transferOptions.TransferMode = TransferMode.Binary
Dim transferResult As TransferOperationResult
transferResult = session.PutFiles(FileUpload1.SelectedItem, False, transferOptions)
' Throw on any error
transferResult.Check()
' Print results
Dim transfer As TransferEventArgs
For Each transfer In transferResult.Transfers
Console.WriteLine("Upload of {0} succeeded", transfer.FileName)
Next
End Using
Return 0
Catch e As Exception
Console.WriteLine("Error: {0}", e)
Return 1
End Try
End Function
End ClassHow would I now do the code to be able to upload and download files using SFTP from my .aspx forms that I have created.
All help and advice will be much appreciated.
Dwinn86