разработка скриптов
Вы не зашли.
Страниц: 1
Кодирование base64 — это схема, по которой произвольная последовательность байтов преобразуется в последовательность печатаемых ASCII символов. Как правило, используются символы латинского алфавита в верхнем и нижнем регистре (A—Z, a—z), цифры (0—9), символы «+» и «/» и символ «=» в качестве специального суффикса. В некоторых реализациях base64 вместо символов «+», «/» и «=» используются другие символы. Base64 не является шифрованием и используется, в основном, для удобства транспортировки и хранения данных. Результирующие данные имеют длину, большую оригинальной в соотношении 4:3.
Пример ниже копирует существующий файл "C:\Temp\test.jpg", создавая файл "C:\Temp\test2.jpg". Исходный файл считывается и преобразуется в строку base64, затем полученная строка base64 преобразуется обратно в массив байтов и записывается на диск в виде файла. Используются объекты MSXml2.DOMDocument и ADODB.Stream.
Set objStream = CreateObject("ADODB.Stream")
objStream.Type = 1 ' TypeBinary
objStream.Open()
objStream.LoadFromFile("C:\Temp\test.jpg")
readBytes = objStream.Read()
Set objXML = CreateObject("MSXml2.DOMDocument")
objXML.loadXML "<Base64Data />"
Set objDocElem = objXML.documentElement
objDocElem.dataType = "bin.base64"
objDocElem.nodeTypedValue = readBytes
textBase64 = objDocElem.text
WScript.Echo textBase64
Set objXML = CreateObject("MSXml2.DOMDocument")
Set objDocElem = objXML.createElement("tmp")
objDocElem.DataType = "bin.base64"
objDocElem.text = textBase64
writeBytes = objDocElem.NodeTypedValue
Set objStream = CreateObject("ADODB.Stream")
objStream.Type = 1 ' TypeBinary
objStream.Open()
objStream.Write writeBytes
objStream.SaveToFile "C:\Temp\test2.jpg", 2Неактивен
Бесплатный COM-сервер Base64 Component позволяет закодировать/раскодировать строку или массив байтов по алгоритму base64. Компонент можно скачать здесь, ссылка на скачивание высылается на e-mail. Размер дистрибутива (архив) — порядка 35 Кб.
Пример работы со строками:
Const otSafeArray = 0
Const otString = 2
Set objBase64 = CreateObject("XStandard.Base64")
WScript.Echo objBase64.Encode("Hello World!", otString)
WScript.Echo objBase64.Decode("SGVsbG8gV29ybGQh", otString)Копирование бинарного файла через преобразование его в строку base64: пример ниже копирует существующий файл "C:\Temp\test.jpg", создавая файл "C:\Temp\test2.jpg". Исходный файл считывается и преобразуется в строку base64, затем полученная строка base64 преобразуется обратно в массив байтов и записывается на диск в виде файла:
Const otSafeArray = 0
Const otString = 2
Set objBase64 = CreateObject("XStandard.Base64")
Set objStream = CreateObject("ADODB.Stream")
objStream.Type = 1 ' TypeBinary
objStream.Open()
objStream.LoadFromFile("C:\Temp\test.jpg")
readBytes = objStream.Read()
textBase64 = objBase64.Encode(readBytes, otString)
WScript.Echo textBase64
Set objStream = CreateObject("ADODB.Stream")
objStream.Type = 1 ' TypeBinary
objStream.Open()
writeBytes = objBase64.Decode(textBase64, otSafeArray)
objStream.Write writeBytes
objStream.SaveToFile "C:\Temp\test2.jpg", 2Простой пример записи бинарного файла из строки base64:
Const otSafeArray = 0
Const otString = 2
Set objBase64 = CreateObject("XStandard.Base64")
strImage = "R0lGODlhEgASAKIAAMDAwICAgP8AAAAAAP///w" & _
"AAAAAAAAAAACH5BAAAAAAALAAAAAASABIAAAM8" & _
"SLrc/rCJSWdU1b4xAqZKwDWcR2iiSXZMGpUKfJ" & _
"XyRYisTQDcaPOD2AAQwTE4RIdxlVwsHUinD1LT" & _
"WSMJADs="
Set objStream = CreateObject("ADODB.Stream")
objStream.Type = 1 ' TypeBinary
objStream.Open()
writeBytes = objBase64.Decode(strImage, otSafeArray)
objStream.Write writeBytes
objStream.SaveToFile "C:\Temp\test.gif", 2Неактивен
Пример ниже копирует существующий файл "C:\Temp\test.jpg", создавая файл "C:\Temp\test1.jpg". Исходный файл считывается и преобразуется в строку base64, затем полученная строка base64 преобразуется обратно в массив байтов и записывается на диск в виде файла. На этот раз используется объект BinaryOps.
Set bin = CreateObject("JSBin.BinaryOps")
L = 0 ' чтение с начала файла
e = bin.BinaryRead("C:\Temp\test.jpg", 0, L, A) ' чтение файла в массив ByteArray
s = bin.BytesToBase64(A) ' конвертация в строку Base64
WScript.Echo s
e = bin.Base64ToBytes(s, A1) ' конвертация строки Base64 в массив ByteArray
e = bin.BinaryOpen("C:\Temp\test1.jpg", L) ' открытие (возможно) несуществующего файла на запись
e = bin.BinaryWrite(A1, 0) ' запись файла
e = bin.BinaryClose ' закрытие файлаНеактивен
Компонент ChilkatUtil.dll, который содержит несколько полезных COM-серверов (в т.ч. CkData), устанавливается вместе с Chilkat Spider. Документацию по объекту CkData можно найти здесь.
Пример ниже копирует существующий файл "C:\Temp\test.jpg", создавая файл "C:\Temp\test1.jpg". Исходный файл считывается и преобразуется в строку base64, затем полученная строка base64 обратно загружается в объект и записывается на диск в виде файла.
Set oData = CreateObject("Chilkat.CkData")
oData.LoadFile "C:\Temp\test.jpg" ' открытие и загрузка двоичного файла
oData.Base64LineLength = 64 ' максимальная длина строки при преобразовании в Base64 (по умолчанию - 72)
txt = oData.GetBase64()
oData.LoadBase64 txt
oData.SaveToFile "C:\Temp\test1.jpg" ' сохранение данных в двоичный файлНеактивен
Кодировать строки в Base64 можно и с помощью библиотеки capicom.dll. Начиная с Windows XP, эта библиотека должна содержаться в поставке операционной системы.
Set capicom = CreateObject("CAPICOM.Utilities")
b64 = capicom.Base64Encode("Здравствуй, дедушка Мороз!")
WScript.Echo b64
what = capicom.Base64Decode(b64)
WScript.Echo whatАвтор идеи — ingvar68.
Неактивен
Бесплатный COM-сервер Buffer Component предназначен для чтения и записи бинарных файлов, вычисления контрольных сумм MD5 и преобразований Base64. Скачать компонент можно здесь (ссылка для скачивания высылается на e-mail). Дистрибутив (архив) имеет размер чуть более 35 Кб.
Пример:
Set oBuffer = CreateObject("XStandard.Buffer")
oBuffer.Write "Здравствуй, дедушка Мороз!"
oBuffer.SaveAs "C:\Temp\test.txt"
oBuffer.Reset()
oBuffer.Load "C:\Temp\test.txt"
WScript.Echo oBuffer.Base64String
oBuffer.Reset()
oBuffer.Write "Здравствуй, дедушка Мороз!"
WScript.Echo oBuffer.Base64StringНеактивен
Еще один пример кодирования/декодирования встроенными средствами JS
/**
*
* Base64 encode / decode
* http://www.webtoolkit.info/
*
**/
var Base64 = {
// private property
_keyStr : "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/=",
// public method for encoding
encode : function (input) {
var output = "";
var chr1, chr2, chr3, enc1, enc2, enc3, enc4;
var i = 0;
input = Base64._utf8_encode(input);
while (i < input.length) {
chr1 = input.charCodeAt(i++);
chr2 = input.charCodeAt(i++);
chr3 = input.charCodeAt(i++);
enc1 = chr1 >> 2;
enc2 = ((chr1 & 3) << 4) | (chr2 >> 4);
enc3 = ((chr2 & 15) << 2) | (chr3 >> 6);
enc4 = chr3 & 63;
if (isNaN(chr2)) {
enc3 = enc4 = 64;
} else if (isNaN(chr3)) {
enc4 = 64;
}
output = output +
this._keyStr.charAt(enc1) + this._keyStr.charAt(enc2) +
this._keyStr.charAt(enc3) + this._keyStr.charAt(enc4);
}
return output;
},
// public method for decoding
decode : function (input) {
var output = "";
var chr1, chr2, chr3;
var enc1, enc2, enc3, enc4;
var i = 0;
input = input.replace(/[^A-Za-z0-9\+\/\=]/g, "");
while (i < input.length) {
enc1 = this._keyStr.indexOf(input.charAt(i++));
enc2 = this._keyStr.indexOf(input.charAt(i++));
enc3 = this._keyStr.indexOf(input.charAt(i++));
enc4 = this._keyStr.indexOf(input.charAt(i++));
chr1 = (enc1 << 2) | (enc2 >> 4);
chr2 = ((enc2 & 15) << 4) | (enc3 >> 2);
chr3 = ((enc3 & 3) << 6) | enc4;
output = output + String.fromCharCode(chr1);
if (enc3 != 64) {
output = output + String.fromCharCode(chr2);
}
if (enc4 != 64) {
output = output + String.fromCharCode(chr3);
}
}
output = Base64._utf8_decode(output);
return output;
},
// private method for UTF-8 encoding
_utf8_encode : function (string) {
string = string.replace(/\r\n/g,"\n");
var utftext = "";
for (var n = 0; n < string.length; n++) {
var c = string.charCodeAt(n);
if (c < 128) {
utftext += String.fromCharCode(c);
}
else if((c > 127) && (c < 2048)) {
utftext += String.fromCharCode((c >> 6) | 192);
utftext += String.fromCharCode((c & 63) | 128);
}
else {
utftext += String.fromCharCode((c >> 12) | 224);
utftext += String.fromCharCode(((c >> 6) & 63) | 128);
utftext += String.fromCharCode((c & 63) | 128);
}
}
return utftext;
},
// private method for UTF-8 decoding
_utf8_decode : function (utftext) {
var string = "";
var i = 0;
var c = c1 = c2 = 0;
while ( i < utftext.length ) {
c = utftext.charCodeAt(i);
if (c < 128) {
string += String.fromCharCode(c);
i++;
}
else if((c > 191) && (c < 224)) {
c2 = utftext.charCodeAt(i+1);
string += String.fromCharCode(((c & 31) << 6) | (c2 & 63));
i += 2;
}
else {
c2 = utftext.charCodeAt(i+1);
c3 = utftext.charCodeAt(i+2);
string += String.fromCharCode(((c & 15) << 12) | ((c2 & 63) << 6) | (c3 & 63));
i += 3;
}
}
return string;
}
}
// ============================================================
// Пример использования:
WScript.Echo(Base64.encode("Текст, который мы хотим закодировать"));
WScript.Echo(Base64.decode("0Jgg0YfRgtC+INC40Lcg0Y3RgtC+0LPQviDQv9C+0LvRg9GH0LjQu9C+0YHRjA=="));Неактивен
Страниц: 1