Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Développement Développement Visual Basic Envoyer une archive zip en base64

Envoyer une archive zip en base64

4 réponses
Avatar
TEV
Bonjour,

j'aimerais pouvoir envoyer via VB un fichier zipé en en passant directement
par SMTP. J'arrives à coder le texte en base64 mais je ne parviens pas à
coder le fichier, surtout je ne vois pas comment je puis lui dire de le
coder. Lorsque bêtement je lui dit mafonctionBase64(c:\monArchiveZip) il
code seulement le texte.

Quelqu'un peut il m'aider ? Merci

Christian.
Signaler un problème avec ce contenu

4 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
Adam Pietrasiewicz
<<< Attention - mon adresse dans l'entete de ce message >>>
<<< est une adresse ANTISPAM - pour m'ecrire cliquez sur >>>
<<< http://www.cerbermail.com/?DQr0g2Y88R >>>
=================================================== Le 26 pa¼dziernika 2003 21:50:03 TEV a ecrit dans un message
news:3f9c3376$0$13160$


j'aimerais pouvoir envoyer via VB un fichier zipé en en passant directement
par SMTP. J'arrives a coder le texte en base64 mais je ne parviens pas a
coder le fichier, surtout je ne vois pas comment je puis lui dire de le
coder. Lorsque bêtement je lui dit mafonctionBase64(c:monArchiveZip) il
code seulement le texte.

Quelqu'un peut il m'aider ? Merci



Peut etre moi, je pourrais, mais il me faut plus d'informations.

Si j'ai bien compris, tu as une procedure qui encode en base64, oui? Et
c'est cette procedure qui n'encode que du texte...

Je dirais donc, qu'il y a une erreur dans ta procedure...

On peut trouver sur le net les dll ActiveX qui encodent et decodent les
fichiers - peut etre cherche dans cette direction
--
Adam Pietrasiewicz
Pologne
---
Ce message vous a ete apporte par Le Pigeon
http://www.amsoft.com.pl/golabek
Avatar
Crevecoeur Jérôme
Bonjour,

Essayez ceci
http://www.paradoxes.info/code/base64.html



Cordialement
----------------------------------------------------------------------------
--------------------
Crévecoeur Jérôme

ACS INFORMATIQUE
122,rue du Château d'orgemont
49000 ANGERS
Tel: 02 41 68 42 36 Fax: 02 41 68 42 48
----------------------------------------------------------------------------
---------------------
"Adam Pietrasiewicz" a écrit dans le
message de news:


<<< Attention - mon adresse dans l'entete de ce message >>>
<<< est une adresse ANTISPAM - pour m'ecrire cliquez sur >>>
<<< http://www.cerbermail.com/?DQr0g2Y88R >>>
=================================================== > Le 26 pa¼dziernika 2003 21:50:03 TEV a ecrit dans un message
news:3f9c3376$0$13160$


> j'aimerais pouvoir envoyer via VB un fichier zipé en en passant


directement
> par SMTP. J'arrives a coder le texte en base64 mais je ne parviens pas a
> coder le fichier, surtout je ne vois pas comment je puis lui dire de le
> coder. Lorsque bêtement je lui dit mafonctionBase64(c:monArchiveZip) il
> code seulement le texte.
>
> Quelqu'un peut il m'aider ? Merci

Peut etre moi, je pourrais, mais il me faut plus d'informations.

Si j'ai bien compris, tu as une procedure qui encode en base64, oui? Et
c'est cette procedure qui n'encode que du texte...

Je dirais donc, qu'il y a une erreur dans ta procedure...

On peut trouver sur le net les dll ActiveX qui encodent et decodent les
fichiers - peut etre cherche dans cette direction
--
Adam Pietrasiewicz
Pologne
---
Ce message vous a ete apporte par Le Pigeon
http://www.amsoft.com.pl/golabek





Avatar
ng
Salut,
Bah il suffit d'ouvrir ton fichier, recupérer les données, les coder et les
envoyer !

tu récupères comme ca :
dim k as integer,sBuff as string
k=freefile
open "c:monArchiveZip" for binary as #k
sbuff=space$(lof(k))
get #k,,sbuff
close #k

strFichierCode=mafonctionBase64(sBuff)

ensuite tu balances ca sur ton smpt a coup de senddata (pour ma part je
préfère envoyer par packets, a chaque fois on attend bien que le packet ait
été recu pr envoyer le suivant...)

Nicolas.

"TEV" a écrit dans le message de news:
3f9c3376$0$13160$
Bonjour,

j'aimerais pouvoir envoyer via VB un fichier zipé en en passant


directement
par SMTP. J'arrives à coder le texte en base64 mais je ne parviens pas à
coder le fichier, surtout je ne vois pas comment je puis lui dire de le
coder. Lorsque bêtement je lui dit mafonctionBase64(c:monArchiveZip) il
code seulement le texte.

Quelqu'un peut il m'aider ? Merci

Christian.




Avatar
TEV
Merci beaucoup pour vos réponses. Je pensais ne pas être trop loin et en
fait je ne savais pas faire. Encore merci, mention spéciale pour NG.
Christian.
"ng" a écrit dans le message de news:

Salut,
Bah il suffit d'ouvrir ton fichier, recupérer les données, les coder et


les
envoyer !

tu récupères comme ca :
dim k as integer,sBuff as string
k=freefile
open "c:monArchiveZip" for binary as #k
sbuff=space$(lof(k))
get #k,,sbuff
close #k

strFichierCode=mafonctionBase64(sBuff)

ensuite tu balances ca sur ton smpt a coup de senddata (pour ma part je
préfère envoyer par packets, a chaque fois on attend bien que le packet


ait
été recu pr envoyer le suivant...)

Nicolas.

"TEV" a écrit dans le message de news:
3f9c3376$0$13160$
> Bonjour,
>
> j'aimerais pouvoir envoyer via VB un fichier zipé en en passant
directement
> par SMTP. J'arrives à coder le texte en base64 mais je ne parviens pas à
> coder le fichier, surtout je ne vois pas comment je puis lui dire de le
> coder. Lorsque bêtement je lui dit mafonctionBase64(c:monArchiveZip) il
> code seulement le texte.
>
> Quelqu'un peut il m'aider ? Merci
>
> Christian.
>
>