2017-02-17 27 views
1

私はsearching for a solution to an issue of wrapping an .hta fileを.exeに変換したので、ユーザーはクリックして移動できます。私が取り組んでいるアプリケーションは、GUIから.hta経由でロードされるバッチスクリプトのコレクションです。私はHTAEditを含むさまざまなグーグル・ソリューションを試しました。すべてが.exeを正しく作成していないか、新しいローカル感染のための簡単なターゲットとして見えます。.Haを.Exeに変換する

最も正当な解決策は、継続的に失敗し、一度、その後働いていたようだHTAEditは、次のように私の質問があるので、下記のコードを仮定し

  • が正しいそこに実際にEXEにHTAを変換するツールはありますか?
  • 以下のコードはやや長いですが、一般的なプログラミングには新しくなっていますが、何かを混乱させるかどうかはわかりません。

(以下のコードはHTAEditorで動作しますが、私はそれを変換しようと、すべての回で、それが変換を完了するのに失敗した。)

はお時間をいただき、ありがとうございます、と申し訳ありませんが、このポストはと類似しているあります上にリンクしたものは、スタックやGoogleのいずれかで見つけられた解決策はありません。

<html> 
<title>Foo</title> 
<HTA:APPLICATION 

ID="Foo" 
APPLICATIONNAME="Foo" 
BORDERSTYLE="raised" 
ICON="Logos/icon.ico" 
SINGLEINSTANCE="yes"  
> 

<SCRIPT LANGUAGE="VBScript">  
Sub Window_onLoad 
    window.resizeTo 800,400 
End Sub 

Sub SubChooseScript 

For Each Button In SecureOption 
    If Button.Checked Then 
     If Button.Value = "Category" Then  
      For Each objButton in RadioOption 
       If objButton.Checked Then 
        Select Case objButton.Value 
         Case "Selection One" 
          Set objShell = CreateObject("Wscript.Shell") 
          objShell.Run "Scripts\foo.bat" 
          self.close() 
         Case "Selection Two" 
          Set objShell = CreateObject("Wscript.Shell") 
          objShell.Run "Scripts\foo.bat" 
          self.close() 
         Case "Selection Three" 
          Set objShell = CreateObject("Wscript.Shell") 
          objShell.Run "Scripts\foo.bat" 
          self.close() 
         Case Else 
          MsgBox "Something bad happened. Please try again" 
          self.close() 
        End Select 
       End If 
      Next 
     End If 
    End If 
    If Button.Checked Then 
     If Button.Value = "Category Two" Then 
      For Each objButton in RadioOption    
       If objButton.Checked Then    
        Select Case objButton.Value 
         Case "Selection One" 
          Set objShell = CreateObject("Wscript.Shell") 
          objShell.Run "Scripts\foo.bat" 
          self.close() 
         Case "Selection Two" 
          Set objShell = CreateObject("Wscript.Shell") 
          objShell.Run "Scripts\foo.bat" 
          self.close() 
         Case "Selection Three" 
          Set objShell = CreateObject("Wscript.Shell") 
          objShell.Run "Scripts\foo.bat" 
          self.close() 
         Case Else 
          MsgBox "Something bad happened. Please try again" 
          self.close() 
        End Select 
       End If 
      Next 
     End If 
    End if 
Next  
End Sub 

</SCRIPT> 

<body> 

<img src="Logos\logo.jpg" align="right" height="200" width="200"/> 

<p><b>Radio Options One</b></p> 
<div class="button-formatting"> 
<input type="radio" name="RadioOption" value="foo" id="foo"><b> <u>foo</u></b> 
<label for="foo", style="font: 16px Arial"><i>-- bar.</i></label><BR> 
<input type="radio" name="RadioOption" value="foo" id="foo"><b> <u>foo</u></b> 
<label for="foo", style="font: 16px Arial"><i>-- bar.</i></label><BR> 
<input type="radio" name="RadioOption" value="foo" id="foo"><b> <u>foo</u></b> 
<label for="foo", style="font: 16px Arial"><i>-- bar.</i></label><P> 

<p><b>Radio Options Two</b></p> 
<input type="radio" name="foo" value="foo" id="foo"><b><u>foo</u></b> 
<label for="foo", style="font: 16px Arial"><i>-- bar.</i></label><BR> 
<input type="radio" name="foo" value="foo" id="foo"><b> <u>foo</u></b> 
<label for="foo", style="font: 16px Arial"><i>-- bar.</i></label><BR> 
</div><BR> 

<input id=runbutton class="button" type="button" value="Options" name="run_button" onClick="SubChooseScript"> 
</body> 
+0

また、Htaeditはexeを実行中にアクセス可能なフォルダ構造にexeを展開します。私はこのようなもので長時間働いたことはありませんが、商用であることを思い出していますので、試用期間の後にその使用を継続するためにお支払いいただく必要があります。 – Teemu

+0

@テムー試用期間が終了することはないので、支払いは必要ありません。唯一のことは、あなたが支払っていない限り、あなたは迷惑な「今すぐ登録! HtaEditを開くたびにダイアログボックスが表示されます。 –

+0

うーん..私は、exe変換がトレイルでほんの数回しか働かなかったことを思い出しました。そして、あなたが支払っていなければ、それは働きませんでした。 – Teemu

答えて

0

今後この問題に遭遇する可能性のあるものについては、

さまざまな.htaから.exeへのアプリケーションの複数回のダウンロード、フォーマットの変更、およびその他の可能な自己検索ソリューションの後。私はこの最後のスタックの上にthreadが見つかりました。

私は、ファイルをbat2exeしてコードの難読化を行うことができます。

関連する問題