新手上路 发表于 2008-8-1 00:18:51

如何判断硬盘某一分区是否是活动分区?

如题。                                       .

[ 本帖最后由 新手上路 于 2008-8-3 11:17 编辑 ]

bob 发表于 2008-8-2 14:22:24

没玩过wmi和api,不知道能否实现
个人意见是用 DEBUG 可以查找出引导分区,一般引导分区为活动分区

lxz 发表于 2008-8-3 09:09:24

#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 编辑 ]

新手上路 发表于 2008-8-3 11:14:51

谢谢!:face (38):

[ 本帖最后由 新手上路 于 2008-8-3 11:17 编辑 ]

xxgzs 发表于 2008-9-22 14:13:37

写得不错,支持一个。

zdpcc 发表于 2010-10-13 15:54:57

{:face (280):}正好用到,多谢了

nicky_926 发表于 2011-12-14 01:12:32

应该读取磁盘控制器的工作状态

yangyunbo 发表于 2011-12-23 00:26:00

非常感谢,挺有用的!
页: [1]
查看完整版本: 如何判断硬盘某一分区是否是活动分区?