@echo off
title cmd窗口的标题
::设置是否隐藏bat窗口
set hideform=False
::这里设置是否隐藏bat窗口,如果是请将"set hideform=False"改成"set hideform=True"即可.(建议不要立即就改,因为待会你要看看效果呢~)
set "message=请输入内容"
::对话框中要显示的内容
set "title=请输入"
::对话框的标题
set "note=123456"
::输入框中的内容注释
::判断是否隐藏bat窗口
if /i "%hideform%"=="True" (
if "%1"=="h" goto begin
mshta vbscript:createobject^("wscript.shell"^).run^("%~nx0 h",0^)^(window.close^)&&exit
)
:begin
::变量赋值
set "vbs=%Temp%\GotUserInputedDataProgram.vbs"
set "data=%Temp%\UserInputedData.tmp"
::查找文件是否存在,存在就删除
if exist "%vbs%" del /s /q /f "%vbs%">nul
::delete file
::输出重定向
title cmd窗口的标题
::设置是否隐藏bat窗口
set hideform=False
::这里设置是否隐藏bat窗口,如果是请将"set hideform=False"改成"set hideform=True"即可.(建议不要立即就改,因为待会你要看看效果呢~)
set "message=请输入内容"
::对话框中要显示的内容
set "title=请输入"
::对话框的标题
set "note=123456"
::输入框中的内容注释
::判断是否隐藏bat窗口
if /i "%hideform%"=="True" (
if "%1"=="h" goto begin
mshta vbscript:createobject^("wscript.shell"^).run^("%~nx0 h",0^)^(window.close^)&&exit
)
:begin
::变量赋值
set "vbs=%Temp%\GotUserInputedDataProgram.vbs"
set "data=%Temp%\UserInputedData.tmp"
::查找文件是否存在,存在就删除
if exist "%vbs%" del /s /q /f "%vbs%">nul
::delete file
::输出重定向