【问题标题】：Batch + JScript to .exe批处理 + JScript 到 .exe
【发布时间】：2017-02-25 10:35:51
【问题描述】：

我有一个包含一些JScript 的批处理文件，但我想将其转换为.exe，以便其他人看不到脚本（加密）

我该怎么做？

我尝试使用 Bat to Exe，但由于我有 JScript，所以无法正常工作。

代码基本上是启动一个站点并输入关键输入，然后 .exe 设法启动该站点，但仅此而已

脚本：

@if (@CodeSection == @Batch) @then

@echo off

title Top Top
color 0c

if "%inputParty%" == "0" (
  set title= %site% - Bean - Partyless
)

set /p site= Site: 
set /p Clas= Username or Email: 
set /p Party= Party: 
set /p Cars= Cars: 
set /p capture= Capture: 

set inputsite= Site: %site%
set inputClas= Clas: UNKNOWN
set inputParty= Party: %Party%
set inputCars= Cars: %Cars%
set inputcapture= Capture: %capture%
set inputhide= [hide] *Bean* [/hide] 


if "%Clas%" == "Username" (
  set inputClas= Clas: Username:Password
)

if "%Clas%" == "Email" (
  set inputClas= Clas: Email:Password
)

if "%Clas%" == "username" (
  set inputClas= Clas: Username:Password
)

if "%Clas%" == "email" (
  set inputClas= Clas: Email:Password
)


set title= %site% - Bean
if "%Party%" == "0" (
  set title= %site% - Bean - Partyless
)

set SendKeys=CScript //nologo //E:JScript "%~F0"
START https://Cear.io/xxxxx.php?fid=30
timeout /t 5

:: ACCESS TITLE INPUT BOX
%SendKeys% "{TAB}"
%SendKeys% "{TAB}"
%SendKeys% "{TAB}"
%SendKeys% "{TAB}"
%SendKeys% "{TAB}"
%SendKeys% "{TAB}"
%SendKeys% "{TAB}"
%SendKeys% "{TAB}"
%SendKeys% "{TAB}"
%SendKeys% "{TAB}"
%SendKeys% "{TAB}"
%SendKeys% "{TAB}"
%SendKeys% "{TAB}"
%SendKeys% "{TAB}"

:: INPUT TITLE
%SendKeys% "%title%"

:: REDIRECT INPUT TO DESCRIPTION
%SendKeys% "{TAB}"

:: INPUT DESCRIPTION
%SendKeys% "%inputsite%"
%SendKeys% "{ENTER}"
%SendKeys% "%inputClas%"
%SendKeys% "{ENTER}"
%SendKeys% "%inputParty%"
%SendKeys% "{ENTER}"
%SendKeys% "%inputCars%"
%SendKeys% "{ENTER}"
%SendKeys% "%inputcapture%"
%SendKeys% "{ENTER}"
%SendKeys% "{ENTER}"
%SendKeys% "%inputhide%"

if "%Party%"=="0" (goto prefix)
ELSE (
    goto end
)

:prefix 

:: INPUT PREFIX
set x= 20
for /L %%A in (1,1,%x%) do (
    %SendKeys% "{TAB}"
)
    %SendKeys% "{DOWN}"

:end 

goto :EOF


@end
// JScript section

var WshShell = WScript.CreateObject("WScript.Shell");
WshShell.SendKeys(WScript.Arguments(0));

输出：

【问题讨论】：

向我们展示代码...
代码和文本输出应为copy and paste here，不在图像中，不在外部链接中
你意识到你没有加密任何东西。您所做的只是混淆或我喜欢通过默默无闻来称呼安全性。 Bat to exe程序只是创建一个自解压的exe。当您启动 exe 时，它会将脚本提取到临时目录，然后执行脚本。任何有半脑的人都会意识到他们第一次运行你所谓的加密 exe。

标签： windows batch-file jscript jscript.net

【解决方案1】：

Hybrid JSBatch 文件基本上是一个 'hack'，如果编译，则不会按预期工作。
尝试使用来自f2ko.de的'Bat to Exe Converter'

如果您使用“扩展命令”程序来输入键盘键，而不是使用混合 JSBatch，它会更容易。

示例脚本

@echo off
start notepad.exe
timeout 3 >nul
%extd% /sendkeys "Hello World"

你的脚本（修改）

@echo off


title Top Top
color 0c

if "%inputParty%" == "0" (
  set title= %site% - Bean - Partyless
)


set /p site= Site: 
set /p Clas= Username or Email: 
set /p Party= Party: 
set /p Cars= Cars: 
set /p capture= Capture: 

set inputsite= Site: %site%
set inputClas= Clas: UNKNOWN
set inputParty= Party: %Party%
set inputCars= Cars: %Cars%
set inputcapture= Capture: %capture%
set inputhide= [hide] *Bean* [/hide] 


if "%Clas%" == "Username" (
  set inputClas= Clas: Username:Password
)

if "%Clas%" == "Email" (
  set inputClas= Clas: Email:Password
)

if "%Clas%" == "username" (
  set inputClas= Clas: Username:Password
)

if "%Clas%" == "email" (
  set inputClas= Clas: Email:Password
)



set title= %site% - Bean
if "%Party%" == "0" (
  set title= %site% - Bean - Partyless
)

START https://Cear.io/xxxxx.php?fid=30
timeout /t 5

:: ACCESS TITLE INPUT BOX
%extd% /sendkey {TAB}
%extd% /sendkey {TAB}
%extd% /sendkey {TAB}
%extd% /sendkey {TAB}
%extd% /sendkey {TAB}
%extd% /sendkey {TAB}
%extd% /sendkey {TAB}
%extd% /sendkey {TAB}
%extd% /sendkey {TAB}
%extd% /sendkey {TAB}
%extd% /sendkey {TAB}
%extd% /sendkey {TAB}
%extd% /sendkey {TAB}
%extd% /sendkey {TAB}

:: INPUT TITLE
%extd% /sendkeys "%title%"

:: REDIRECT INPUT TO DESCRIPTION
%extd% /sendkey {TAB}


:: INPUT DESCRIPTION
%extd% /sendkeys "%inputsite%"
%extd% /sendkey {ENTER}
%extd% /sendkeys "%inputClas%"
%extd% /sendkey {ENTER}
%extd% /sendkeys "%inputParty%"
%extd% /sendkey {ENTER}
%extd% /sendkeys "%inputCars%"
%extd% /sendkey {ENTER}
%extd% /sendkeys "%inputcapture%"
%extd% /sendkey {ENTER}
%extd% /sendkey {ENTER}
%extd% /sendkeys "%inputhide%"

if "%Party%"=="0" (goto prefix)
ELSE (
goto end
)


:prefix 
:: INPUT PREFIX
set x= 20
for /L %%A in (1,1,%x%) do (
%extd% /sendkey {TAB}
)
%extd% /sendkey {DOWN}

:end 
goto :EOF

【讨论】：

谢谢你的回复，我试过你发给我的，但我得到了这个错误：'/sendkey' 不是内部或外部命令、可运行程序或批处理文件。跨度>
@Hubgum 您必须先使用 Bat To Exe 转换器将其转换为 EXE
好的，所以我只是尝试将其转换为.exe后，它会启动站点，但不输入任何密钥，然后.exe关闭。
%extd% /sendkey {ENTER} 对我不起作用...我的 FKO bat2exe 版本是 2.4.6--- ？这是版本问题吗？？？

【解决方案2】：

虽然在所有情况下将 .bat 转换为 .exe 都是一个坏主意，但这种方法应该可以解决您的问题：

@echo off

title Top Top
color 0c

if "%inputParty%" == "0" (
   set title= %site% - Bean - Partyless
)


set /p site= Site: 
set /p Clas= Username or Email: 
set /p Party= Party: 
set /p Cars= Cars: 
set /p capture= Capture: 

set inputsite= Site: %site%
set inputClas= Clas: UNKNOWN
set inputParty= Party: %Party%
set inputCars= Cars: %Cars%
set inputcapture= Capture: %capture%
set inputhide= [hide] *Bean* [/hide] 


if /I "%Clas%" == "Username" (
   set inputClas= Clas: Username:Password
)

if /I "%Clas%" == "Email" (
   set inputClas= Clas: Email:Password
)


set title= %site% - Bean
if "%Party%" == "0" (
   set title= %site% - Bean - Partyless
)


rem // JScript section

echo var WshShell = WScript.CreateObject("WScript.Shell"); > SendKeys.js
echo WshShell.SendKeys(WScript.Arguments(0)); >> SendKeys.js

set SendKeys=CScript //nologo SendKeys.js
START https://Cear.io/xxxxx.php?fid=30
timeout /t 5

:: ACCESS TITLE INPUT BOX
for /L %%i in (1,1,14) do %SendKeys% "{TAB}"

:: INPUT TITLE
%SendKeys% "%title%"

:: REDIRECT INPUT TO DESCRIPTION
%SendKeys% "{TAB}"

:: INPUT DESCRIPTION
%SendKeys% "%inputsite%{ENTER}"
%SendKeys% "%inputClas%{ENTER}"
%SendKeys% "%inputParty%{ENTER}"
%SendKeys% "%inputCars%{ENTER}"
%SendKeys% "%inputcapture%{ENTER}{ENTER}"
%SendKeys% "%inputhide%"

if "%Party%" neq "0" goto end

:: INPUT PREFIX
for /L %%A in (1,1,20) do %SendKeys% "{TAB}"
%SendKeys% "{DOWN}"

:end 
del SendKeys.js

goto :EOF

【讨论】：