Chaine vers Base 64 et vice versa
Contenu du snippet
Public Function Base64Enc(ByRef vxbData() As Byte) As String
With CreateObject("MSXML.DOMDocument").createElement("Base64")
.dataType = "bin.base64"
.nodeTypedValue = vxbData
Base64Enc = .Text
End With
End Function
Public Function Base64Dec(ByRef vsData As String) As Byte()
With CreateObject("MSXML.DOMDocument").createElement("Base64")
.dataType = "bin.base64"
.Text = vsData
Base64Dec = .nodeTypedValue
End With
End Function
Compatibilité : VB6, VBA, VBScript
Disponible dans d'autres langages :
A voir également
- Chaine vers Base 64 et vice versa
- Javascript et base de données - Conseils pratiques -Javascript
- Sous chaine en python - Forum Python
- Convertisseur jpg vers png ✓ - Forum Java
- Le format de la chaîne d'entrée est incorrect ✓ - Forum C# / .NET
- Vba longueur chaine ✓ - Forum Visual Basic
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.