How do I convert this VBScript to Javascript?

[iporter]

Below is some VB Script - I can't figure out how to convert it to javascript. Below that, I've put my best attempt at as far as I got - can anyone help me out correcting and completing it?

Thanks,
Iain

The VB Script:

const BASE_64_MAP_INIT ="ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/"
dim arrBase64EncMap(63)
dim arrBase64DecMap(127)
strNewLine = "<P>" & vbCRLF
for iLoop = 0 to len(BASE_64_MAP_INIT) - 1
    arrBase64EncMap(iLoop) = mid(BASE_64_MAP_INIT, iLoop + 1, 1)
next
for iLoop = 0 to len(BASE_64_MAP_INIT) - 1
    arrBase64DecMap(ASC(arrBase64EncMap(iLoop))) = iLoop
next
 
public function base64Encode(strPlain)
    if len(strPlain) = 0 then
        base64Encode = ""
        exit function
    end if
 
    '** Work out rounded down multiple of 3 bytes length for the unencoded text **
    iBy3 = (len(strPlain) \ 3) * 3
    strReturn=""
 
    '** For each 3x8 byte chars, covert them to 4x6 byte representations in the Base64 map **
    iIndex = 1
    do while iIndex <= iBy3
        iFirst  = asc(mid(strPlain, iIndex+0, 1))
        iSecond = asc(mid(strPlain, iIndex+1, 1))
        iiThird  = asc(mid(strPlain, iIndex+2, 1))
        strReturn = strReturn & arrBase64EncMap((iFirst \ 4) AND 63 )
        strReturn = strReturn & arrBase64EncMap(((iFirst * 16) AND 48) + ((iSecond \ 16) AND 15 ) )
        strReturn = strReturn & arrBase64EncMap(((iSecond * 4) AND 60) + ((iiThird \ 64) AND 3 ) )
        strReturn = strReturn & arrBase64EncMap(iiThird AND 63)
        iIndex = iIndex + 3
    loop
 
    '** Handle any trailing characters not in groups of 3 **
    '** Extend to multiple of 3 characters using = signs as per RFC **
    if iBy3 < len(plain) then
        iFirst  = asc(mid(strPlain, iIndex+0, 1))
        strReturn = strReturn & arrBase64EncMap((iFirst \ 4) AND 63 )
        if (len(strPlain) MOD 3 ) = 2 then
            iSecond = asc(mid(strPlain, iIndex+1, 1))
            strReturn = strReturn & arrBase64EncMap(((iFirst * 16) AND 48) + ((iSecond \ 16) AND 15 ) )
            strReturn = strReturn & arrBase64EncMap((iSecond * 4) AND 60)
        else
            strReturn = strReturn & arrBase64EncMap((iFirst * 16) AND 48)
            strReturn = strReturn & "="
        end if
        strReturn = strReturn & "="
    end if
 
    '** Return the encoded result string **
    base64Encode = strReturn
end function
 

My attempt at javascript:

var BASE_64_MAP_INIT ="ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/"
var arrBase64EncMap = new Array(63);
var arrBase64DecMap = new Array(127);
 
for (var i = 0; i < BASE_64_MAP_INIT.length; i++) {
    arrBase64EncMap[i] = BASE_64_MAP_INIT.charAt(i);
}
for (var i = 0; i < BASE_64_MAP_INIT.length; i++) {
    arrBase64DecMap[ASC(arrBase64EncMap[i]] = i
    arrBase64DecMap[arrBase64EncMap[i].charCodeAt(0)] = i
}
 
function base64Encode(strPlain) {
    if (strPlain.length == 0) {
        return "";
    }
 
    // Work out rounded down multiple of 3 bytes length for the unencoded text
    iBy3 = strPlain.length - (strPlain.length % 3);
    var strReturn = "";
 
    // For each 3x8 byte chars, covert them to 4x6 byte representations in the Base64 map
    var iIndex = 1;
    while (iIndex <= iBy3) {
        var iFirst  = strPlain.charCodeAt(iIndex+0);
        var iSecond = strPlain.charCodeAt(iIndex+1);
        var iiThird = strPlain.charCodeAt(iIndex+2);
 
        //**** i'm totall lost here - what's the AND doing, and how do I do it in JS?   ****//
        var strReturn += arrBase64EncMap((iFirst - (iFirst % 4) AND 63);        
 

[pbmods]

Heya, iporter. Welcome to TSDN!

Are you getting an error? Is the code not doing what you want it to?