home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Source Code / Visual Basic Source Code.iso / vbsource / gettin1r / module1.bas < prev    next >
Encoding:
BASIC Source File  |  1999-08-21  |  331 b   |  12 lines
  1. Attribute VB_Name = "Module1"
  2. Public Declare Function GetLogicalDriveStrings Lib "kernel32" Alias "GetLogicalDriveStringsA" _
  3.        (ByVal nBufferLength As Long, ByVal lpBuffer As String) As Long
  4.  
  5.  
  6. Public Declare Function GetDriveType Lib "kernel32" Alias "GetDriveTypeA" _
  7.        (ByVal nDrive As String) As Long
  8.  
  9.  
  10.  
  11.  
  12.