找到当前所有逻辑驱动器的根驱动器路径

１) 利用GetDriveType函数：
Declare integer GetDriveType in " kernel32" String
Dgs=0
For I = 65 To 90
　　vName=Chr(I) + ":"
　　Lx= GetDriveType(vName)
　　 Do Case
　　　　 Case Lx=2
　　　　　Dgs=Dgs+1
　　　　　 wait wind '这是个软盘'
　　　　 Case Lx=3
　　　　　Dgs=Dgs+1
　　　　　 wait wind　'这是个硬盘'
　　　　 Case Lx=4
　　　　　Dgs=Dgs+1
　　　　　 wait wind　'这是个可移去式驱动器或网络驱动器'
　　　　 Case Lx=5
　　　　　Dgs=Dgs+1
　　　　　 wait wind　'这是个光盘'
　　　　 Case Lx=6
　　　　　Dgs=Dgs+1
　　　　　 wait wind　'这是个RAM盘'
　　 Endc
Endf
Wait wind '本机共有：'+str(Dgs)+'个驱动器'

＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝

(２) 利用GetLogicalDriveStrings函数：
Declare integer GetLogicalDriveStrings in "kernel32" Long, string @cc
CC=Spac(81)
=GetLogicalDriveStrings(81,@cc)
*CC中返回了这样的字符串"a:/ c:/ d:/ e:/ f:/ "每个名字都用一个NULL字符
　分隔，在最后一个名字后面用两个NULL表示中止。
X=(len(allt(cc))-1)/4 　&&x中包含本机逻辑驱动器个数
*如果你想知道每个具体的驱动器名，则写如下代码：
Dime Dve(X)
For I=1 to X
　　Dve(I)=Subs(CC,1,3)
　　CC=Subs(CC,5)
Endf
*这样在Dve这个数组里就是每个驱动器的盘符及":/" 了。

*如果你还想知道每个驱动器的类型，则再添加和改写如下代码：
Declare integer GetDriveType in "kernel32" String
Dime Dve(X，2)
For I=1 to X
　　Dve(I,1)=Subs(CC,1,3)
　　Lx=GetDriveType(Dve(I,1))
　　Do Case
　　　　Case Lx=2
　　　　　　Dve(I,2)='软盘'
　　　　Case Lx=3
　　　　　　Dve(I,2)='硬盘'
　　　　Case Lx=4
　　　　　　Dve(I,2)='可移去式驱动器或网络驱动器'
　　　　Case Lx=5
　　　　　　Dve(I,2)='光盘'
　　　　Case Lx=6
　　　　　　Dve(I,2)='RAM盘'
　　Endc
　　CC=Subs(CC,5)
Endf

找到当前所有逻辑驱动器的根驱动器路径相关推荐

【RPO技巧拓展】————3、IIS和.Net应用程序中的非根相对路径覆盖（RPO）
在这篇博文中,我将向您展示一种更好的方法来利用ASP.NET Web窗体应用程序中的非根相对路径覆盖问题.这是一个低风险漏洞,可用于将资源(如样式表)甚至动态JavaScript注入受影响的网页. 介 ...
【练习】树（Tree, UVa 548）给一棵点带权（权值各不相同）的二叉树的中序和后序遍历，找一个叶子使得它到根的路径上的权和最小。
给一棵点带权(权值各不相同,都是小于10000的正整数)的二叉树的中序和后序遍历,找一个叶子使得它到根的路径上的权和最小.如果有多解,该叶子本身的权应尽量小.输入中每两行表示一棵树,其中第一行为中序遍 ...
php vendor路径,php – 如何使用composer获取根包路径
我正在使用 composer开发一个名为 php-app-config的PHP组件. 这个组件,一旦被另一个项目需要,并使用composer install安装,应该在 root package的co ...
求二叉树指定结点到根的路径c语言,二叉树根节点到叶子结点和为指定值的路径...
题目描述 image.png 题解解题思路与二叉树根节点到叶节点的所有路径和一题相似,都是采用递归算法.但这个题加了一点,要求保存路径到vector中. 为了保存路径,这里给递归函数传递一个vect ...
关于找到pycharm中jetbrains-agent更新的打开路径的方法
事情是这样的,一开始我想着直接在网上找破解版下载就好了,然后下载了一个破解版的pycharm,但是后面发现有学生版可以用,于时就向官网成功申请了一个学生账号,很开心,然后重新安装了一遍pycharm. ...
使用 ProcessMonitor 找到进程所操作的文件的路径
很多系统问题都是可以修的,不需要重装系统,但是最近我还是重装了.发现之前正在玩的一款游戏的存档没有了--因为我原有系统的数据并没有删除,所以我还是能找回原来的游戏存档的.但是,我怎么知道这款游戏将存档 ...
python+selenium打开浏览器-设置浏览器路径和驱动器路径
python+selenium打开浏览器 from selenium import webdriver from selenium.webdriver.chrome.options import Op ...
Windows API函数大全
1. API之网络函数 WNetAddConnection 创建同一个网络资源的永久性连接 WNetAddConnection2 创建同一个网络资源的连接 WNetAddConnection3 创建同 ...
windbg断点学习总结
WinDBG常用断点命令 http://blog.csdn.net/vangoals/article/details/4458051 WinDBG提供了多种设断点的命令: bp 命令是在某个地址下断 ...

找到当前所有逻辑驱动器的根驱动器路径

找到当前所有逻辑驱动器的根驱动器路径相关推荐

最新文章

热门文章