Преобразование UTF8-CP1251

var UTF8_WIN = {
0x0402 : 0x0080, 0x0403 : 0x0081, 0x201A : 0x0082, 0x0453 : 0x0083,
0x201E : 0x0084, 0x2026 : 0x0085, 0x2020 : 0x0086, 0x2021 : 0x0087,
0x20AC : 0x0088, 0x2030 : 0x0089, 0x0409 : 0x008A, 0x2039 : 0x008B,
0x040A : 0x008C, 0x040C : 0x008D, 0x040B : 0x008E, 0x040F : 0x008F,
0x0452 : 0x0090, 0x2018 : 0x0091, 0x2019 : 0x0092, 0x201C : 0x0093,
0x201D : 0x0094, 0x2022 : 0x0095, 0x2013 : 0x0096, 0x2014 : 0x0097,
0x003F : 0x0098, 0x2122 : 0x0099, 0x0459 : 0x009A, 0x203A : 0x009B,
0x045A : 0x009C, 0x045C : 0x009D, 0x045B : 0x009E, 0x045F : 0x009F,
0x040E : 0x00A1, 0x045E : 0x00A2, 0x0408 : 0x00A3, 0x0490 : 0x00A5,
0x0401 : 0x00A8, 0x0404 : 0x00AA, 0x0407 : 0x00AF, 0x0406 : 0x00B2,
0x0456 : 0x00B3, 0x0491 : 0x00B4, 0x0451 : 0x00B8, 0x2116 : 0x00B9,
0x0454 : 0x00BA, 0x0458 : 0x00BC, 0x0405 : 0x00BD, 0x0455 : 0x00BE,
0x0457 : 0x00BF, 0x0410 : 0x00C0, 0x0411 : 0x00C1, 0x0412 : 0x00C2,
0x0413 : 0x00C3, 0x0414 : 0x00C4, 0x0415 : 0x00C5, 0x0416 : 0x00C6,
0x0417 : 0x00C7, 0x0418 : 0x00C8, 0x0419 : 0x00C9, 0x041A : 0x00CA,
0x041B : 0x00CB, 0x041C : 0x00CD, 0x041E : 0x00CE, 0x041F : 0x00CF,
0x0420 : 0x00D0, 0x0421 : 0x00D1, 0x0422 : 0x00D2, 0x0423 : 0x00D3,
0x0424 : 0x00D4, 0x0425 : 0x00D5, 0x0426 : 0x00D6, 0x0427 : 0x00D7,
0x0428 : 0x00D8, 0x0429 : 0x00D9, 0x042A : 0x00DA, 0x042B : 0x00DB,
0x042C : 0x00DC, 0x042D : 0x00DD, 0x042E : 0x00DE, 0x042F : 0x00DF,
0x0430 : 0x00E0, 0x0431 : 0x00E1, 0x0432 : 0x00E2, 0x0433 : 0x00E3,
0x0434 : 0x00E4, 0x0435 : 0x00E5, 0x0436 : 0x00E6, 0x0437 : 0x00E7,
0x0438 : 0x00E8, 0x0439 : 0x00E9, 0x043A : 0x00EA, 0x043B : 0x00EB,
0x043C : 0x00EC, 0x043D : 0x00ED, 0x043E : 0x00EE, 0x043F : 0x00EF,
0x0440 : 0x00F0, 0x0441 : 0x00F1, 0x0442 : 0x00F2, 0x0443 : 0x00F3,
0x0444 : 0x00F4, 0x0445 : 0x00F5, 0x0446 : 0x00F6, 0x0447 : 0x00F7,
0x0448 : 0x00F8, 0x0449 : 0x00F9, 0x044A : 0x00FA, 0x044B : 0x00FB,
0x044C : 0x00FC, 0x044D : 0x00FD, 0x044E : 0x00FE, 0x044F : 0x00FF
};

var WIN_UTF8 =
[
0x0000, 0x0001, 0x0002, 0x0003, 0x0004, 0x0005, 0x0006, 0x0007,
0x0008, 0x0009, 0x000A, 0x000B, 0x000C, 0x000D, 0x000E, 0x000F,
0x0010, 0x0011, 0x0012, 0x0013, 0x0014, 0x0015, 0x0016, 0x0017,
0x0018, 0x0019, 0x001A, 0x001B, 0x001C, 0x001D, 0x001E, 0x001F,
0x0020, 0x0021, 0x0022, 0x0023, 0x0024, 0x0025, 0x0026, 0x0027,
0x0028, 0x0029, 0x002A, 0x002B, 0x002C, 0x002D, 0x002E, 0x002F,
0x0030, 0x0031, 0x0032, 0x0033, 0x0034, 0x0035, 0x0036, 0x0037,
0x0038, 0x0039, 0x003A, 0x003B, 0x003C, 0x003D, 0x003E, 0x003F,
0x0040, 0x0041, 0x0042, 0x0043, 0x0044, 0x0045, 0x0046, 0x0047,
0x0048, 0x0049, 0x004A, 0x004B, 0x004C, 0x004D, 0x004E, 0x004F,
0x0050, 0x0051, 0x0052, 0x0053, 0x0054, 0x0055, 0x0056, 0x0057,
0x0058, 0x0059, 0x005A, 0x005B, 0x005C, 0x005D, 0x005E, 0x005F,
0x0060, 0x0061, 0x0062, 0x0063, 0x0064, 0x0065, 0x0066, 0x0067,
0x0068, 0x0069, 0x006A, 0x006B, 0x006C, 0x006D, 0x006E, 0x006F,
0x0070, 0x0071, 0x0072, 0x0073, 0x0074, 0x0075, 0x0076, 0x0077,
0x0078, 0x0079, 0x007A, 0x007B, 0x007C, 0x007D, 0x007E, 0x007F,
0x0402, 0x0403, 0x201A, 0x0453, 0x201E, 0x2026, 0x2020, 0x2021,
0x20AC, 0x2030, 0x0409, 0x2039, 0x040A, 0x040C, 0x040B, 0x040F,
0x0452, 0x2018, 0x2019, 0x201C, 0x201D, 0x2022, 0x2013, 0x2014,
0x003F, 0x2122, 0x0459, 0x203A, 0x045A, 0x045C, 0x045B, 0x045F,
0x00A0, 0x040E, 0x045E, 0x0408, 0x00A4, 0x0490, 0x00A6, 0x00A7,
0x0401, 0x00A9, 0x0404, 0x00AB, 0x00AC, 0x00AD, 0x00AE, 0x0407,
0x00B0, 0x00B1, 0x0406, 0x0456, 0x0491, 0x00B5, 0x00B6, 0x00B7,
0x0451, 0x2116, 0x0454, 0x00BB, 0x0458, 0x0405, 0x0455, 0x0457,
0x0410, 0x0411, 0x0412, 0x0413, 0x0414, 0x0415, 0x0416, 0x0417,
0x0418, 0x0419, 0x041A, 0x041B, 0x041C, 0x041C, 0x041E, 0x041F,
0x0420, 0x0421, 0x0422, 0x0423, 0x0424, 0x0425, 0x0426, 0x0427,
0x0428, 0x0429, 0x042A, 0x042B, 0x042C, 0x042D, 0x042E, 0x042F,
0x0430, 0x0431, 0x0432, 0x0433, 0x0434, 0x0435, 0x0436, 0x0437,
0x0438, 0x0439, 0x043A, 0x043B, 0x043C, 0x043D, 0x043E, 0x043F,
0x0440, 0x0441, 0x0442, 0x0443, 0x0444, 0x0445, 0x0446, 0x0447,
0x0448, 0x0449, 0x044A, 0x044B, 0x044C, 0x044D, 0x044E, 0x044F
];


function to_utf8(s) {
  //return unescape(encodeURIComponent(s));
    var str = new ActiveXObject("ADODB.Stream");
    str.Type=2;
    str.Open();
    str.CharSet = "utf-8";
    str.WriteText(s);
    str.Flush();
    str.Position = 0;
    str.Type=2;
    str.CharSet = "windows-1251";
    var retValue = str.ReadText();
    str.Close();
    //MsgBox("["+retValue+"]");
    return retValue;
}

function from_utf8(s) {
  //return decodeURIComponent(escape(s));
    var str = new ActiveXObject("ADODB.Stream");
    str.Type=2;
    str.Open();
    str.CharSet = "windows-1251";
    str.WriteText(s);
    str.Flush();
    str.Position = 0;
    str.Type=2;
    str.CharSet = "utf-8";
    var retValue = ""+str.ReadText();
    str.Close();
    //MsgBox("["+retValue+"]");
    return ""+retValue;

}