VFP中确定驱动器类型的两几种方法

来源：作者：出处：综艺读书 2006-10-13

关键词：硬盘设计

在应用程序的设计中，有时我们需要知道用户的驱动器的配置情况，在VFP中有多种方法可以实现，现介绍如下：

一、通过调用GetDriveType API函数来完成。

    下面的代码就可以检索出系统中所有的驱动器：

    表单的ACTIVATE方法：

        Declare Long GetDriveType In "kernel32" String nDrive

        Dime I, DrvName, DrvType
        For I = 0 To 25
            DrvName = Chr(I + 65) + ":"
            DrvType = GetDriveType(DrvName)
            Do Case
                Case DrvType =  2
                    Print "驱动器" + DrvName + "是一个软盘驱动器"
                Case DrvType = 3
                    Print "驱动器" + DrvName + "是一个硬盘驱动器"
                Case DrvType = 4
                    Print "驱动器" + DrvName + "是一个可移去式驱动器或网络驱动器"
                Case DrvType = 5
                    Print "驱动器" + DrvName + "是一个CD-ROM驱动器"
                Case DRIVE_RAMDISK
                    Print "驱动器" + DrvName + "是一个RAM 盘"
                Case Else
            EndcCase
        Next I

    二、使用FOXTOLLS.FLL中的DriveType函数。

       表单的ACTIVATE方法：

       Set Libriry To FoxTools.FLL

        Dime I, DrvName, DrvType
        For I = 0 To 25
            DrvName = Chr(I + 65) + ":"
            DrvType = DriveType(DrvName)
            Do Case
                Case DrvType =  2
                    Print "驱动器" + DrvName + "是一个软盘驱动器"
                Case DrvType = 3
                    Print "驱动器" + DrvName + "是一个硬盘驱动器"
                Case DrvType = 4
                    Print "驱动器" + DrvName + "是一个可移去式驱动器或网络驱动器"
                Case DrvType = 5
                    Print "驱动器" + DrvName + "是一个CD-ROM驱动器"
                Case DRIVE_RAMDISK
                    Print "驱动器" + DrvName + "是一个RAM 盘"
                Case Else
            EndcCase
        Next I

更多内容请看Linux驱动大全专题，或进入讨论组讨论。

【收藏此文】【大中小】【打印】【关闭】

较早的文章：VFP中利用Excel制作数据库报表

较新的文章：VFP中实现超链接

站内各频道最新更新文档

形形色色的台湾特产

怀念“黛玉”妹妹

·如何设置路由器
·照片合成处理软件
·RedHat6.2服务配置之Apache
·提升电脑性能的方法
·电脑无法正常启动的问题
·delphi两种方法使用xml文档
·证券行业交易平台解决方案
·三星人寿保险Sybase案例

·东软商业保险系统解决方案
·CSO向Sun平台应用移植解决..
·东软税务全面整体解决方案
·珠海国地税KILL安全系统案例
·友讯：D-Link助昆明市公安..
·江苏邮政票据打印机系统方案
·浪潮：云南国税备份系统案例
·CSS 标签属性

站内最新制作专题

·ACDSEE专题教程-下载使用
·迅雷专题教程-下载使用
·Windows XP频道
·Windows Vista频道
·Windows 2000频道
·win2003频道
·Freebsd频道
·Oracle频道

·Linux频道
·Windows频道
·邮件服务器专题
·协议大全
·数据恢复指南教程
·FreeBSD使用教程
·Linux数据库宝典
·Linux基础知识

热门关键字导读

Photoshop教程：照片处理照片制作 PS快捷键抠图
计算机故障：XP系统修复
艺术与设计：设计流媒体设计欣赏边框
计算机安全：ARP

站内频道文章精选

新闻资讯	电脑技巧
· 秘密:Vista隐蔽的动态屏保 · 腾讯开发新电子宠物--QQ熊 · 惠普否认2999元PC有价无货	· 驱逐Win系统“流氓”文件 · WinXP中获取未使用的IP地址 · 尝试format C:格式化硬盘？
操作系统	常用软件
· 在DOS下恢复回收站中的文件 · 拯救WinXP崩溃的救命稻草 · Linux系统中超级权限的应用	· 搜狗PK谷歌：谁能代言拼... · 昨日重现，一键GHOST轻松.. · 实现Web迅雷在空闲时杀毒
桌面开发	网络编程
· AVIFile函数制做AVI文件 · VC中链接动态链接库的方法 · 熊猫烧香核心源码(Delphi)	· DateDiff函数祥解 · JavaScript去除空格的三种 · js效果图片加载进度实时..
数据库	图像处理
· SQL Server数据库优化方案 · Oracle的初学者入门心得 · JSP连接Mysql数据库	· Photoshop为美女做艺术处理 · 用Freehand创建发光字特效 · 设计自己的个性QQ动态表情

百度推荐，商机无限

搜索您感兴趣的内容