如何保护HTML应用程序（HTA）？

Question

我在HTA中使用以下代码创建了一个GUI：

Sub result ( )
    Dim strComputer, objShell, objExec, strPingResults, WshShell
strComputer = Trim( UCase( ComputerNameTextBox.Value ) )
        Set WshShell = CreateObject("WScript.Shell")
        Set objExec = WshShell.Exec("cmd.exe /c  C: \Program Files (x86)\VMware\VMware vSphere CLI\bin & esxcli -s "&strComputer&" -u root -p NTMC_Admin network nic list ")
        strPingResults = LCase(objExec.StdOut.ReadAll)
        ResultsTextArea.Value = ""

        ResultsHiddenText.Value = strComputer   & vbTab
        ResultsHiddenText.Value = strComputer & vbcr & vblf & strPingResults
        ResultsTextArea.Value = ResultsTextArea.Value & strPingResults   
        CopyButton.Disabled = False
        ResetButton.Disabled = False

    ' change mouse pointer back to default
    Document.Body.Style.Cursor = "default"
End Sub

请帮我保护我的代码，以便任何人都无法在任何视图源下看到此功能。

Answer 1

您应该尝试将vbscript和HTA转换为可执行文件！

(VbsEdit/HTAEdit) ，它包含一个（VbsEdit 32位，VbsEdit 64位，HtaEdit 32位和HtaEdit 64位）。有一个很好的功能是编译和转换你的vbs或你的HTA文件到 .exe ，它是完全免费的。

Answer 2

hta_code.exe提取所有资源和HTA要么进入Temp文件夹系统或用户指定的Folder.u可以在hta运行时轻松到达临时文件夹并将提取的文件夹复制到安全位置，因为在Hta关闭之后.exe中的提取命令从temp文件夹中删除所有文件。在temp文件夹中找到hta我们可以通过键入.hta ............ @ teemu使用窗口搜索是对的@hackoo我不确定htaedit但我会检查这个今天出去