当前位置: 源码素材网 » VB源码 » 系统相关 » 详情页

VB硬盘操作包括引导扇区的读写

VB硬盘操作包括引导扇区的读写,小心测试哦,可能由于字节对齐而显示乱码,在Windows7下仍然有效的程序,不要把硬盘的引导区给在坏了,数据最值钱了。可显示以下数据信息:读取的字符数据、读取长度、十六进制数据、扇区内偏移地址、磁盘号(一般0为硬盘)、扇区号N (绝对偏移地址=扇区号*512 字节,一般情况)。
  If OpenDisk("\\.\PhysicalDrive" & Text6.Text) = False Then MsgBox "open err" '读取设备句柄
  If LockVolume = False Then MsgBox "lock err" '锁定硬盘
  GetDiskGeometry '读取硬盘控制码
  SetFilePointer hDisk, Val(Text2.Text) * 512, 0, 0 '定位到指定扇区
  If ReadFile(hDisk, a(0), 512, t, 0) = 0 Then MsgBox "err read file" '读取扇区数据
  If UnlockVolume = False Then MsgBox "unlock err" '解锁硬盘
  CloseDisk '关闭句柄
  '读取扇区数据
  ReDim b(Val(Text4.Text))
  copymemory b(0), a(Val(Text3.Text)), ByVal Val(Text4.Text) '将扇区数据中的字符取出
  Text1.Text = GetHexStr(a)
  Text7.Text = b

  • 相关标签:扇区
  • 调试环境:VB6.0
  • 文件大小:6.06K
  • 资源评级:
  • 更新时间:2019-02-10
  • 相关链接:暂无演示

源码测试截图:

VB硬盘操作包括引导扇区的读写运行截图

相似源码:扇区 VB源码下载:VB硬盘操作包括引导扇区的读写 测试截图

下载声明:

本站资源仅供学习参考,禁止用于非法途径。若“VB硬盘操作包括引导扇区的读写”源代码侵犯了您的权益,请尽快告诉我们。