[系统相关] Win10批处理如何自动格式化一个指定分区？

bcetl

::获取管理员权限
%1 mshta vbscript:CreateObject("Shell.Application").ShellExecute("cmd.exe","/c %~s0 ::","","runas",1)(window.close)&&exit

::格式化O盘分区为ntfs
format O: /v:GSRAMDisk /fs:ntfs /q /u
pause
复制代码

以上为脚本。这是个内存虚拟盘，因虚拟软件不成熟，开机后老是搞成fat32格式，实际使用有很多限制。但优点是软件免费，其它方面稳定运行多年，现想开机即格式化或转换为ntfs格式。

分区卷标名：GSRAMDisk

1-执行脚本的第一个对话框内容是：
C:\Windows\system32>format O: /v:GSRAMDisk /fs:ntfs /q /u
文件系统的类型是 FAT32。
新的文件系统是 NTFS。
输入驱动器 O: 的当前卷标


2-第二个对话内容是：
C:\Windows\system32>format O: /v:GSRAMDisk /fs:ntfs /q /u
文件系统的类型是 FAT32。
新的文件系统是 NTFS。
输入驱动器 O: 的当前卷标GSRAMDisk

警告，非移动磁盘驱动器 O:
上的所有数据将会丢失!
是否继续进行格式化(Y/N)?y



请问如何全自动化？自动设置卷标，留空也行。自动确认格式化

semiuel

convert o: /fs:ntfs /x

bcetl

回复 2# semiuel




亲，这个转换代码试过。
运行结果是：
C:\Windows\system32>convert O: /fs:ntfs /x
文件系统的类型是 FAT32。
输入驱动器 O: 的当前卷标

bcetl

能快速格式化，是最好的。因为这个临时盘里，都是临时文件，非重要。

czjt1234

convert 转换为 NTFS 是可以的，因为你一开机就转换，空盘转换很快的

要不这样试试
echo Y|format O: /v:GSRAMDisk /fs:ntfs /q /u

bcetl

回复 5# czjt1234

C:\Windows\system32>echo Y  | format O: /v:GSRAMDisk /fs:ntfs /q /u
文件系统的类型是 FAT32。
新的文件系统是 NTFS。
输入驱动器 O: 的当前卷标为此驱动器输入的卷标不正确。

C:\Windows\system32>pause
请按任意键继续. . .


C:\Windows\system32>echo GSRAMDisk  | format O: /v:GSRAMDisk /fs:ntfs /q /u
文件系统的类型是 FAT32。
新的文件系统是 NTFS。
输入驱动器 O: 的当前卷标
警告，非移动磁盘驱动器 O:
上的所有数据将会丢失!
是否继续进行格式化(Y/N)?
警告，非移动磁盘驱动器 O:
上的所有数据将会丢失!
是否继续进行格式化(Y/N)?
C:\Windows\system32>pause
请按任意键继续. . .


还是不行哦。

czjt1234

C:\Windows\system32>echo GSRAMDisk|convert o: /fs:ntfs /x
文件系统的类型是 FAT32。
输入驱动器 O: 的当前卷标另一进程正在使用该卷。Chkdsk
可能会在没有损坏的情况下汇报错误。
GSRAMDISK 卷创建了 2024/3/14 15:02
卷序列号为 A885-CAC5
Windows 正在校验文件和文件夹...
已完成文件和文件夹验证。

Windows 已扫描文件系统并且没有发现问题。
无需采取进一步操作。

磁盘空间总数 2,088,763,392 字节。
1 个隐藏文件:         4,096 字节。
1 个文件:         4,096 字节。
可用磁盘空间: 2,088,751,104 字节。

每个分配单元中有         4,096 字节。
磁盘上共有       509,952 个分配单元。
磁盘上有       509,949 个可用的分配单元。

正在确定文件系统转换所需的磁盘空间...
磁盘总空间:                  2043904 KB
复制代码

我在win10虚拟机测试转换文件系统成功
注意不要有多余的空格

另外format的/v参数可能是用于指定新的卷标的，所以要输入一次卷标，再输入一次Y
这个我用vbs在win10虚拟机测试通过

Dim oWshShell, oWshScriptExec, s

Call RunAsAdmin()
Set oWshShell      = CreateObject("WScript.Shell")
Set oWshScriptExec = oWshShell.Exec("cmd.exe")
With oWshScriptExec.StdIn
    .WriteLine "format o: /fs:NTFS /q /x /V:GSRAMDISK"
    .WriteLine "GSRAMDISK"
    .WriteLine "Y"
    .Close()
End With
s = oWshScriptExec.StdOut.ReadAll()
'MsgBox s

Sub RunAsAdmin()
    Dim oWshShell, oShell, s, i
    Set oWshShell = CreateObject("WScript.Shell")
    If oWshShell.Run("fltmc.exe", 0, True) = 0 Then Exit Sub
    s = """" & WScript.ScriptFullName & """ "
    For Each i In WScript.Arguments
        If InStr(i, " ") > 0 Then i = """" & i & """"
        s = s & i & " "
    Next
    Set oShell = CreateObject("Shell.Application")
    oShell.ShellExecute "WScript.exe", Left(s, Len(s) - 1), , "runas"
    WScript.Quit()
End Sub
复制代码

bcetl

我在win10虚拟机测试转换文件系统成功
注意不要有多余的空格

另外format的/v参数可能是用于指定新的卷标 ...
czjt1234 发表于 2024-3-14 15:33

    vbs脚本可以 如果能用bat脚本就好了

czjt1234

试试批处理vbs混编

rem 另存为 ANSI 编码 bat
' & cls & cscript.exe /nologo /e:vbscript "%~f0" & exit

Dim oWshShell, oWshScriptExec, s

Call RunAsAdmin()
Set oWshShell      = CreateObject("WScript.Shell")
Set oWshScriptExec = oWshShell.Exec("cmd.exe")
With oWshScriptExec.StdIn
    .WriteLine "format o: /fs:NTFS /q /x /V:GSRAMDISK"
    .WriteLine "GSRAMDISK"
    .WriteLine "Y"
    .Close()
End With
s = oWshScriptExec.StdOut.ReadAll()
'MsgBox s

Sub RunAsAdmin()
    Dim oWshShell, oShell, s, i
    Set oWshShell = CreateObject("WScript.Shell")
    If oWshShell.Run("fltmc.exe", 0, True) = 0 Then Exit Sub
    s = """" & WScript.ScriptFullName & """ "
    For Each i In WScript.Arguments
        If InStr(i, " ") > 0 Then i = """" & i & """"
        s = s & i & " "
    Next
    Set oShell = CreateObject("Shell.Application")
    oShell.ShellExecute "WScript.exe", Left(s, Len(s) - 1), , "runas"
    WScript.Quit()
End Sub
复制代码

newswan

(
  echo SELECT VOL GSRAMDisk
  echo FORMAT FS=NTFS LABEL="GSRAMDisk" QUICK
) | diskpart
复制代码