Sub Download(InternalPage As ABMPage)
Dim sb As String
sb = $"var chart = $("#${iID}").ejChart("instance");
chart.model.enableCanvasRendering = true;
chart.redraw();
var canvas = chart.export();
var lnk = canvas.toDataURL("image/png");
$("#${iID}").attr('href', lnk);
$("#${iID}").attr('download', ${iID}.png);
var a = document.createElement("a");
a.download = "${iID}.png";
a.href = lnk;
a.click();
delete a;"$
InternalPage.ws.Eval(sb, Array As Object(ABMComp.ID))
End Sub