@echo off
tasklist | find /i "ping.exe">nul && echo 双击运行 &&pause>nul&&exit|| echo CMD中手动输入运行&&ping /n 3 127.1>nul&&cmd 
复制代码

@IF NOT DEFINED DEBUG @ECHO OFF

FINDSTR ":\\" %~0 >NUL 2>&1 && (
        ECHO 双击运行
        PAUSE
        EXIT
        ) || (
        ECHO CMD中手动输入运行
        PAUSE
        )
复制代码

@ECHO OFF
title 标题
For /f "tokens=2" %%i in ('tasklist /fi "windowtitle eq 标题" /nh') Do set handle=%%i
wmic process where handle='%handle%' get commandline|findstr /i /c:"cmd \/c"&&set HH=PAUSE


%HH%
复制代码

@echo off
title 标题
echo 以下是加上/nh的结果:
tasklist /fi "windowtitle eq 标题" /nh
echo.&echo 以下是不加/nh的结果:
tasklist /fi "windowtitle eq 标题"
echo.&pause
复制代码

@echo off
if "%0"=="%~0" (echo CMD中手动输入运行) else (echo 双击运行)
pause
exit
复制代码

@ECHO OFF&Set /A _wt=%random%/2
title 标题%_wt%
For /f "tokens=2" %%i in ('tasklist /fi "windowtitle eq 标题%_wt%" /nh') Do set handle=%%i
wmic process where handle='%handle%' get commandline|findstr /i /c:"cmd \/c"&&set HH=PAUSE


%HH%
 
 
 
复制代码

Dim Wsh,Wmi
Set Wsh=CreateObject("WScript.Shell")
Set Wmi=GetObject("winmgmts:\\.\root\cimv2")
Set Hta=Wsh.Exec("mshta 1")
For Each i In Wmq(Hta.ProcessID)
    WScript.Echo "脚本PID       :" & i.ParentProcessID
    For Each j In Wmq(i.ParentProcessID)
        WScript.Echo "脚本命令行    :" & j.CommandLine & vbCrLf &_
                     "脚本父进程PID :" & j.ParentProcessID
        For Each k In Wmq(j.ParentProcessID)
            WScript.Echo "脚本父进程名称:" & k.Name & vbCrLf &_
                         "脚本父进程命令:" & k.CommandLine
        Next
    Next
Next
Hta.Terminate

Function Wmq(Pid)
Set Wmq=Wmi.ExecQuery("Select * From Win32_Process Where ProcessID='" & Pid & "'")
End Function
复制代码

@echo off&setlocal enabledelayedexpansion
doskey /history|findstr .>nul
if !errorlevel! equ 0 echo cmd命令调用执行&exit/b
set str=
for /l %%a in (1,1,10) do set str=!str!!random!
if [%1]==[] (
    start /b "" "%~nx0" !str!>nul
    set com=echo.
) else (
    set com=pause
)
!com!>nul
for /f "skip=1 tokens=1,2" %%a in ('wmic process where "commandline='c:\\windows\\system32\\cmd.exe  /k "%～nx0"  !str!'" get processid^,parentprocessid') do (
    set /a pid=%%b,ppid=%%a
)
taskkill /pid !pid! /t /f 1>nul 2>nul
set pid=!ppid!
for /f "skip=1" %%a in ('wmic process where "processid=!pid!" get parentprocessid') do set ppid=%%a
for /f "skip=1" %%a in ('wmic process where "processid=!ppid!" get caption') do set name=%%a
if /i !name!==explorer.exe echo windows操作界面执行&pause>nul&exit/b
if /i !name!==cmd.exe echo cmd命令调用执行&exit/b
echo !name!程序执行&exit/b
复制代码