VB的取磁盘序列号卷标和文件系统类型_VB.net_黑客防线网安服务器维护基地--Powered by WWW.RONGSEN.COM.CN

VB的取磁盘序列号卷标和文件系统类型

作者:黑客防线网安VB教程基地 来源:黑客防线网安VB教程基地 浏览次数:0

本篇关键词:系统类型文件磁盘
黑客防线网安网讯: 代码:FunctionGetSerialNumber(sRootAsString)AsLongDimlSerialNumAsLongDimRAsLongDimsTemp1AsString,sTemp2AsStringstrLabel=String$(255,Chr$(0))注释:磁盘卷标strType=String$(255,...
 代码:
FunctionGetSerialNumber(sRootAsString)AsLong
DimlSerialNumAsLong
DimRAsLong
DimsTemp1AsString,sTemp2AsString
strLabel=String$(255,Chr$(0))
注释:磁盘卷标
strType=String$(255,Chr$(0))
注释:文件系统类型一般为FAT
R=GetVolumeInformation(sRoot,strLabel,Len(strLabel),lSerialNum,0,0,strType,Len(strType))
GetSerialNumber=lSerialNum
注释:在strLabel中为磁盘卷标
注释:在strType中为文件系统类型
EndFunction
  用法:
  当驱动器不存在时函数返回0如果是个非根目录也将返回0:
lSerial=GetSerialNumber("c:")->
    黑客防线网安服务器维护方案本篇连接:http://www.rongsen.com.cn/show-14882-1.html
网站维护教程更新时间:2012-04-03 01:16:03  【打印此页】  【关闭
我要申请本站N点 | 黑客防线官网 |  
专业服务器维护及网站维护手工安全搭建环境,网站安全加固服务。黑客防线网安服务器维护基地招商进行中!QQ:29769479

footer  footer  footer  footer