《烈焰含冰工具箱 V16》.docx
- 文档编号:10747580
- 上传时间:2023-05-27
- 格式:DOCX
- 页数:16
- 大小:16.77KB
《烈焰含冰工具箱 V16》.docx
《《烈焰含冰工具箱 V16》.docx》由会员分享,可在线阅读,更多相关《《烈焰含冰工具箱 V16》.docx(16页珍藏版)》请在冰点文库上搜索。
《烈焰含冰工具箱V16》
烈焰含冰DOS工具箱
@ECHOOFF&TITLE=烈焰含冰DOS工具箱V2011.1.6----宋朝使者
@echooff
:
head
cls
modeconcols=80lines=25
modeconrate=32delay=1
echo.
echo※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※
echo※※※※
echo※※=================烈焰含冰DOS工具箱=================※※
echo※※※※
echo※※※※
echo※※1.显示用户名2.更改当前用户名※※
echo※※3.显示计算机名4.更改计算机名※※
echo※※5.显示当前IP地址6.创建一个新用户※※
echo※※7.手动输入IP地址8.自动获取IP地址※※
echo※※9.自动备份IP地址0.自动切换IP地址※※
echo※※F.列举目录下所有文件Q.退出※※
echo※※※※
echo※※※※
echo※※作者:
宋朝使者※※
echo※※QQ:
183275115(烈焰含冰)※※
echo※※E-mail:
arnoldluan@※※
echo※※※※
echo※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※※
echo.
echo.
set/pchoice=请从上面菜单列表中选择你要进行的操作:
if/i"%choice%"equ"5"(
gotoshow_ip
)else(
if/i"%choice%"equ"3"(
gotoshow_pcname
)else(
if/i"%choice%"equ"1"(
gotoshow_username
)else(
if/i"%choice%"equ"4"(
gotochange_pcname
)else(
if/i"%choice%"equ"2"(
gotochange_username
)else(
if/i"%choice%"equ"6"(
gotonew_username
)else(
if/i"%choice%"equ"7"(
gotoManual_ip
)else(
if/i"%choice%"equ"8"(
gotoAuto_ip
)else(
if/i"%choice%"equ"9"(
gotoBak_ip
)else(
if/i"%choice%"equ"0"(
gotoChange_ip
)else(
if/i"%choice%"equ"F"(
gotofindname
)else(
if/i"%choice%"equ"Q"(
gotoend
)else(
gotohead
)
)
)
)
)
)
)
)
)
)
)
)
rem---------------1.显示用户名-------------------
:
show_username
cls
echo================显示用户名================
echo.
@echooff
echo所有用户帐号ID为:
echo.
for/f"skip=4tokens=1-3"%%iin('netuser')do(
ifnot"%%i"=="命令成功完成。
"echo%%i
ifnot"%%j"==""echo%%j
ifnot"%%k"==""echo%%k
)
echo.
echo当前用户帐号ID为:
%username%
echo.
echo.
set/pback=返回主菜单请按“H”,退出请按“Q”:
if/i"%back%"equ"H"(
gotohead
)else(
if/i"%back%"equ"Q"(
gotoend
)else(
gotoend
)
)
rem---------------2.更改当前用户名---------------
:
change_username
cls
echo================更改当前用户名================
echo.
@echooff
set/pnewusername=请输入新的用户名:
wmicuseraccountwherename='%username%'callRename%newusername%
echo.
echo.
set/pback=返回主菜单请按“H”,退出请按“Q”:
if/i"%back%"equ"H"(
gotohead
)else(
if/i"%back%"equ"Q"(
gotoend
)else(
gotoend
)
)
rem---------------3.显示计算机名-------------------
:
show_pcname
cls
echo================显示计算机名================
echo.
@echooff
echo.
for/f"tokens=2delims=:
"%%iin('ipconfig/all^|find"HostName"')dosetpcName=%%i
echo.
echo您的计算机名为:
%pcName%
echo.
echo.
set/pback=返回主菜单请按“H”,退出请按“Q”:
if/i"%back%"equ"H"(
gotohead
)else(
if/i"%back%"equ"Q"(
gotoend
)else(
gotoend
)
)
rem---------------4.更改计算机名及工作组-------------------
:
change_pcname
cls
echo================更改计算机名及工作组================
echo.
@echooff
for/f"tokens=2delims=:
"%%iin('ipconfig/all^|find"HostName"')dosetpcName=%%i
setpcName=%pcName:
~1%
echo当前计算机名为:
%pcName%
echo.
set/pnewpcName=请输入新的计算机名(有效字符:
字母、数字、-):
WMICcomputersystemwhereName="%pcName%"callRenameName=%newpcName%
cls
echo.
echo计算机名更改完成。
echo.
echo.
echo当前计算机工作组为:
%COMPUTERNAME%
echo.
set/pchoice=是否更改工作组?
(Y/N):
if/i"%choice%"equ"Y"(
gotochange_workgroup
)else(
if/i"%choice%"equ"N"(
gotono
)else(
gotono
)
)
:
change_workgroup
set/pnewWorkgroup=请输入新工作组名(有效字符:
字母、数字、-):
wmiccomputersystemwhereName="%COMPUTERNAME%"callJoinDomainOrWorkgroupName=%newWorkgroup%
cls
echo.
echo工作组更改完成。
:
no
echo.
echo.
echo更改完计算机名或工作组之后,必须重新启动机器才能生效!
echo.
set/pback=返回主菜单请按“H”,退出请按“Q”,重启请按“R”:
if/i"%back%"equ"H"(
gotohead
)else(
if/i"%back%"equ"Q"(
gotoend
)else(
if/i"%back%"equ"R"(
shutdown-f-r-t0
exit
)else(
gotoend
)
)
)
rem---------------5.显示当前IP地址-------------------
:
show_ip
cls
echo================显示当前IP地址配置信息================
echo.
@echooff
for/f"tokens=3delims=.:
"%%iin('ipconfig/all^|find"Physical"')dosetmac=%%i
for/f"tokens=15"%%iin('ipconfig/all^|find/i"IPAddress"')dosetip=%%i
for/f"tokens=15"%%iin('ipconfig/all^|find/i"SubnetMask"')dosetmask=%%i
for/f"tokens=15"%%iin('ipconfig/all^|find/i"DHCPServer"')dosetgateway=%%i
for/f"tokens=15"%%iin('ipconfig/all^|find/i"DNSServers"')dosetdns=%%i
echo本机MAC地址为:
%mac%
echo本机IP地址为:
%ip%
echo本机子网掩码为:
%mask%
echo本机默认网关为:
%gateway%
echo本机DNS为:
%dns%
echo.
echo.
set/pback=返回主菜单请按“H”,退出请按“Q”:
if/i"%back%"equ"H"(
gotohead
)else(
if/i"%back%"equ"Q"(
gotoend
)else(
gotoend
)
)
rem---------------6.创建一个新用户名-------------------
:
new_username
cls
echo================创建一个新用户名================
echo.
set/pnewuser=请输入要创建的新用户名:
:
setpw
set/ppw1=请输入新用户密码:
set/ppw2=请再次输入新用户密码:
if/i"%pw1%"NEQ"%pw2%"gotosetpw
netuser%newuser%%pw1%/add
netlocalgroupadministrators%newuser%/add
echo新用户%newuser%密码为:
%pw1%创建成功!
echo.
echo.
set/pback=返回主菜单请按“H”,退出请按“Q”:
if/i"%back%"equ"H"(
gotohead
)else(
if/i"%back%"equ"Q"(
gotoend
)else(
gotoend
)
)
rem---------------7.手动输入IP地址-----------------
:
Manual_ip
cls
echo================手动输入IP地址================
echo.
:
addr
set/paddr=请输入ip地址:
if/i"%addr%"equ""gotoaddr
remecho您输入的ip地址为:
%addr%
:
mask
set/pmask=请输入mask地址:
if/i"%mask%"equ""gotomask
remecho您输入的mask地址为:
%mask%
set/pgateway=请输入gateway地址(直接按回车键跳过此项):
if/i"%gateway%"equ""gotodns1
remecho您输入的gateway地址为:
%gateway%
:
dns1
set/pdns1=请输入dns地址(直接按回车键跳过此项):
if/i"%dns1%"equ""gotodns2
remecho您输入的dns1地址为:
%dns1%
:
dns2
set/pdns2=请输入备用dns地址(直接按回车键跳过此项):
if/i"%dns2%"equ""gotoinputip
remecho您输入的备用dns地址为:
%dns2%
:
inputip
netshinterfaceipsetaddressname="本地连接"source=staticaddr=%addr%mask=%mask%
netshinterfaceipsetaddressname="本地连接"gateway=%gateway%gwmetric=0
netshinterfaceipsetdnsname="本地连接"source=staticaddr=%dns1%register=PRIMARY
netshinterfaceipadddnsname="本地连接"addr=%dns2%index=2
netshinterfaceipsetwinsname="本地连接"source=staticaddr=none
echo手动输入IP地址完成!
echo.
echo.
set/pback=返回主菜单请按“H”,退出请按“Q”:
if/i"%back%"equ"H"(
gotohead
)else(
if/i"%back%"equ"Q"(
gotoend
)else(
gotoend
)
)
rem---------------8.自动获取IP地址-----------------
:
Auto_ip
cls
echo================自动获取IP地址================
echo.
netshinterfaceipsetaddressname="本地连接"source=dhcp
netshinterfaceipsetdnsname="本地连接"source=dhcpregister=PRIMARY
netshinterfaceipsetwinsname="本地连接"source=dhcp
echo自动获取IP地址设置成功!
echo.
echo.
set/pback=返回主菜单请按“H”,退出请按“Q”:
if/i"%back%"equ"H"(
gotohead
)else(
if/i"%back%"equ"Q"(
gotoend
)else(
gotoend
)
)
rem---------------9.自动备份IP地址-----------------
:
Bak_ip
cls
echo================自动备份IP地址================
echo.
set/pipname=请输入备份IP地址的文本文件名(请遵循windows起名原则):
netsh-cinterfaceipdump>C:
\%ipname%.txt
echoIP地址已成功备份到C盘根下%ipname%.txt中!
echo.
echo.
set/pback=返回主菜单请按“H”,退出请按“Q”:
if/i"%back%"equ"H"(
gotohead
)else(
if/i"%back%"equ"Q"(
gotoend
)else(
gotoend
)
)
rem---------------0.自动切换IP地址-----------------
:
Change_ip
cls
echo================自动切换IP地址================
echo.
set/pipname=请输入您要切换的IP地址的文本文件名:
netsh-fC:
\%ipname%.txt
echoIP地址切换完成!
echo.
echo.
set/pback=返回主菜单请按“H”,退出请按“Q”:
if/i"%back%"equ"H"(
gotohead
)else(
if/i"%back%"equ"Q"(
gotoend
)else(
gotoend
)
)
rem---------------F.遍历指定目录下的文件夹及文件-----------------
:
findname
cls
echo================遍历指定目录下的文件夹及文件================
echo.
setinput=
set/pinput=请输入路径(如:
E:
\DownLoads):
if%input%==''exit
dir/b/s%input%>list_filename.txt
rem查找文件夹的完整路径写入文件(包括其子文件夹)。
for/f%%iin(list_filename.txt)dodir%%i>>list_filename.txt
rem将查看子目录的信息写入到文件
remmorelist_filename.txt
echo.
echo.
set/pback=查看扫描结果请按“D”,返回主菜单请按“H”,退出请按“Q”:
if/i"%back%"equ"H"(
gotohead
)else(
if/i"%back%"equ"Q"(
gotoend
)else(
if/i"%back%"equ"D"(
startlist_filename.txt
)else(
gotoend
)
)
)
rem---------------Q.退出-----------------
:
end
exit
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 烈焰含冰工具箱 V16 烈焰含冰工具箱 V16 烈焰 工具箱 V16