Attribute VB_Name = "modEncoding" Public Function VL64Encodedfhghfg(ByVal data As String) As String On Error Resume Next If Val(data) > 255 Then VL64Encodedfhghfg = ReadINI("encode", data, DBP & "encode.txt") Else If data - 3 > 0 Then For i = 0 To 3 If ((data - i) Mod 4) = 0 Then cod1 = Chr(i + 80) cod2 = Chr((data - i) / 4 + 64) End If Next i VL64Encodedfhghfg = cod1 & cod2 Else VL64Encodedfhghfg = Chr(data + 72) End If End If End Function Public Function VL64encode(ByVal data As Double) As String 'got this from Armz, big thanks! Dim ff As Integer Dim r As String Dim item As Double Dim i As Integer ff = data Mod 4 data = data \ 4 ' now encode using fixed length (reversed) For i = 0 To 5 item = data \ (64 ^ i) If item > 0 Then ' add field r = r + Chr((item Mod 64) + 64) Else ' max reached VL64encode = Chr(72 + ff + (8 * i)) & r Exit Function End If Next VL64encode = Chr(72 + ff + (8 * i)) & r End Function Public Function VL64Decode(ByVal data As String) As String On Error GoTo Er Dim Second As String nf = (Asc(Left(data, 1)) - 72) / 4 If nf < 1 Then nf = 0 End If If (nf Mod 2) = 0 Then nf = nf / 2 For i = 1 To nf r = r + ((Asc(Mid(data, i + 1, 1)) - 64) * (64 ^ (i - 1))) Next i ID = (4 * r) + ((Asc(Left(data, 1)) - 72) Mod 4) Else RawID = Left(data, 2) Second = Replace(RawID, "S", "", 1, 1) ID = (Asc(Second) - 64) * 4 + nf End If VL64Decode = Round(ID) Exit Function Er: VL64Decode = "Er" End Function Public Function encodeB64(ByVal char As String) As String Dim i As Long i = Len(char) encodeB64 = Chr((i / 64) + 64) + Chr((i Mod 64) + 64) End Function Public Function decodeB64(ByVal char As String) As Long Dim char1 As Long Dim char2 As Long char1 = (Asc(Left$(char, 1)) - 64) * 64 char2 = Asc(Right$(char, 1)) - 64 decodeB64 = char1 + char2 End Function Public Function B64Length(ByVal TheString As String) As Integer Select Case TheString Case "@@" B64Length = 0 Exit Function Case "@A" B64Length = 1 Exit Function Case "@B" B64Length = 2 Exit Function Case "@C" B64Length = 3 Exit Function Case "@D" B64Length = 4 Exit Function Case "@E" B64Length = 5 Exit Function Case "@F" B64Length = 6 Exit Function Case "@G" B64Length = 7 Exit Function Case "@H" B64Length = 8 Exit Function Case "@I" B64Length = 9 Exit Function Case "@J" B64Length = 10 Exit Function Case "@K" B64Length = 11 Exit Function Case "@L" B64Length = 12 Exit Function Case "@M" B64Length = 13 Exit Function Case "@N" B64Length = 14 Exit Function Case "@O" B64Length = 15 Exit Function Case "@P" B64Length = 16 Exit Function Case "@Q" B64Length = 17 Exit Function Case "@R" B64Length = 18 Exit Function Case "@S" B64Length = 19 Exit Function Case "@T" B64Length = 20 Exit Function Case "@U" B64Length = 21 Exit Function Case "@V" B64Length = 22 Exit Function Case "@W" B64Length = 23 Exit Function Case "@X" B64Length = 24 Exit Function Case "@Y" B64Length = 25 Exit Function Case "@Z" B64Length = 26 Exit Function Case "@[" B64Length = 27 Exit Function Case "@\" B64Length = 28 Exit Function Case "@]" B64Length = 29 Exit Function Case "@^" B64Length = 30 Exit Function Case "@_" B64Length = 31 Exit Function Case "@`" B64Length = 32 Exit Function Case "@a" B64Length = 33 Exit Function Case "@b" B64Length = 34 Exit Function Case "@c" B64Length = 35 Exit Function Case "@d" B64Length = 36 Exit Function Case "@e" B64Length = 37 Exit Function Case "@f" B64Length = 38 Exit Function Case "@g" B64Length = 39 Exit Function Case "@h" B64Length = 40 Exit Function Case "@i" B64Length = 41 Exit Function Case "@j" B64Length = 42 Exit Function Case "@k" B64Length = 43 Exit Function Case "@l" B64Length = 44 Exit Function Case "@m" B64Length = 45 Exit Function Case "@n" B64Length = 46 Exit Function Case "@o" B64Length = 47 Exit Function Case "@p" B64Length = 48 Exit Function Case "@q" B64Length = 49 Exit Function Case "@r" B64Length = 50 Exit Function Case "@s" B64Length = 51 Exit Function Case "@t" B64Length = 52 Exit Function Case "@u" B64Length = 53 Exit Function Case "@v" B64Length = 54 Exit Function Case "@w" B64Length = 55 Exit Function Case "@x" B64Length = 56 Exit Function Case "@y" B64Length = 57 Exit Function Case "@z" B64Length = 58 Exit Function Case "@{" B64Length = 59 Exit Function Case "@|" B64Length = 60 Exit Function Case "@}" B64Length = 61 Exit Function Case "@~" B64Length = 62 Exit Function Case "@" B64Length = 63 Exit Function Case "@€" B64Length = 64 Exit Function Case "AA" B64Length = 65 Exit Function Case "AB" B64Length = 66 Exit Function Case "AC" B64Length = 67 Exit Function Case "AD" B64Length = 68 Exit Function Case "AE" B64Length = 69 Exit Function Case "AF" B64Length = 70 Exit Function Case "AG" B64Length = 71 Exit Function Case "AH" B64Length = 72 Exit Function Case "AI" B64Length = 73 Exit Function Case "AJ" B64Length = 74 Exit Function Case "AK" B64Length = 75 Exit Function Case "AL" B64Length = 76 Exit Function Case "AM" B64Length = 77 Exit Function Case "AN" B64Length = 78 Exit Function Case "AO" B64Length = 79 Exit Function Case "AP" B64Length = 80 Exit Function Case "AQ" B64Length = 81 Exit Function Case "AR" B64Length = 82 Exit Function Case "AS" B64Length = 83 Exit Function Case "AT" B64Length = 84 Exit Function Case "AU" B64Length = 85 Exit Function Case "AV" B64Length = 86 Exit Function Case "AW" B64Length = 87 Exit Function Case "AX" B64Length = 88 Exit Function Case "AY" B64Length = 89 Exit Function Case "AZ" B64Length = 90 Exit Function Case "A[" B64Length = 91 Exit Function Case "A\" B64Length = 92 Exit Function Case "A]" B64Length = 93 Exit Function Case "A^" B64Length = 94 Exit Function Case "A_" B64Length = 95 Exit Function Case "A`" B64Length = 96 Exit Function Case "Aa" B64Length = 97 Exit Function Case "Ab" B64Length = 98 Exit Function Case "Ac" B64Length = 99 Exit Function Case "Ad" B64Length = 100 Exit Function Case "Ae" B64Length = 101 Exit Function Case "Af" B64Length = 102 Exit Function Case "Ag" B64Length = 103 Exit Function Case "Ah" B64Length = 104 Exit Function Case "Ai" B64Length = 105 Exit Function Case "Aj" B64Length = 106 Exit Function Case "Ak" B64Length = 107 Exit Function Case "Al" B64Length = 108 Exit Function Case "Am" B64Length = 109 Exit Function Case "An" B64Length = 110 Exit Function Case "Ao" B64Length = 111 Exit Function Case "Ap" B64Length = 112 Exit Function Case "Aq" B64Length = 113 Exit Function Case "Ar" B64Length = 114 Exit Function Case "As" B64Length = 115 Exit Function Case "At" B64Length = 116 Exit Function Case "Au" B64Length = 117 Exit Function Case "Av" B64Length = 118 Exit Function Case "Aw" B64Length = 119 Exit Function Case "Ax" B64Length = 120 Exit Function Case "Ay" B64Length = 121 Exit Function Case "Az" B64Length = 122 Exit Function Case "A{" B64Length = 123 Exit Function Case "A|" B64Length = 124 Exit Function Case "A}" B64Length = 125 Exit Function Case "A~" B64Length = 126 Exit Function Case "A" B64Length = 127 Exit Function Case "B@" B64Length = 128 Exit Function Case "BA" B64Length = 129 Exit Function Case "BB" B64Length = 130 Exit Function Case "BC" B64Length = 131 Exit Function Case "BD" B64Length = 132 Exit Function Case "BE" B64Length = 133 Exit Function Case "BF" B64Length = 134 Exit Function Case "BG" B64Length = 135 Exit Function Case "BH" B64Length = 136 Exit Function Case "BI" B64Length = 137 Exit Function Case "BJ" B64Length = 138 Exit Function Case "BK" B64Length = 139 Exit Function Case "BL" B64Length = 140 Exit Function Case "BM" B64Length = 141 Exit Function Case "BN" B64Length = 142 Exit Function Case "BO" B64Length = 143 Exit Function Case "BP" B64Length = 144 Exit Function Case "BQ" B64Length = 145 Exit Function Case "BR" B64Length = 146 Exit Function Case "BS" B64Length = 147 Exit Function Case "BT" B64Length = 148 Exit Function Case "BU" B64Length = 149 Exit Function Case "BV" B64Length = 150 Exit Function Case "BW" B64Length = 151 Exit Function Case "BX" B64Length = 152 Exit Function Case "BY" B64Length = 153 Exit Function Case "BZ" B64Length = 154 Exit Function Case "B[" B64Length = 155 Exit Function Case "B\" B64Length = 156 Exit Function Case "B]" B64Length = 157 Exit Function Case "B^" B64Length = 158 Exit Function Case "B_" B64Length = 159 Exit Function Case "B`" B64Length = 160 Exit Function Case "Ba" B64Length = 161 Exit Function Case "Bb" B64Length = 162 Exit Function Case "Bc" B64Length = 163 Exit Function Case "Bd" B64Length = 164 Exit Function Case "Be" B64Length = 165 Exit Function Case "Bf" B64Length = 166 Exit Function Case "Bg" B64Length = 167 Exit Function Case "Bh" B64Length = 168 Exit Function Case "Bi" B64Length = 169 Exit Function Case "Bj" B64Length = 170 Exit Function Case "Bk" B64Length = 171 Exit Function Case "Bl" B64Length = 172 Exit Function Case "Bm" B64Length = 173 Exit Function Case "Bn" B64Length = 174 Exit Function Case "Bo" B64Length = 175 Exit Function Case "Bp" B64Length = 176 Exit Function Case "Bq" B64Length = 177 Exit Function Case "Br" B64Length = 178 Exit Function Case "Bs" B64Length = 179 Exit Function Case "Bt" B64Length = 180 Exit Function Case "Bu" B64Length = 181 Exit Function Case "Bv" B64Length = 182 Exit Function Case "Bw" B64Length = 183 Exit Function Case "Bx" B64Length = 184 Exit Function Case "By" B64Length = 185 Exit Function Case "Bz" B64Length = 186 Exit Function Case "B{" B64Length = 187 Exit Function Case "B|" B64Length = 188 Exit Function Case "B}" B64Length = 189 Exit Function Case "B~" B64Length = 190 Exit Function Case "B" B64Length = 191 Exit Function Case "B€" B64Length = 192 Exit Function Case "CA" B64Length = 193 Exit Function Case "CB" B64Length = 194 Exit Function Case "CC" B64Length = 195 Exit Function Case "CD" B64Length = 196 Exit Function Case "CE" B64Length = 197 Exit Function Case "CF" B64Length = 198 Exit Function Case "CG" B64Length = 199 Exit Function Case "CH" B64Length = 200 Exit Function Case "CI" B64Length = 201 Exit Function Case "CJ" B64Length = 202 Exit Function Case "CK" B64Length = 203 Exit Function Case "CL" B64Length = 204 Exit Function Case "CM" B64Length = 205 Exit Function Case "CN" B64Length = 206 Exit Function Case "CO" B64Length = 207 Exit Function Case "CP" B64Length = 208 Exit Function Case "CQ" B64Length = 209 Exit Function Case "CR" B64Length = 210 Exit Function Case "CS" B64Length = 211 Exit Function Case "CT" B64Length = 212 Exit Function Case "CU" B64Length = 213 Exit Function Case "CV" B64Length = 214 Exit Function Case "CW" B64Length = 215 Exit Function Case "CX" B64Length = 216 Exit Function Case "CY" B64Length = 217 Exit Function Case "CZ" B64Length = 218 Exit Function Case "C[" B64Length = 219 Exit Function Case "C\" B64Length = 220 Exit Function Case "C]" B64Length = 221 Exit Function Case "C^" B64Length = 222 Exit Function Case "C_" B64Length = 223 Exit Function Case "C`" B64Length = 224 Exit Function Case "Ca" B64Length = 225 Exit Function Case "Cb" B64Length = 226 Exit Function Case "Cc" B64Length = 227 Exit Function Case "Cd" B64Length = 228 Exit Function Case "Ce" B64Length = 229 Exit Function Case "Cf" B64Length = 230 Exit Function Case "Cg" B64Length = 231 Exit Function Case "Ch" B64Length = 232 Exit Function Case "Ci" B64Length = 233 Exit Function Case "Cj" B64Length = 234 Exit Function Case "Ck" B64Length = 235 Exit Function Case "Cl" B64Length = 236 Exit Function Case "Cm" B64Length = 237 Exit Function Case "Cn" B64Length = 238 Exit Function Case "Co" B64Length = 239 Exit Function Case "Cp" B64Length = 240 Exit Function Case "Cq" B64Length = 241 Exit Function Case "Cr" B64Length = 242 Exit Function Case "Cs" B64Length = 243 Exit Function Case "Ct" B64Length = 244 Exit Function Case "Cu" B64Length = 245 Exit Function Case "Cv" B64Length = 246 Exit Function Case "Cw" B64Length = 247 Exit Function Case "Cx" B64Length = 248 Exit Function Case "Cy" B64Length = 249 Exit Function Case "Cz" B64Length = 250 Exit Function Case "C{" B64Length = 251 Exit Function Case "C|" B64Length = 252 Exit Function Case "C}" B64Length = 253 Exit Function Case "C~" B64Length = 254 Exit Function Case "C" B64Length = 255 Exit Function Case "D@" B64Length = 256 Exit Function Case "DA" B64Length = 257 Exit Function Case "DB" B64Length = 258 Exit Function Case "DC" B64Length = 259 Exit Function Case "DD" B64Length = 260 Exit Function Case "DE" B64Length = 261 Exit Function Case "DF" B64Length = 262 Exit Function Case "DG" B64Length = 263 Exit Function Case "DH" B64Length = 264 Exit Function Case "DI" B64Length = 265 Exit Function Case "DJ" B64Length = 266 Exit Function Case "DK" B64Length = 267 Exit Function Case "DL" B64Length = 268 Exit Function Case "DM" B64Length = 269 Exit Function Case "DN" B64Length = 270 Exit Function Case "DO" B64Length = 271 Exit Function Case "DP" B64Length = 272 Exit Function Case "DQ" B64Length = 273 Exit Function Case "DR" B64Length = 274 Exit Function Case "DS" B64Length = 275 Exit Function Case "DT" B64Length = 276 Exit Function Case "DU" B64Length = 277 Exit Function Case "DV" B64Length = 278 Exit Function Case "DW" B64Length = 279 Exit Function Case "DX" B64Length = 280 Exit Function Case "DY" B64Length = 281 Exit Function Case "DZ" B64Length = 282 Exit Function Case "D[" B64Length = 283 Exit Function Case "D\" B64Length = 284 Exit Function Case "D]" B64Length = 285 Exit Function Case "D^" B64Length = 286 Exit Function Case "D_" B64Length = 287 Exit Function Case "D`" B64Length = 288 Exit Function Case "Da" B64Length = 289 Exit Function Case "Db" B64Length = 290 Exit Function Case "Dc" B64Length = 291 Exit Function Case "Dd" B64Length = 292 Exit Function Case "De" B64Length = 293 Exit Function Case "Df" B64Length = 294 Exit Function Case "Dg" B64Length = 295 Exit Function Case "Dh" B64Length = 296 Exit Function Case "Di" B64Length = 297 Exit Function Case "Dj" B64Length = 298 Exit Function Case "Dk" B64Length = 299 Exit Function Case "Dl" B64Length = 300 Exit Function Case "Dm" B64Length = 301 Exit Function Case "Dn" B64Length = 302 Exit Function Case "Do" B64Length = 303 Exit Function Case "Dp" B64Length = 304 Exit Function Case "Dq" B64Length = 305 Exit Function Case "Dr" B64Length = 306 Exit Function Case "Ds" B64Length = 307 Exit Function Case "Dt" B64Length = 308 Exit Function Case "Du" B64Length = 309 Exit Function Case "Dv" B64Length = 310 Exit Function Case "Dw" B64Length = 311 Exit Function Case "Dx" B64Length = 312 Exit Function Case "Dy" B64Length = 313 Exit Function Case "Dz" B64Length = 314 Exit Function Case "D{" B64Length = 315 Exit Function Case "D|" B64Length = 316 Exit Function Case "D}" B64Length = 317 Exit Function Case "D~" B64Length = 318 Exit Function Case "D" B64Length = 319 Exit Function Case "D€" B64Length = 320 Exit Function Case "EA" B64Length = 321 Exit Function Case "EB" B64Length = 322 Exit Function Case "EC" B64Length = 323 Exit Function Case "ED" B64Length = 324 Exit Function Case "EE" B64Length = 325 Exit Function Case "EF" B64Length = 326 Exit Function Case "EG" B64Length = 327 Exit Function Case "EH" B64Length = 328 Exit Function Case "EI" B64Length = 329 Exit Function Case "EJ" B64Length = 330 Exit Function Case "EK" B64Length = 331 Exit Function Case "EL" B64Length = 332 Exit Function Case "EM" B64Length = 333 Exit Function Case "EN" B64Length = 334 Exit Function Case "EO" B64Length = 335 Exit Function Case "EP" B64Length = 336 Exit Function Case "EQ" B64Length = 337 Exit Function Case "ER" B64Length = 338 Exit Function Case "ES" B64Length = 339 Exit Function Case "ET" B64Length = 340 Exit Function Case "EU" B64Length = 341 Exit Function Case "EV" B64Length = 342 Exit Function Case "EW" B64Length = 343 Exit Function Case "EX" B64Length = 344 Exit Function Case "EY" B64Length = 345 Exit Function Case "EZ" B64Length = 346 Exit Function Case "E[" B64Length = 347 Exit Function Case "E\" B64Length = 348 Exit Function Case "E]" B64Length = 349 Exit Function Case "E^" B64Length = 350 Exit Function Case "E_" B64Length = 351 Exit Function Case "E`" B64Length = 352 Exit Function Case "Ea" B64Length = 353 Exit Function Case "Eb" B64Length = 354 Exit Function Case "Ec" B64Length = 355 Exit Function Case "Ed" B64Length = 356 Exit Function Case "Ee" B64Length = 357 Exit Function Case "Ef" B64Length = 358 Exit Function Case "Eg" B64Length = 359 Exit Function Case "Eh" B64Length = 360 Exit Function Case "Ei" B64Length = 361 Exit Function Case "Ej" B64Length = 362 Exit Function Case "Ek" B64Length = 363 Exit Function Case "El" B64Length = 364 Exit Function Case "Em" B64Length = 365 Exit Function Case "En" B64Length = 366 Exit Function Case "Eo" B64Length = 367 Exit Function Case "Ep" B64Length = 368 Exit Function Case "Eq" B64Length = 369 Exit Function Case "Er" B64Length = 370 Exit Function Case "Es" B64Length = 371 Exit Function Case "Et" B64Length = 372 Exit Function Case "Eu" B64Length = 373 Exit Function Case "Ev" B64Length = 374 Exit Function Case "Ew" B64Length = 375 Exit Function Case "Ex" B64Length = 376 Exit Function Case "Ey" B64Length = 377 Exit Function Case "Ez" B64Length = 378 Exit Function Case "E{" B64Length = 379 Exit Function Case "E|" B64Length = 380 Exit Function Case "E}" B64Length = 381 Exit Function Case "E~" B64Length = 382 Exit Function Case "E" B64Length = 383 Exit Function Case "F@" B64Length = 384 Exit Function Case "FA" B64Length = 385 Exit Function Case "FB" B64Length = 386 Exit Function Case "FC" B64Length = 387 Exit Function Case "FD" B64Length = 388 Exit Function Case "FE" B64Length = 389 Exit Function Case "FF" B64Length = 390 Exit Function Case "FG" B64Length = 391 Exit Function Case "FH" B64Length = 392 Exit Function Case "FI" B64Length = 393 Exit Function Case "FJ" B64Length = 394 Exit Function Case "FK" B64Length = 395 Exit Function Case "FL" B64Length = 396 Exit Function Case "FM" B64Length = 397 Exit Function Case "FN" B64Length = 398 Exit Function Case "FO" B64Length = 399 Exit Function Case "FP" B64Length = 400 Exit Function Case "FQ" B64Length = 401 Exit Function Case "FR" B64Length = 402 Exit Function Case "FS" B64Length = 403 Exit Function Case "FT" B64Length = 404 Exit Function Case "FU" B64Length = 405 Exit Function Case "FV" B64Length = 406 Exit Function Case "FW" B64Length = 407 Exit Function Case "FX" B64Length = 408 Exit Function Case "FY" B64Length = 409 Exit Function Case "FZ" B64Length = 410 Exit Function Case "F[" B64Length = 411 Exit Function Case "F\" B64Length = 412 Exit Function Case "F]" B64Length = 413 Exit Function Case "F^" B64Length = 414 Exit Function Case "F_" B64Length = 415 Exit Function Case "F`" B64Length = 416 Exit Function Case "Fa" B64Length = 417 Exit Function Case "Fb" B64Length = 418 Exit Function Case "Fc" B64Length = 419 Exit Function Case "Fd" B64Length = 420 Exit Function Case "Fe" B64Length = 421 Exit Function Case "Ff" B64Length = 422 Exit Function Case "Fg" B64Length = 423 Exit Function Case "Fh" B64Length = 424 Exit Function Case "Fi" B64Length = 425 Exit Function Case "Fj" B64Length = 426 Exit Function Case "Fk" B64Length = 427 Exit Function Case "Fl" B64Length = 428 Exit Function Case "Fm" B64Length = 429 Exit Function Case "Fn" B64Length = 430 Exit Function Case "Fo" B64Length = 431 Exit Function Case "Fp" B64Length = 432 Exit Function Case "Fq" B64Length = 433 Exit Function Case "Fr" B64Length = 434 Exit Function Case "Fs" B64Length = 435 Exit Function Case "Ft" B64Length = 436 Exit Function Case "Fu" B64Length = 437 Exit Function Case "Fv" B64Length = 438 Exit Function Case "Fw" B64Length = 439 Exit Function Case "Fx" B64Length = 440 Exit Function Case "Fy" B64Length = 441 Exit Function Case "Fz" B64Length = 442 Exit Function Case "F{" B64Length = 443 Exit Function Case "F|" B64Length = 444 Exit Function Case "F}" B64Length = 445 Exit Function Case "F~" B64Length = 446 Exit Function Case "F" B64Length = 447 Exit Function Case "F€" B64Length = 448 Exit Function Case "GA" B64Length = 449 Exit Function Case "GB" B64Length = 450 Exit Function Case "GC" B64Length = 451 Exit Function Case "GD" B64Length = 452 Exit Function Case "GE" B64Length = 453 Exit Function Case "GF" B64Length = 454 Exit Function Case "GG" B64Length = 455 Exit Function Case "GH" B64Length = 456 Exit Function Case "GI" B64Length = 457 Exit Function Case "GJ" B64Length = 458 Exit Function Case "GK" B64Length = 459 Exit Function Case "GL" B64Length = 460 Exit Function Case "GM" B64Length = 461 Exit Function Case "GN" B64Length = 462 Exit Function Case "GO" B64Length = 463 Exit Function Case "GP" B64Length = 464 Exit Function Case "GQ" B64Length = 465 Exit Function Case "GR" B64Length = 466 Exit Function Case "GS" B64Length = 467 Exit Function Case "GT" B64Length = 468 Exit Function Case "GU" B64Length = 469 Exit Function Case "GV" B64Length = 470 Exit Function Case "GW" B64Length = 471 Exit Function Case "GX" B64Length = 472 Exit Function Case "GY" B64Length = 473 Exit Function Case "GZ" B64Length = 474 Exit Function Case "G[" B64Length = 475 Exit Function Case "G\" B64Length = 476 Exit Function Case "G]" B64Length = 477 Exit Function Case "G^" B64Length = 478 Exit Function Case "G_" B64Length = 479 Exit Function Case "G`" B64Length = 480 Exit Function Case "Ga" B64Length = 481 Exit Function Case "Gb" B64Length = 482 Exit Function Case "Gc" B64Length = 483 Exit Function Case "Gd" B64Length = 484 Exit Function Case "Ge" B64Length = 485 Exit Function Case "Gf" B64Length = 486 Exit Function Case "Gg" B64Length = 487 Exit Function Case "Gh" B64Length = 488 Exit Function Case "Gi" B64Length = 489 Exit Function Case "Gj" B64Length = 490 Exit Function Case "Gk" B64Length = 491 Exit Function Case "Gl" B64Length = 492 Exit Function Case "Gm" B64Length = 493 Exit Function Case "Gn" B64Length = 494 Exit Function Case "Go" B64Length = 495 Exit Function Case "Gp" B64Length = 496 Exit Function Case "Gq" B64Length = 497 Exit Function Case "Gr" B64Length = 498 Exit Function Case "Gs" B64Length = 499 Exit Function Case "Gt" B64Length = 500 Exit Function Case "Gu" B64Length = 501 Exit Function Case "Gv" B64Length = 502 Exit Function Case "Gw" B64Length = 503 Exit Function Case "Gx" B64Length = 504 Exit Function Case "Gy" B64Length = 505 Exit Function Case "Gz" B64Length = 506 Exit Function Case "G{" B64Length = 507 Exit Function Case "G|" B64Length = 508 Exit Function Case "G}" B64Length = 509 Exit Function Case "G~" B64Length = 510 Exit Function Case "G" B64Length = 511 Exit Function Case "H@" B64Length = 512 Exit Function Case "HA" B64Length = 513 Exit Function Case "HB" B64Length = 514 Exit Function Case "HC" B64Length = 515 Exit Function Case "HD" B64Length = 516 Exit Function Case "HE" B64Length = 517 Exit Function Case "HF" B64Length = 518 Exit Function Case "HG" B64Length = 519 Exit Function Case "HH" B64Length = 520 Exit Function Case "HI" B64Length = 521 Exit Function Case "HJ" B64Length = 522 Exit Function Case "HK" B64Length = 523 Exit Function Case "HL" B64Length = 524 Exit Function Case "HM" B64Length = 525 Exit Function Case "HN" B64Length = 526 Exit Function Case "HO" B64Length = 527 Exit Function Case "HP" B64Length = 528 Exit Function Case "HQ" B64Length = 529 Exit Function Case "HR" B64Length = 530 Exit Function Case "HS" B64Length = 531 Exit Function Case "HT" B64Length = 532 Exit Function Case "HU" B64Length = 533 Exit Function Case "HV" B64Length = 534 Exit Function Case "HW" B64Length = 535 Exit Function Case "HX" B64Length = 536 Exit Function Case "HY" B64Length = 537 Exit Function Case "HZ" B64Length = 538 Exit Function Case "H[" B64Length = 539 Exit Function Case "H\" B64Length = 540 Exit Function Case "H]" B64Length = 541 Exit Function Case "H^" B64Length = 542 Exit Function Case "H_" B64Length = 543 Exit Function Case "H`" B64Length = 544 Exit Function Case "Ha" B64Length = 545 Exit Function Case "Hb" B64Length = 546 Exit Function Case "Hc" B64Length = 547 Exit Function Case "Hd" B64Length = 548 Exit Function Case "He" B64Length = 549 Exit Function Case "Hf" B64Length = 550 Exit Function Case "Hg" B64Length = 551 Exit Function Case "Hh" B64Length = 552 Exit Function Case "Hi" B64Length = 553 Exit Function Case "Hj" B64Length = 554 Exit Function Case "Hk" B64Length = 555 Exit Function Case "Hl" B64Length = 556 Exit Function Case "Hm" B64Length = 557 Exit Function Case "Hn" B64Length = 558 Exit Function Case "Ho" B64Length = 559 Exit Function Case "Hp" B64Length = 560 Exit Function Case "Hq" B64Length = 561 Exit Function Case "Hr" B64Length = 562 Exit Function Case "Hs" B64Length = 563 Exit Function Case "Ht" B64Length = 564 Exit Function Case "Hu" B64Length = 565 Exit Function Case "Hv" B64Length = 566 Exit Function Case "Hw" B64Length = 567 Exit Function Case "Hx" B64Length = 568 Exit Function Case "Hy" B64Length = 569 Exit Function Case "Hz" B64Length = 570 Exit Function Case "H{" B64Length = 571 Exit Function Case "H|" B64Length = 572 Exit Function Case "H}" B64Length = 573 Exit Function Case "H~" B64Length = 574 Exit Function Case "H" B64Length = 575 Exit Function Case "H€" B64Length = 576 Exit Function Case "IA" B64Length = 577 Exit Function Case "IB" B64Length = 578 Exit Function Case "IC" B64Length = 579 Exit Function Case "ID" B64Length = 580 Exit Function Case "IE" B64Length = 581 Exit Function Case "IF" B64Length = 582 Exit Function Case "IG" B64Length = 583 Exit Function Case "IH" B64Length = 584 Exit Function Case "II" B64Length = 585 Exit Function Case "IJ" B64Length = 586 Exit Function Case "IK" B64Length = 587 Exit Function Case "IL" B64Length = 588 Exit Function Case "IM" B64Length = 589 Exit Function Case "IN" B64Length = 590 Exit Function Case "IO" B64Length = 591 Exit Function Case "IP" B64Length = 592 Exit Function Case "IQ" B64Length = 593 Exit Function Case "IR" B64Length = 594 Exit Function Case "IS" B64Length = 595 Exit Function Case "IT" B64Length = 596 Exit Function Case "IU" B64Length = 597 Exit Function Case "IV" B64Length = 598 Exit Function Case "IW" B64Length = 599 Exit Function Case "IX" B64Length = 600 Exit Function Case "IY" B64Length = 601 Exit Function Case "IZ" B64Length = 602 Exit Function Case "I[" B64Length = 603 Exit Function Case "I\" B64Length = 604 Exit Function Case "I]" B64Length = 605 Exit Function Case "I^" B64Length = 606 Exit Function Case "I_" B64Length = 607 Exit Function Case "I`" B64Length = 608 Exit Function Case "Ia" B64Length = 609 Exit Function Case "Ib" B64Length = 610 Exit Function Case "Ic" B64Length = 611 Exit Function Case "Id" B64Length = 612 Exit Function Case "Ie" B64Length = 613 Exit Function Case "If" B64Length = 614 Exit Function Case "Ig" B64Length = 615 Exit Function Case "Ih" B64Length = 616 Exit Function Case "Ii" B64Length = 617 Exit Function Case "Ij" B64Length = 618 Exit Function Case "Ik" B64Length = 619 Exit Function Case "Il" B64Length = 620 Exit Function Case "Im" B64Length = 621 Exit Function Case "In" B64Length = 622 Exit Function Case "Io" B64Length = 623 Exit Function Case "Ip" B64Length = 624 Exit Function Case "Iq" B64Length = 625 Exit Function Case "Ir" B64Length = 626 Exit Function Case "Is" B64Length = 627 Exit Function Case "It" B64Length = 628 Exit Function Case "Iu" B64Length = 629 Exit Function Case "Iv" B64Length = 630 Exit Function Case "Iw" B64Length = 631 Exit Function Case "Ix" B64Length = 632 Exit Function Case "Iy" B64Length = 633 Exit Function Case "Iz" B64Length = 634 Exit Function Case "I{" B64Length = 635 Exit Function Case "I|" B64Length = 636 Exit Function Case "I}" B64Length = 637 Exit Function Case "I~" B64Length = 638 Exit Function Case "I" B64Length = 639 Exit Function Case "J@" B64Length = 640 Exit Function Case "JA" B64Length = 641 Exit Function Case "JB" B64Length = 642 Exit Function Case "JC" B64Length = 643 Exit Function Case "JD" B64Length = 644 Exit Function Case "JE" B64Length = 645 Exit Function Case "JF" B64Length = 646 Exit Function Case "JG" B64Length = 647 Exit Function Case "JH" B64Length = 648 Exit Function Case "JI" B64Length = 649 Exit Function Case "JJ" B64Length = 650 Exit Function Case "JK" B64Length = 651 Exit Function Case "JL" B64Length = 652 Exit Function Case "JM" B64Length = 653 Exit Function Case "JN" B64Length = 654 Exit Function Case "JO" B64Length = 655 Exit Function Case "JP" B64Length = 656 Exit Function Case "JQ" B64Length = 657 Exit Function Case "JR" B64Length = 658 Exit Function Case "JS" B64Length = 659 Exit Function Case "JT" B64Length = 660 Exit Function Case "JU" B64Length = 661 Exit Function Case "JV" B64Length = 662 Exit Function Case "JW" B64Length = 663 Exit Function Case "JX" B64Length = 664 Exit Function Case "JY" B64Length = 665 Exit Function Case "JZ" B64Length = 666 Exit Function Case "J[" B64Length = 667 Exit Function Case "J\" B64Length = 668 Exit Function Case "J]" B64Length = 669 Exit Function Case "J^" B64Length = 670 Exit Function Case "J_" B64Length = 671 Exit Function Case "J`" B64Length = 672 Exit Function Case "Ja" B64Length = 673 Exit Function Case "Jb" B64Length = 674 Exit Function Case "Jc" B64Length = 675 Exit Function Case "Jd" B64Length = 676 Exit Function Case "Je" B64Length = 677 Exit Function Case "Jf" B64Length = 678 Exit Function Case "Jg" B64Length = 679 Exit Function Case "Jh" B64Length = 680 Exit Function Case "Ji" B64Length = 681 Exit Function Case "Jj" B64Length = 682 Exit Function Case "Jk" B64Length = 683 Exit Function Case "Jl" B64Length = 684 Exit Function Case "Jm" B64Length = 685 Exit Function Case "Jn" B64Length = 686 Exit Function Case "Jo" B64Length = 687 Exit Function Case "Jp" B64Length = 688 Exit Function Case "Jq" B64Length = 689 Exit Function Case "Jr" B64Length = 690 Exit Function Case "Js" B64Length = 691 Exit Function Case "Jt" B64Length = 692 Exit Function Case "Ju" B64Length = 693 Exit Function Case "Jv" B64Length = 694 Exit Function Case "Jw" B64Length = 695 Exit Function Case "Jx" B64Length = 696 Exit Function Case "Jy" B64Length = 697 Exit Function Case "Jz" B64Length = 698 Exit Function Case "J{" B64Length = 699 Exit Function Case "J|" B64Length = 700 Exit Function Case "J}" B64Length = 701 Exit Function Case "J~" B64Length = 702 Exit Function Case "J" B64Length = 703 Exit Function Case "J€" B64Length = 704 Exit Function Case "KA" B64Length = 705 Exit Function Case "KB" B64Length = 706 Exit Function Case "KC" B64Length = 707 Exit Function Case "KD" B64Length = 708 Exit Function Case "KE" B64Length = 709 Exit Function Case "KF" B64Length = 710 Exit Function Case "KG" B64Length = 711 Exit Function Case "KH" B64Length = 712 Exit Function Case "KI" B64Length = 713 Exit Function Case "KJ" B64Length = 714 Exit Function Case "KK" B64Length = 715 Exit Function Case "KL" B64Length = 716 Exit Function Case "KM" B64Length = 717 Exit Function Case "KN" B64Length = 718 Exit Function Case "KO" B64Length = 719 Exit Function Case "KP" B64Length = 720 Exit Function Case "KQ" B64Length = 721 Exit Function Case "KR" B64Length = 722 Exit Function Case "KS" B64Length = 723 Exit Function Case "KT" B64Length = 724 Exit Function Case "KU" B64Length = 725 Exit Function Case "KV" B64Length = 726 Exit Function Case "KW" B64Length = 727 Exit Function Case "KX" B64Length = 728 Exit Function Case "KY" B64Length = 729 Exit Function Case "KZ" B64Length = 730 Exit Function Case "K[" B64Length = 731 Exit Function Case "K\" B64Length = 732 Exit Function Case "K]" B64Length = 733 Exit Function Case "K^" B64Length = 734 Exit Function Case "K_" B64Length = 735 Exit Function Case "K`" B64Length = 736 Exit Function Case "Ka" B64Length = 737 Exit Function Case "Kb" B64Length = 738 Exit Function Case "Kc" B64Length = 739 Exit Function Case "Kd" B64Length = 740 Exit Function Case "Ke" B64Length = 741 Exit Function Case "Kf" B64Length = 742 Exit Function Case "Kg" B64Length = 743 Exit Function Case "Kh" B64Length = 744 Exit Function Case "Ki" B64Length = 745 Exit Function Case "Kj" B64Length = 746 Exit Function Case "Kk" B64Length = 747 Exit Function Case "Kl" B64Length = 748 Exit Function Case "Km" B64Length = 749 Exit Function Case "Kn" B64Length = 750 Exit Function Case "Ko" B64Length = 751 Exit Function Case "Kp" B64Length = 752 Exit Function Case "Kq" B64Length = 753 Exit Function Case "Kr" B64Length = 754 Exit Function Case "Ks" B64Length = 755 Exit Function Case "Kt" B64Length = 756 Exit Function Case "Ku" B64Length = 757 Exit Function Case "Kv" B64Length = 758 Exit Function Case "Kw" B64Length = 759 Exit Function Case "Kx" B64Length = 760 Exit Function Case "Ky" B64Length = 761 Exit Function Case "Kz" B64Length = 762 Exit Function Case "K{" B64Length = 763 Exit Function Case "K|" B64Length = 764 Exit Function Case "K}" B64Length = 765 Exit Function Case "K~" B64Length = 766 Exit Function Case "K" B64Length = 767 Exit Function Case "L@" B64Length = 768 Exit Function Case "LA" B64Length = 769 Exit Function Case "LB" B64Length = 770 Exit Function Case "LC" B64Length = 771 Exit Function Case "LD" B64Length = 772 Exit Function Case "LE" B64Length = 773 Exit Function Case "LF" B64Length = 774 Exit Function Case "LG" B64Length = 775 Exit Function Case "LH" B64Length = 776 Exit Function Case "LI" B64Length = 777 Exit Function Case "LJ" B64Length = 778 Exit Function Case "LK" B64Length = 779 Exit Function Case "LL" B64Length = 780 Exit Function Case "LM" B64Length = 781 Exit Function Case "LN" B64Length = 782 Exit Function Case "LO" B64Length = 783 Exit Function Case "LP" B64Length = 784 Exit Function Case "LQ" B64Length = 785 Exit Function Case "LR" B64Length = 786 Exit Function Case "LS" B64Length = 787 Exit Function Case "LT" B64Length = 788 Exit Function Case "LU" B64Length = 789 Exit Function Case "LV" B64Length = 790 Exit Function Case "LW" B64Length = 791 Exit Function Case "LX" B64Length = 792 Exit Function Case "LY" B64Length = 793 Exit Function Case "LZ" B64Length = 794 Exit Function Case "L[" B64Length = 795 Exit Function Case "L\" B64Length = 796 Exit Function Case "L]" B64Length = 797 Exit Function Case "L^" B64Length = 798 Exit Function Case "L_" B64Length = 799 Exit Function Case "L`" B64Length = 800 Exit Function Case "La" B64Length = 801 Exit Function Case "Lb" B64Length = 802 Exit Function Case "Lc" B64Length = 803 Exit Function Case "Ld" B64Length = 804 Exit Function Case "Le" B64Length = 805 Exit Function Case "Lf" B64Length = 806 Exit Function Case "Lg" B64Length = 807 Exit Function Case "Lh" B64Length = 808 Exit Function Case "Li" B64Length = 809 Exit Function Case "Lj" B64Length = 810 Exit Function Case "Lk" B64Length = 811 Exit Function Case "Ll" B64Length = 812 Exit Function Case "Lm" B64Length = 813 Exit Function Case "Ln" B64Length = 814 Exit Function Case "Lo" B64Length = 815 Exit Function Case "Lp" B64Length = 816 Exit Function Case "Lq" B64Length = 817 Exit Function Case "Lr" B64Length = 818 Exit Function Case "Ls" B64Length = 819 Exit Function Case "Lt" B64Length = 820 Exit Function Case "Lu" B64Length = 821 Exit Function Case "Lv" B64Length = 822 Exit Function Case "Lw" B64Length = 823 Exit Function Case "Lx" B64Length = 824 Exit Function Case "Ly" B64Length = 825 Exit Function Case "Lz" B64Length = 826 Exit Function Case "L{" B64Length = 827 Exit Function Case "L|" B64Length = 828 Exit Function Case "L}" B64Length = 829 Exit Function Case "L~" B64Length = 830 Exit Function Case "L" B64Length = 831 Exit Function Case "L€" B64Length = 832 Exit Function Case "MA" B64Length = 833 Exit Function Case "MB" B64Length = 834 Exit Function Case "MC" B64Length = 835 Exit Function Case "MD" B64Length = 836 Exit Function Case "ME" B64Length = 837 Exit Function Case "MF" B64Length = 838 Exit Function Case "MG" B64Length = 839 Exit Function Case "MH" B64Length = 840 Exit Function Case "MI" B64Length = 841 Exit Function Case "MJ" B64Length = 842 Exit Function Case "MK" B64Length = 843 Exit Function Case "ML" B64Length = 844 Exit Function Case "MM" B64Length = 845 Exit Function Case "MN" B64Length = 846 Exit Function Case "MO" B64Length = 847 Exit Function Case "MP" B64Length = 848 Exit Function Case "MQ" B64Length = 849 Exit Function Case "MR" B64Length = 850 Exit Function Case "MS" B64Length = 851 Exit Function Case "MT" B64Length = 852 Exit Function Case "MU" B64Length = 853 Exit Function Case "MV" B64Length = 854 Exit Function Case "MW" B64Length = 855 Exit Function Case "MX" B64Length = 856 Exit Function Case "MY" B64Length = 857 Exit Function Case "MZ" B64Length = 858 Exit Function Case "M[" B64Length = 859 Exit Function Case "M\" B64Length = 860 Exit Function Case "M]" B64Length = 861 Exit Function Case "M^" B64Length = 862 Exit Function Case "M_" B64Length = 863 Exit Function Case "M`" B64Length = 864 Exit Function Case "Ma" B64Length = 865 Exit Function Case "Mb" B64Length = 866 Exit Function Case "Mc" B64Length = 867 Exit Function Case "Md" B64Length = 868 Exit Function Case "Me" B64Length = 869 Exit Function Case "Mf" B64Length = 870 Exit Function Case "Mg" B64Length = 871 Exit Function Case "Mh" B64Length = 872 Exit Function Case "Mi" B64Length = 873 Exit Function Case "Mj" B64Length = 874 Exit Function Case "Mk" B64Length = 875 Exit Function Case "Ml" B64Length = 876 Exit Function Case "Mm" B64Length = 877 Exit Function Case "Mn" B64Length = 878 Exit Function Case "Mo" B64Length = 879 Exit Function Case "Mp" B64Length = 880 Exit Function Case "Mq" B64Length = 881 Exit Function Case "Mr" B64Length = 882 Exit Function Case "Ms" B64Length = 883 Exit Function Case "Mt" B64Length = 884 Exit Function Case "Mu" B64Length = 885 Exit Function Case "Mv" B64Length = 886 Exit Function Case "Mw" B64Length = 887 Exit Function Case "Mx" B64Length = 888 Exit Function Case "My" B64Length = 889 Exit Function Case "Mz" B64Length = 890 Exit Function Case "M{" B64Length = 891 Exit Function Case "M|" B64Length = 892 Exit Function Case "M}" B64Length = 893 Exit Function Case "M~" B64Length = 894 Exit Function Case "M" B64Length = 895 Exit Function Case "N@" B64Length = 896 Exit Function Case "NA" B64Length = 897 Exit Function Case "NB" B64Length = 898 Exit Function Case "NC" B64Length = 899 Exit Function Case "ND" B64Length = 900 Exit Function Case "NE" B64Length = 901 Exit Function Case "NF" B64Length = 902 Exit Function Case "NG" B64Length = 903 Exit Function Case "NH" B64Length = 904 Exit Function Case "NI" B64Length = 905 Exit Function Case "NJ" B64Length = 906 Exit Function Case "NK" B64Length = 907 Exit Function Case "NL" B64Length = 908 Exit Function Case "NM" B64Length = 909 Exit Function Case "NN" B64Length = 910 Exit Function Case "NO" B64Length = 911 Exit Function Case "NP" B64Length = 912 Exit Function Case "NQ" B64Length = 913 Exit Function Case "NR" B64Length = 914 Exit Function Case "NS" B64Length = 915 Exit Function Case "NT" B64Length = 916 Exit Function Case "NU" B64Length = 917 Exit Function Case "NV" B64Length = 918 Exit Function Case "NW" B64Length = 919 Exit Function Case "NX" B64Length = 920 Exit Function Case "NY" B64Length = 921 Exit Function Case "NZ" B64Length = 922 Exit Function Case "N[" B64Length = 923 Exit Function Case "N\" B64Length = 924 Exit Function Case "N]" B64Length = 925 Exit Function Case "N^" B64Length = 926 Exit Function Case "N_" B64Length = 927 Exit Function Case "N`" B64Length = 928 Exit Function Case "Na" B64Length = 929 Exit Function Case "Nb" B64Length = 930 Exit Function Case "Nc" B64Length = 931 Exit Function Case "Nd" B64Length = 932 Exit Function Case "Ne" B64Length = 933 Exit Function Case "Nf" B64Length = 934 Exit Function Case "Ng" B64Length = 935 Exit Function Case "Nh" B64Length = 936 Exit Function Case "Ni" B64Length = 937 Exit Function Case "Nj" B64Length = 938 Exit Function Case "Nk" B64Length = 939 Exit Function Case "Nl" B64Length = 940 Exit Function Case "Nm" B64Length = 941 Exit Function Case "Nn" B64Length = 942 Exit Function Case "No" B64Length = 943 Exit Function Case "Np" B64Length = 944 Exit Function Case "Nq" B64Length = 945 Exit Function Case "Nr" B64Length = 946 Exit Function Case "Ns" B64Length = 947 Exit Function Case "Nt" B64Length = 948 Exit Function Case "Nu" B64Length = 949 Exit Function Case "Nv" B64Length = 950 Exit Function Case "Nw" B64Length = 951 Exit Function Case "Nx" B64Length = 952 Exit Function Case "Ny" B64Length = 953 Exit Function Case "Nz" B64Length = 954 Exit Function Case "N{" B64Length = 955 Exit Function Case "N|" B64Length = 956 Exit Function Case "N}" B64Length = 957 Exit Function Case "N~" B64Length = 958 Exit Function Case "N" B64Length = 959 Exit Function Case "N€" B64Length = 960 Exit Function Case "OA" B64Length = 961 Exit Function Case "OB" B64Length = 962 Exit Function Case "OC" B64Length = 963 Exit Function Case "OD" B64Length = 964 Exit Function Case "OE" B64Length = 965 Exit Function Case "OF" B64Length = 966 Exit Function Case "OG" B64Length = 967 Exit Function Case "OH" B64Length = 968 Exit Function Case "OI" B64Length = 969 Exit Function Case "OJ" B64Length = 970 Exit Function Case "OK" B64Length = 971 Exit Function Case "OL" B64Length = 972 Exit Function Case "OM" B64Length = 973 Exit Function Case "ON" B64Length = 974 Exit Function Case "OO" B64Length = 975 Exit Function Case "OP" B64Length = 976 Exit Function Case "OQ" B64Length = 977 Exit Function Case "OR" B64Length = 978 Exit Function Case "OS" B64Length = 979 Exit Function Case "OT" B64Length = 980 Exit Function Case "OU" B64Length = 981 Exit Function Case "OV" B64Length = 982 Exit Function Case "OW" B64Length = 983 Exit Function Case "OX" B64Length = 984 Exit Function Case "OY" B64Length = 985 Exit Function Case "OZ" B64Length = 986 Exit Function Case "O[" B64Length = 987 Exit Function Case "O\" B64Length = 988 Exit Function Case "O]" B64Length = 989 Exit Function Case "O^" B64Length = 990 Exit Function Case "O_" B64Length = 991 Exit Function Case "O`" B64Length = 992 Exit Function Case "Oa" B64Length = 993 Exit Function Case "Ob" B64Length = 994 Exit Function Case "Oc" B64Length = 995 Exit Function Case "Od" B64Length = 996 Exit Function Case "Oe" B64Length = 997 Exit Function Case "Of" B64Length = 998 Exit Function Case "Og" B64Length = 999 Exit Function Case "Oh" B64Length = 1000 Exit Function Case Else B64Length = Err Exit Function End Select End Function