Ftp sans ocx en dotnet

Soyez le premier à donner votre avis sur cette source.

Snippet vu 14 248 fois - Téléchargée 41 fois

Contenu du snippet

FTP TRANSPOSE SOUS DOTNET
ce code est pas tout a fait de moi
j'ai repris un code vb6 que j'ai transpose en DOTNET
(l'original est la : http://www.vbfrance.com/article.aspx?Val=1850)
mais bon c tellement mieux quand on a deja le truc qui est tout fait

Source / Exemple :


Public Sub ftp()
        Dim filename As String
        'Va créer un fichier temporaire avec les informations de votre compte FTP
        filename = "C:\tempupload.txt"
        Dim diese1 As New System.IO.FileStream(filename, FileMode.OpenOrCreate, FileAccess.Write)
        Dim w As New StreamWriter(diese1)
        w.BaseStream.Seek(0, SeekOrigin.Begin)
        'Open "filename" For Output As #1
        w.WriteLine("open " + "ftp.alsiope.com") 'L'adresse ftp ex: ftp.alsiope.com
        w.WriteLine("USER " + "ronan")  ' Votre nom d'utilisateur ex: ronan
        w.WriteLine("pass") 'Votre mot de passe ex: pass
        w.WriteLine("cd " + "/html/")
        w.WriteLine("put " + "a_uploader")'attention le fichier a_uploader doit se trouver sous le meme repertoire que l'appli
        w.WriteLine("quit")
        w.Flush()
        w.Close()
        Shell("ftp -n -s:" & filename, AppWinStyle.MaximizedFocus, True, 10000)
        'L'opération est affichée comme ca ca fait une sorte de log... c plus pro :-)
        'FINALLEMENT, tempupload.txt est supprimé du disque
        Kill(filename)
        'Et voila!! C'est aussi simple que ca! 
    End Sub

Conclusion :


alors je remercie quand meme le concepteur du code original : Alexandre Gauthier

A voir également

Ajouter un commentaire

Commentaires

Messages postés
2
Date d'inscription
lundi 20 janvier 2003
Statut
Membre
Dernière intervention
26 mai 2004

Bonjour,

la déclaration 'Imports System.IO' est nécessaire à l'utilisation de cette function
Messages postés
63
Date d'inscription
jeudi 2 janvier 2003
Statut
Membre
Dernière intervention
8 septembre 2008

Les lignes si dessous sont en rouge dans visual basic, comment faire pour faire fonctionner
ce programme.

Merci.

Dim diese1 As New System.IO.FileStream(filename, FileMode.OpenOrCreate, FileAccess.Write)
Dim w As New StreamWriter(diese1)
w.BaseStream.Seek(0, SeekOrigin.Begin)

w.Flush()
w.Close()
Shell("ftp -n -s:" & filename, AppWinStyle.MaximizedFocus, True, 10000)




Ps: Pouvez-vous mettre le fichier zip.
Messages postés
27
Date d'inscription
samedi 28 décembre 2002
Statut
Membre
Dernière intervention
12 avril 2009

Depuis, mais premier pas, je vous ai regrouper toutes les classe nécessaire pour faire des transfert FTP directement depuis VB.NET ou ASP.NT le code est ici : http://www.vbfrance.com/code.aspx?ID=5664
Je l'utilise en production pour faire de la mise à jour automatique d'application via internet et je n'ai pas encore u de problème (je l'utilise depuis 4 ou 5 mois).

Le code est un mélange de code à moi pour le haut niveau et d'autre code glané à gauche et à droite pour les routine de bas niveau.

Mich.
Messages postés
113
Date d'inscription
vendredi 5 mars 2004
Statut
Membre
Dernière intervention
11 février 2008

Il y a une DLL qui s'appelle wininet.dll qui comporte des commandes FTP, mais apparemment ce n'est pas complet. A voir...
Probleme de fichier en cours d'utilisation egalement. je cherche "LA" solution ideale.
si ca interesse quelqu'un, j'essaierai de mettre le code [:)]
Messages postés
113
Date d'inscription
vendredi 5 mars 2004
Statut
Membre
Dernière intervention
11 février 2008

Personnellement, je dois developper un soft pour du FTP en VB .Net et c'est une galere pas permise: impossible de trouver autre chose que des commandes en DOS. C'est ce que j'ai utilisé, mais ca semble bizarre que le Billou (Bill GAtes) n'ait pas pensé au FTP dans cette version de VB.
Si jamais quelqu'un connait une classe FTP ou entend parler de quoi que ce soit qui y ressemble et qui fonctionne bien, s'il vous plait: ANNONCEZ LE !!!

Merci d'avance. @+
Afficher les 10 commentaires

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.