说三道四技术文摘-感悟人生的经典句子
说三道四 > 文档快照

VB如何获取硬盘卷标、序列号和文件系统类型?

HTML文档下载 WORD文档下载 PDF文档下载
VB如何获取硬盘卷标、序列号和文件系统类型?


   磁盘序列号在每次软盘或硬盘格式化后都重新生成,并且不回重复。许多程序员用此加密。其实也可以修改该函数,可以得到磁盘卷标和文件系统类型信息。

声明:
Private Declare Function GetVolumeInformation Lib "kernel32.dll" Alias _
  "GetVolumeInformationA" (ByVal lpRootPathName As String, ByVal _
  lpVolumeNameBuffer As String, ByVal nVolumeNameSize As Integer, _
  lpVolumeSerialNumber As Long, lpMaximumComponentLength As Long, _
  lpFileSystemFlags As Long, ByVal lpFileSystemNameBuffer As String, _
  ByVal nFileSystemNameSize As Long) As Long

代码:

Function GetSerialNumber(sRoot As String) As Long
  Dim lSerialNum As Long
  Dim R As Long
  Dim strLabel As String, strType As String
  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 中为 文件系统类型
End Function

用法:

当驱动器不存在时,函数返回 0。如果是个非根目录,也将返回 0:

lSerial = GetSerialNumber("c:\")

手势识别兼容Android 1.x和2.x的代码 NativeActivity类在NDK中管理Activity OBB文件和StorageManager类使用介绍 DownloadManager下载管理类2.3新增API介绍 Android平台上的11个感应器你都知道吗 Android 2.3中的java.io.File类新增功能 更轻松的获取APK文件安装时间 Android控件对应表,丰富你的UI设计 Android开发进阶之NIO非阻塞包(八) Android开发进阶之NIO非阻塞包(七) Android开发进阶之NIO非阻塞包(六) Android开发进阶之NIO非阻塞包(五) Android开发进阶之NIO非阻塞包(四) Android开发进阶之NIO非阻塞包(三) Android开发进阶之NIO非阻塞包(二) Android开发进阶之NIO非阻塞包(一) Android开发进阶教程系列(一)目录篇 Android开发调试工具TraceView多图演示 Android JNI实例代码(二) Android JNI实例代码(一) Android JNI开发高级篇 Android NDK开发技巧二 Android JNI开发进阶篇 Android JNI开发提高篇 Android JNI开发入门篇 Android NDK开发技巧一 Android数据库ContentProvider封装原理 Android Permission列表,ADT 0.9.9 bug Android Theme和Styles内部定义解析 Android平台下图表绘制相关方法 Activity类的runOnUiThread方法你用过吗 管理软件方面的权限设置 为什么这个这个位图不能显示? 我MM摔伤了,希望她早日恢复!~~~~散分~~~~(一) 我MM摔伤了,希望她早日恢复!~~~~散分~~~~(二) 每次重启系统后,IE的默认页就被改成一个固定的网址。 我MM摔伤了,希望她早日恢复!~~~~散分~~~~(三) 我MM摔伤了,希望她早日恢复!~~~~散分~~~~(四) 紧急援助——莫名奇妙的关于编译后的EXE文件图标的问题 需求和方案方面的资料 C#写的windos桌面程序中调用delphi6写的dll正常,为何在阿asp.net中相同的方法调用出现问题呢? SQL语句的语法问题,高手请进!!! 有一套网上音像系统,寻开音像店共同合作 SUN的那份关于java所有的包的说明的文档在哪里可以下载呀? 怎么用电脑接听普通电话机打来的电话。 为什么读取图片后显示出错 请各位指教关于随即生成表格的问题!(急!!!!!) 格式问题:高分! 今天新买一台机器,xp1800+ 承启nforce2 +Kingmax333 256DDR +ST80G用起来一个字,爽! RichTextBox控件如何读取使用UTF8编码的文本文件? 程序编译到AfxWinMain就显示警告信息 建设一个一般的callcenter有10-20坐席,大概需多少钱呀 散分!!第一个程序在天空提交通过!! (帮我搞定,高分相赠,在线等待!)ASP上传图片到SQLServer,为什么老提示对象不支持appendchunkmydata方法? CheckBox可以同时传递多个值吗? 请问有用过visual interdev的,如何让interdev也像dreamweaver可以在写程序的时候显示代码在哪行的啊.多谢了 请高手帮忙解决我的问题,在此表示谢谢! 有关datagrid 和webform 的问题 程序员的艳遇。。。。。。 验证字符串问题 IE问题!好烦人啊!那位高手能帮我解答! 怎么在建表时使用一个时间函数??就是指出加这条这条文件的时间?? 高手请进,多数据库链接的问题 如何成为一个程序员? 事务以及回滚的问题 有做完一个作业,放60分。 关于ASP调用VC编的DLL接收返回参数的问题 我提问,大家回答 有没有关于触发器的电子书籍? 怎么能够获得数据库的连接字串呀?? 大讨论:目前用什么工具、做什么开发最能赚钱?散分啦!感兴趣的程序员们快来!! 在IE中,打开某个页面,会连接到www.lop.com页面 关于islower(ch),isdigit(ch) 疑问 BQQ的服务器端有没有保存用户的聊天记录的? 如何获得程序方向键输入?多谢! 求助有关IFS-HOOK 高手请入!!急救!求msflexgrid 的打印源码????? 如何在list中显示文件夹 哪里可以看到Obejct类clone的实现方法? 英语翻译A design method for PID controllers based on the direct synthesis approach and specification of the desired closed-loop transfer function for disturbances is proposed.Analytical expressions for PID controllers are derived for several comm 歌词中好像有我紧紧望着你的天空,寻找一个失落的梦,雨后的彩虹……是什么歌? 扬子鳄 用英语翻译 who后加复数还是加单数 最感人的理想难得回一趟老家,我到曾经读过4年书的金盆小学看望年迈的启蒙老师.晚上与老师东拉西扯的闲聊.聊着聊着,就随手翻看起桌上的一沓作文本来.老师说,孩子不多,整个二年级才一 苹果树比梨树多20%,梨树比苹果树少( )%? Simulation studies of inverted pendulum based on PID controllers 求助这句怎么翻译,谢谢大哥大姐了 最感人的理想 文章:难得回一趟老家,我到曾经读过4年书的金盆小学看望年迈的启蒙老师.晚上与老师东拉西扯地闲聊.聊着聊着,就随手翻看起桌上的一沓作文本来.老师说,孩子不多,整个二年级 You stir with this.猜一个以s开头的英文单词 集合名词做主语是谓语动词用单数还是复数,个体名词做主语是谓语动词用单数还是复数 CITY OF GLASS怎么样 四个火念神马 什么是荧光性什么是物质的荧光性能?这个性能能说明什么问题呢? 玻璃之城 神马字? 充电的荧光鞋可以湿水么? He is from cuba.(改为复数) 狐死归首丘,故乡安可忘.的意思 we have bought some (ice cream) in the supermarket.(对划线部分提问) 请问电影玻璃之城为什么要叫玻璃之城?这是我最喜欢的电影,不过看了很多遍还是不知道这电影名字的意义,此外,在花瓶里加阿斯匹林真的可以防止花凋谢吗?为什么? 这是神马字 1.We bought some noodles in the supermarket,too(改为否定句)We bought ________ noodles in the supermarket,_________3.I could hardly work out the maths problem(改为反意疑问句)I could hardly work out the maths problem,_____ _______? 为什么加入生石灰可以除硫在用含硫量较高的生铁炼钢时 蔡依林又为何躺枪? 质量为400千克的赛艇在水中航行时受到的阻力与速度成正比当赛艇以恒定牵引力由静止开始加速时,赛艇的速度达5m/s是加速度为4m/s^2.已知赛艇在这一恒定牵引力作用下所能达到的最大速度是1 生石灰加入盐酸中后,它是先和水反应生成氢氧化钙.再和HCL反应,还是直接和HCL反应 这个是神马字? 《啄木鸟头部的防震装置》阅读答案 三木木吧和火星天后吧谁先建立? 运用所给句型翻译下列句子 一艘快艇以大小为2m/s平方的加速度在恒定力的作用下,做匀减速直线运动,快艇的初速度是6m/s,求快艇在8末的速度和8s内经过的位移 比较本质的黑吧除了三木木吧以外还有什么吧?例如摸摸猫头吧黑开逼,三木木吧黑蔡依林,亚马逊天后吧黑嘎嘎,还有什么本质的黑吧? Peter didn't ( )lunch yesterday. A,ate B.had C.did D.eat 啄木鸟的防震器阅读答案 pancake可数吗 英文Gemini怎么读 奇迹荧光石怎么用 looks out of the windows什么意思 Gemini怎么读 I expect nothing less from you啥意思来着我怎么觉得是“我对你太满意了”的意思忘记了 ___ lele looks out of the windows today横线里填什么 this hell with it I‘d expect nothing less怎么使用? 果园有100棵苹果树,比梨树的2倍少20棵,问梨树有多少棵?(先画树状图,再列式计算 ) gemini什么意思 What's your ( ) store?高手们填什么,快. 急求大神翻译中文!God opened the windows of heaven ,looking at me and asked: what is your dream for today? I answered: God,please take care of the person who is reading this message at present because this person is so special to me,once! Gemini 怎么读 = =可以罗马音吗 = = what about the prices in your 至少我还有梦的歌词是哪首歌? 荧光扇子的制作方法我们正排练一个舞蹈,需要用到会发光的扇子,我们把它称为荧光扇.哪位老师能指点一下,如何做出这种效果,或者告诉我哪里有这样的扇子卖?急,急,急…… What is your status?注册了个博客,里面要填写这个是什么意思中文? “只要我还有梦,就会见到彩虹”是哪首歌的歌词 店铺做主语,到底是是为单数还是复数 悬赏分:20 | 离问题结束还有 14 天 15 小时 | 提问者:skyisskys 名词所有格之后的名词被省略,这种情况一般只指商店、工厂、住宅等,作主语时,动词一般用 what's up with your status?中文意思是? 只要我还有梦就会看到彩虹什么歌 英语翻译同上~这首不是大流行的即使知道要见面``但是我觉得更好听呢~ "it's no less than you deserve"什么意思 扬子鳄用英语怎么说 青藏铁路格尔木站两辆火车相撞 致50宁波女子上班途中被贴淫秽言语字条(图受不了婆婆爆粗口 女子去法院和丈夫闹兰溪男子因儿子学习差被指责 动手打伤两名男子入室盗窃 自以为剪断监控就不老公全家都爱说脏话 女子向法院起诉离大学教师:我为什么把12岁女儿送进远曾经爱美的她在翠苑流浪8个多月 超市杭州市中级法院招聘速录员属事业编制 清华大学附属中学在浙大招老师 录用者桐庐干部乔迁摆宴 专家:人情往来易生永康首座500千伏输变电所明年开建宁波出台国内首个网购争议处理办法(组杭州萧山错案四名当事人已提国家赔偿申浙江温岭村民收获“巨无霸”番薯 重达韩亚空难最后一名留医伤者出院 共留医民调称8成俄人认为俄腐败程度高 地方默克尔电话疑遭美安全机构窃听 致电奥俄总理:乘直升机上班因交通拥堵韩亚空难最后一名留医伤者出院 共留医俄罗斯总理访问安徽 拿相机拍照他开始死磕坐台小姐苏志燮李敏镐金希澈 2013韩国最帅通信公司的光交箱邀请小伙伴们狂欢啦跨区上班 拼车来回你会做吗不动刀,开眼角潘渭滨:老梅苍劲你家婆婆抱怨了吗?意大利不怵“日耳曼战车”爱尔兰将“以强势姿态”退出国际救助计敬请上门服务淘实惠设计师带你解读今年皮草流行趋势五位老爸蹭饭 谁的人品大爆发抱团包酒店了过半企业“旁观”萧山今年“非吸”案件多发大妈,我可以说你两句重话吗■遥控器全国人大常委会原副委员长陈至立来湘考
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘