vbs延时
Dim Wsh
Set Wsh = WScript.CreateObject("WScript.Shell")
WScript.Sleep(6000)
Wsh.Run "d:\tools\ping.exe",0,True
Set Wsh=NoThing
WScript.quit
将当前系统时间写入txt文件
@echo off
(echo.&echo %date% %time:~0,-3% %username%
echo.&echo ---606 605---
)>>c:\开机时间.txt
taskkill结束进程
taskkill /f /im IEXPLORE.EXE
断开vpn链接(注意链接名字)
rasdial "VPN 连接" /d
不重启修改计算机名(win7及xp系统应该可用)
@echo off
echo ---
set /p name=请输您的计算机名:
reg add "HKEY_LOCAL_MACHINE\System\CurrentControlSet\Control\ComputerName\ActiveComputerName" /v ComputerName /t reg_sz /d %name% /f >nul 2>nul
reg add "HKEY_LOCAL_MACHINE\System\CurrentControlSet\Services\Tcpip\Parameters" /v "NV Hostname" /t reg_sz /d %name% /f >nul 2>nul
reg add "HKEY_LOCAL_MACHINE\System\CurrentControlSet\Services\Tcpip\Parameters" /v Hostname /t reg_sz /d %name% /f >nul 2>nul
echo.
echo 修改计算机名完毕
echo.
echo AppLife.Net
set /p work1=请输入您的工作组名:
wmic computersystem where Name="%COMPUTERNAME%" call JoinDomainOrWorkgroup Name="%work1%"
echo 修改工作组完毕
pause>nul
echo.
批处理切换设置计算机名字
cls
@ECHO OFF
CLS
color 0a
ECHO.
ECHO.
ECHO. 1 设置为D1
ECHO.
ECHO. 2 设置为D2
ECHO.
ECHO. 3 设置为JL
ECHO.
ECHO. 请输入选择的序号(1、2、3):
set /p ID=
if "%id%"=="1" set name=D1
if "%id%"=="2" set name=D2
if "%id%"=="3" set name=JL
reg add "HKEY_LOCAL_MACHINE\System\CurrentControlSet\Control\ComputerName\ActiveComputerName" /v ComputerName /t reg_sz /d %name% /f >nul 2>nul
reg add "HKEY_LOCAL_MACHINE\System\CurrentControlSet\Services\Tcpip\Parameters" /v "NV Hostname" /t reg_sz /d %name% /f >nul 2>nul
reg add "HKEY_LOCAL_MACHINE\System\CurrentControlSet\Services\Tcpip\Parameters" /v Hostname /t reg_sz /d %name% /f >nul 2>nul
echo.
echo 修改计算机名完毕
echo 按任意键退出....
echo.
pause>nul
echo.
win7批处理切换ip地址
cls
@ECHO OFF
CLS
color 0a
:MENU
ECHO. =-=-=-=Win7系统IP快速设置=-=-=-=
ECHO.
ECHO. 1 A段IP
ECHO.
ECHO. 2 B段IP
ECHO.
ECHO. 3 退出
ECHO.
ECHO. =-=-=-==-=-=-=-=-=-=-=-=-=-=-=
ECHO.
echo. 请输入选择项目的序号:
set /p ID=
if "%id%"=="1" goto aip
if "%id%"=="2" goto bip
if "%id%"=="3" exit
PAUSE
:aip
@echo off
netsh interface ipv4 set address "本地连接" static 192.168.6.99 255.255.255.0 192.168.6.1
netsh interface ipv4 set dns name="本地连接" source=static addr=202.102.224.68
CLS
ECHO. 成功设置为A段IP
ECHO. 当前IP: 192.168.16.98
goto MENU
:bip
@echo off
netsh interface ipv4 set address "本地连接" static 192.168.0.99 255.255.255.0 192.168.0.1
CLS
ECHO. 成功设置为B段IP
ECHO. 当前IP: 192.168.0.99
goto MENU
根据本机ip地址修改计算机名
cls
@ECHO OFF
CLS
color 0a
ECHO.
ipconfig /all|findstr /i "IPv4">>c:\ip.txt
find /i "192.168.6.99" c:\ip.txt
if errorlevel 0 set name=D1
find /i "192.168.6.11" c:\ip.txt
if errorlevel 0 set name=D2
find /i "192.168.6.100" c:\ip.txt
if errorlevel 0 set name=JL
DEL C:\ip.txt
reg add "HKEY_LOCAL_MACHINE\System\CurrentControlSet\Control\ComputerName\ActiveComputerName" /v ComputerName /t reg_sz /d %name% /f >nul 2>nul
reg add "HKEY_LOCAL_MACHINE\System\CurrentControlSet\Services\Tcpip\Parameters" /v "NV Hostname" /t reg_sz /d %name% /f >nul 2>nul
reg add "HKEY_LOCAL_MACHINE\System\CurrentControlSet\Services\Tcpip\Parameters" /v Hostname /t reg_sz /d %name% /f >nul 2>nul
echo.
echo 修改计算机名完毕
echo 按任意键退出....
echo.
pause>nul
echo.
win7批处理清理垃圾
@echo off
color 0a
title windows7系统垃圾清理---
echo ★☆ ★☆ ★☆ ★☆ ★☆★☆★☆ ★☆ ★☆ ★☆ ★☆★
echo ★☆ ★☆ ★☆ ★☆ ★☆★☆★☆ ★☆ ★☆ ★☆ ★☆★
echo.★☆ ☆★
echo.★☆ ☆★
echo.★☆ 清理系统垃圾文件,请稍等...... ☆★
echo ★☆ ☆★
echo.★☆ ☆★
echo ★☆ ★☆ ★☆ ★☆ ★☆★☆★☆ ★☆ ★☆ ★☆ ★☆★
echo ★☆ ★☆ ★☆ ★☆ ★☆★☆★☆ ★☆ ★☆ ★☆ ★☆★
echo 清理垃圾文件,速度由电脑文件大小而定。在没看到结尾信息时
echo 请勿关闭本窗口。
echo 正在清除系统垃圾文件,请稍后......
echo 删除补丁备份目录
RD %windir%\$hf_mig$ /Q /S
echo 把补丁卸载文件夹的名字保存成2950800.txt
dir %windir%\$NtUninstall* /a:d /b >%windir%\2950800.txt
echo 从2950800.txt中读取文件夹列表并且删除文件夹
for /f %%i in (%windir%\2950800.txt) do rd %windir%\%%i /s /q
echo 删除2950800.txt
del %windir%\2950800.txt /f /q
echo 删除补丁安装记录内容(下面的del /f /s /q %systemdrive%\*.log已经包含删除此类文件)
del %windir%\KB*.log /f /q
echo 删除系统盘目录下临时文件
del /f /s /q %systemdrive%\*.tmp
echo 删除系统盘目录下临时文件
del /f /s /q %systemdrive%\*._mp
echo 删除系统盘目录下日志文件
del /f /s /q %systemdrive%\*.log
echo 删除系统盘目录下GID文件(属于临时文件,具体作用不详)
del /f /s /q %systemdrive%\*.gid
echo 删除系统目录下scandisk(磁盘扫描)留下的无用文件
del /f /s /q %systemdrive%\*.chk
echo 删除系统目录下old文件
del /f /s /q %systemdrive%\*.old
echo 删除回收站的无用文件
del /f /s /q %systemdrive%\recycled\*.*
echo 删除系统目录下备份文件
del /f /s /q %windir%\*.bak
echo 删除应用程序临时文件
del /f /s /q %windir%\prefetch\*.*
echo 删除系统维护等操作产生的临时文件
rd /s /q %windir%\temp & md %windir%\temp
echo 删除当前用户的COOKIE(IE)
del /f /q %userprofile%\cookies\*.*
echo 删除internet临时文件
del /f /s /q "%userprofile%\local settings\temporary internet files\*.*"
echo 删除当前用户日常操作临时文件
del /f /s /q "%userprofile%\local settings\temp\*.*"
echo 删除访问记录(开始菜单中的文档里面的东西)
del /f /s /q "%userprofile%\recent\*.*"
echo
echo ★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★
echo ★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★
echo ★☆ ☆★
echo.★☆ ☆★
echo.★☆ ☆★
echo ★☆ ☆★
echo ★☆ 恭喜您!清理全部完成! ☆★
echo.★☆ ☆★
echo ★☆ ☆★
echo.★☆ ☆★
echo ★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★
echo ★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★
echo.
win7批处理绑定arp
cls
@ECHO OFF
CLS
color 0a
GOTO MENU
:MENU
ECHO.
ECHO. =-=-=-=Win7绑定ARP批处理=-=-=-=
ECHO.
ECHO. 1 重置ARP (删除绑定) WinXP使用arp -s命令即可绑定
ECHO. Win7系统中使用netsh
ECHO. 2 绑定ARP (重启失效)
ECHO.
ECHO. 3 绑定ARP (永久生效)
ECHO.
ECHO. 4 查ARP表 (网卡接口)
ECHO.
ECHO. 5 默认绑定
ECHO.
ECHO. 6 退 出
ECHO.
ECHO. =-=-=-==-=-=-=-=-=-=-=-=-=-=-=
ECHO.
echo. 请输入选择项目的序号:
set /p ID=
if "%id%"=="1" goto cmd1
if "%id%"=="2" goto cmd2
if "%id%"=="3" goto cmd3
if "%id%"=="4" goto cmd4
if "%id%"=="5" goto cmd5
IF "%id%"=="6" exit
PAUSE
:cmd1
echo 重置ARP绑定
echo.
@echo off
netsh interface ipv4 reset
arp.exe -d
goto MENU
:cmd2
echo 绑定ARP(重启后失效)
echo.
::@echo off netsh interface ipv4 set neighbors 11 "192.168.6.1" "90-a5-a5-12-00-6f" store=active
echo 输入网卡接口(0xb对应11)
set /p IDX=
echo 输入要绑定的IP
set /p IP=
echo 输入要绑定的MAC
set /p MAC=
@echo off
netsh interface ipv4 set neighbors %idx% "%ip%" "%mac%" store=active
GOTO MENU
:cmd3
echo 绑定ARP(永久生效)
echo.
::@echo off netsh interface ipv4 set neighbors 11 "192.168.6.1" "90-a5-a5-12-00-6f" store=persistent
echo 输入网卡接口(0xb对应11)
set /p IDX=
echo 输入要绑定的IP
set /p IP=
echo 输入要绑定的MAC
set /p MAC=
@echo off
netsh interface ipv4 set neighbors %idx% "%ip%" "%mac%" store=persistent
GOTO MENU
:cmd4
echo 查看ARP表
echo.
@echo off
arp.exe -a
pause
GOTO MENU
:cmd5
echo 默认绑定
echo.
echo. netsh interface ipv4 set neighbors 11 "192.168.6.1" "90-a5-a5-12-00-6f" store=persistent
echo 任意键确认!
pause >null
@echo off
netsh interface ipv4 set neighbors 11 "192.168.6.1" "90-a5-a5-12-00-6f" store=persistent
pause >null
GOTO MENU
批处理备份文件并以时间命名
@ECHO OFF
CLS
color 0a
echo.
echo.
echo.
echo ┌───────────────┐
echo 丨 身份证刷卡信息导出
echo 丨 %date% %time%
echo 丨=============================
echo 丨 默认复制到软件安装目录有效
echo. 丨
echo. 丨备份身份证刷卡信息到两个路径:
echo. 丨
echo. 丨1、D盘身份证刷卡信息文件夹
echo. 丨2、wg提供的网络共享
echo. 丨A、复制到Record1.xml同目录
echo └───────────────┘
echo. ..............................
echo. .........................
echo. .....备份结果......
echo. ...........
echo. ....
echo. ↓
echo.
set file="%ProgramFiles%\信息\Record1.xml"
@echo off
if not exist d:\信息 md d:\信息
if not exist \\wg\sfz\信息 md \\wg\sfz\信息
set f=信息_%date:~0,4%_%date:~5,2%_%date:~8,2%.xml
copy /y %file% "d:\信息\%f%"
set s=信息_%date:~0,4%_%date:~5,5%_%time:~,8%.xml
set s=%s: =0%
set s=%s:-=%
set s=%s::=%
copy /y %file% "\\wg\sfz\信息\%s%"
rem 重命名文件
rem ren "d:\信息\Record1.xml" %f%
rem ren "\\wg\SFZ\信息\Record1.xml" %s%
echo.
echo.信息导出成功!
copy nul d:\检查信息\全部.txt
pause
最后编辑: admin 文档更新时间: 2021-03-16 21:50 作者:admin