Questo sito utilizza cookies, anche di terze parti, per mostrare pubblicità e servizi in linea con il tuo account. Leggi l'informativa sui cookies.
Username: Password: oppure
C# / VB.NET - Creazione Cartella via FTP
Forum - C# / VB.NET - Creazione Cartella via FTP

Avatar
dylan666 (Normal User)
Pro


Messaggi: 101
Iscritto: 08/09/2009

Segnala al moderatore
Postato alle 13:27
Venerdì, 24/10/2014
Buongiorno, mi sto cimentando nella creazione di file e cartelle su FTP.
Ho trovato questo codice e per i file funziona egregiamente.
Mi aiutate e modificarlo in un copia dello stesso codice che però crea una cartella?

Grazie

Codice sorgente - presumibilmente VB.NET

  1. Sub InviaFtp(FileName As String)
  2.         Try
  3.             Dim clsRequest As System.Net.FtpWebRequest = DirectCast(System.Net.WebRequest.Create("ftp://ftpwin.miosito.it/miosito.it/ftp/" + FileName), System.Net.FtpWebRequest)
  4.             clsRequest.Credentials = New System.Net.NetworkCredential("xxxx@aruba.it", "123456789")
  5.             clsRequest.Method = System.Net.WebRequestMethods.Ftp.UploadFile
  6.             Dim clsStream As System.IO.Stream = clsRequest.GetRequestStream()
  7.             clsStream.Write(System.IO.File.ReadAllBytes(PathFolder + FileName), 0, System.IO.File.ReadAllBytes(PathFolder + FileName).Length)
  8.             clsStream.Close()
  9.             clsStream.Dispose()
  10.  
  11.         Catch ex As Exception
  12.             Throw New Exception(ex.Message & " - Errore Trasferimento FTP per il file: " + FileName)
  13.         End Try
  14.     End Sub



10101
PM Quote
Avatar
dylan666 (Normal User)
Pro


Messaggi: 101
Iscritto: 08/09/2009

Segnala al moderatore
Postato alle 15:06
Venerdì, 24/10/2014
così sarebbe corretto?

Codice sorgente - presumibilmente VB.NET

  1. Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
  2.         Dim ftpStream As Stream = Nothing
  3.         Try
  4.             Dim clsRequest As System.Net.FtpWebRequest = DirectCast(System.Net.WebRequest.Create("ftp://miosito.it/miosito.it/ftp/" + "pluto"), System.Net.FtpWebRequest)
  5.             clsRequest.Credentials = New System.Net.NetworkCredential("xxxx@aruba.it", "12345")
  6.             clsRequest.Method = WebRequestMethods.Ftp.MakeDirectory
  7.             Dim response As FtpWebResponse = DirectCast(clsRequest.GetResponse(), FtpWebResponse)
  8.             ftpStream = response.GetResponseStream()
  9.             ftpStream.Close()
  10.             response.Close()
  11.  
  12.         Catch ex As Exception
  13.             Throw New Exception(ex.Message & " - Errore Trasferimento FTP per il file: " + "pluto")
  14.         End Try
  15.  
  16.     End Sub



10101
PM Quote