document.body.style.margin = "0px";
document.title = sTitle;
document.body.style.backgroundColor = sColor0;
document.body.style.backgroundImage = "url(" + sImgUrl0 + ")";
document.body.style.backgroundRepeat = "repeat-x";
tableMain = document.body.appendChild(document.createElement("table"));
tableMain.style.fontFamily = "serif";
tableMain.style.fontSize = "10.5pt";
tableMain.style.fontWeight = "bold";
tableMain.id = "tableMain";
tableMain.style.width = "100%";
tableMain.style.borderCollapse = "collapse";
tableMain.cellPadding = "0px";
â var var oCell; // . var divAny; âĄvar â ini oCell = document.getElementById("cellInfo"); âĄini â one â˘â˘â˘InfoClear(); âĄone // 0 â˘â˘â˘A2Add(oCell,"âââ"); oCell.appendChild(document.createTextNode("\u00A0\u00A0\u00A0")); // 1 â˘â˘â˘A2Add(oCell,"âââ"); oCell.appendChild(document.createTextNode("\u00A0\u00A0\u00A0")); // 2 â˘â˘â˘A2Add(oCell,"âââ","1_2_76_22"); oCell.appendChild(document.createTextNode("\u00A0\u00A0\u00A0")); // 3 â˘â˘â˘A2Add(oCell,"âââ"); â˘â˘â˘BrAdd(oCell); â˘â˘â˘BrAdd(oCell); // 4 â˘â˘â˘TextAddDivBlack(oCell,"âââ",1); â˘â˘â˘BrAdd(oCell); divAny=â˘â˘â˘div6Add(oCell); // 5 â˘â˘â˘TextAdd(divAny,"âââ"); â˘â˘â˘TextAdd(divAny,"www.bolshoybiznes.ru"); // 6 â˘â˘â˘TextAdd(divAny,"âââ"); // 7 â˘â˘â˘TextAddBrDivGray(oCell,"âââ"); // 8 â˘â˘â˘TextAddDivGray(oCell,"âââ"); // 9 â˘â˘â˘TextAddBrDivBlack(oCell,"âââ"); // 10 â˘â˘â˘TextAddBrDivBlack(oCell,"âââ"); // 11 â˘â˘â˘TextAddBrDivBlack(oCell,"âââ"); // 12 â˘â˘â˘TextAddBrDivBlack(oCell,"âââ"); // 13 â˘â˘â˘TextAddBrDivBlack(oCell,"âââ"); â˘â˘â˘BrAdd(oCell); // 13+4=17 divAny=â˘â˘â˘divList6Add(oCell,["âââ","âââ","âââ","âââ"]);
sAnswer = System.Text.Encoding.UTF8.GetString(oWebClient.DownloadData("http://cbr.ru/"))
tDate1 = oRegExInDate1.Match(oRegExDate1.Match(sAnswer).Value).Value
tDate2 = oRegExInDate2.Match(oRegExDate2.Match(sAnswer).Value).Value
dD1 = oRegExInD1.Match(oRegExD1.Match(sAnswer).Value).Value
dD2 = oRegExInD2.Match(oRegExD2.Match(sAnswer).Value).Value
dE1 = oRegExInE1.Match(oRegExE1.Match(sAnswer).Value).Value
dE2 = oRegExInE2.Match(oRegExE2.Match(sAnswer).Value).Value
Source: https://habr.com/ru/post/81235/