如何判断硬盘某一分区是否是活动分区?
如题。 .[ 本帖最后由 新手上路 于 2008-8-3 11:17 编辑 ] 没玩过wmi和api,不知道能否实现
个人意见是用 DEBUG 可以查找出引导分区,一般引导分区为活动分区 #include <process.au3>
#include <file.au3>
Dim $file1,$active,$i,$str
FileInstall("dsptw.exe",@ScriptDir & "\dsptw.exe",1)
_rundos( @ScriptDir & "\dsptw.exe /A /PDR > " & @TempDir & "\partinfo.txt")
$file1=FileOpen(@TempDir & "\partinfo.txt",0)
If $file1=-1 Then MsgBox(16,"错误","不能读取数据文件!")
$i=3
$str=FileReadLine($file1,$i)
Do
$active=StringMid($str,9,1)
If $active="A" Then ExitLoop
$i=$i+1
$str=FileReadLine($file1,$i)
Until @error=-1
If $active<>"A" Then
MsgBox(48,"活动分区","当前机器硬盘没有活动分区!")
Else
msgbox(64,"活动分区","当前机器硬盘活动分区为" & StringLeft($str,2) & " ")
EndIf
[ 本帖最后由 lxz 于 2008-8-3 09:12 编辑 ] 谢谢!:face (38):
[ 本帖最后由 新手上路 于 2008-8-3 11:17 编辑 ] 写得不错,支持一个。 {:face (280):}正好用到,多谢了 应该读取磁盘控制器的工作状态 非常感谢,挺有用的!
页:
[1]