IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

VB.NET Discussion :

Transfert de photo vers un serveur distant


Sujet :

VB.NET

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre éclairé Avatar de paradeofphp
    Inscrit en
    Décembre 2005
    Messages
    313
    Détails du profil
    Informations forums :
    Inscription : Décembre 2005
    Messages : 313
    Par défaut Transfert de photo vers un serveur distant
    Bonjour tout le monde,
    voilà, j'ai des photos qui sont stockées dans une base de données et d'autres qui sont dans un répertoire. Je dois transfrer ces photos soit à une base de données distante soit vers un répertoire sur le serveur distant.
    La première partie (transfert vers une base de donées) est faite. Me reste comment je pourrais faire pour pouvoir exporter les photos au répertoire destination. Je vous informe que je développe une application console. Merci

  2. #2
    Membre éclairé Avatar de paradeofphp
    Inscrit en
    Décembre 2005
    Messages
    313
    Détails du profil
    Informations forums :
    Inscription : Décembre 2005
    Messages : 313
    Par défaut
    Bonjour,

    J'ai developpé la fonction suivante qui me permet d'enregistrer les photo sur un répertoire :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    20
    21
    22
    23
    24
    25
    Private Sub SavePhotoFromDB(ByVal IdPersonne As String, ByVal Stockage_Photo As Byte())
     
            Dim photo As Byte()
            Dim stream As New MemoryStream
     
            Dim PathPhoto As String = ConfigurationSettings.AppSettings("UrlPhoto")
            Dim FullPathPhoto As String = IO.Path.Combine(PathPhoto, IdPersonne & ".jpg")
     
            Dim RemotePathPhoto As String = ConfigurationSettings.AppSettings("RemoteUrlPhoto")
     
            Try
     
                photo = Stockage_Photo
                stream.Write(photo, 0, photo.Length)
                Dim bitmap As New Bitmap(stream)
     
                bitmap.Save(RemotePathPhoto, Imaging.ImageFormat.Jpeg)
                stream.Close()
                bitmap.Dispose()
     
     
            Catch ex As Exception
                Throw New Exception(ex.Message)
            End Try
        End Sub
    Lorsque j'executye cette fonction, j'ai le message d'erreur suivant :

    Une erreur s'est produite : Une erreur générique s'est produite dans GDI+.
    Je le reçoit à cette ligne :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
     bitmap.Save(RemotePathPhoto, Imaging.ImageFormat.Jpeg)
    Avez-vous une idée de ce problème ?

Discussions similaires

  1. Copie d'un fichier local vers un serveur distant
    Par Contact2012 dans le forum VBScript
    Réponses: 4
    Dernier message: 20/07/2010, 14h38
  2. Réponses: 10
    Dernier message: 16/12/2009, 19h05
  3. Réponses: 3
    Dernier message: 12/06/2008, 16h03
  4. Réponses: 3
    Dernier message: 06/12/2007, 17h35

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo