@echo off
title 设置虚拟内存 BY CriD.CN
color 3f
mode con lines=15 cols=45
setlocal  ENABLEDELAYEDEXPANSION
cscript //H:cscript //s >nul
:main
cls
echo.
echo      任务列表:
echo.
echo        1.查看虚拟内存
echo.
echo        2.创建虚拟内存
echo.
echo        3.修改虚拟内存
echo.
echo        4.删除虚拟内存
echo.
echo        0.退出设置程序
echo.
set /p option=      请选择:
if "%option%"=="1" goto view
if "%option%"=="2" goto create
if "%option%"=="3" goto edit
if "%option%"=="4" goto del
if "%option%"=="0" goto quit
:view
cls
pagefileconfig /query>info.txt
echo      正在查找信息...
call :select Host
echo      电脑名称:!str!
call :select Location
echo      虚拟内存位置:!str!:\pagefile.sys
call :select Initial
echo      虚拟内存初始值:!str!
call :select Maximum
echo      虚拟内存最大值:!str!
echo.
echo      按任意键返回
del info.txt /q
pause>nul
goto main
:create
cls
call :input
pagefileconfig /create /i !start! /m !end! /vo !vol! >nul
echo        创建在!vol!的虚拟内存成功
echo.
echo        初始大小!start!MB,最大值为!end!
echo.
echo      按任意键返回主菜单
pause>nul
goto main
:edit
cls
call :input edit
pagefileconfig /change /i !start! /m !end! /vo !vol! >nul
echo        修改成功!
echo.
echo        新的初始值为!start!,最大值为!end!
echo.
echo      按任意键返回主菜单
pause>nul
goto main
:del
cls
set /p vol=     请输入目标盘符(如D:):
set /p vol=
pagefileconfig /delete /vo !vol!
echo        删除成功!!
echo.
echo      按任意键返回主菜单
pause>nul
goto main
:quit
cls
echo.
echo BYE-BYE! Thank you for using my bat file!
echo.
echo The program is exiting now,please wait...
echo.
ping 127.1 -n 2 >nul
exit
:input
echo.
:vol
set /p vol=     请输入目标盘符(如D:):
echo.
set /p start=     请输入初始大小(如512):
echo.
set /p end=     请输入最大值(如1024):
echo.
:select
for /f "tokens=2 delims=:" %%i in ('find /i "%1" info.txt') do (
set str=%%i
set str=!str: =!
)
echo.
复制代码