VBScript - image à binaire

Question

Je ne suis pas un programmeur VB mais j'ai besoin d'un vbscript qui convertit le fichier image (à partir du disque local) pour être converti en données binaires et transmis au webservice. Je me rends compte comment passer des données à webservice mais je ne peux pas trouver comment convertir le fichier d'image en données binaires. Je passe beaucoup de temps à trouver une solution, mais pas de chance. Quelqu'un peut-il m'aider?

Merci!

Answer 1

base64 encode fonction VBS (vb algorithme de codage), le code source http://www.motobit.com/tips/detpg_Base64Encode/

Answer 2

S'il vous suffit de lire le fichier d'image sous forme de données binaires (d'une manière similaire à la lecture des fichiers texte), vous pouvez utiliser le ADODB.Stream objet:

Const adTypeBinary = 1 
Dim oStream, bData 

Set oStream = CreateObject("ADODB.Stream") 
oStream.Type = adTypeBinary 
oStream.Open 
oStream.LoadFromFile "C:\MyImage.png" 

bData = oStream.Read 

' Do whatever you need with bData 
...