查看完整版本: asp判断磁盘是否存在

asp判断磁盘是否存在

[code]    Function ReportDriveStatus(drv)
    '//功能：判断磁盘是否存在
    '//形参：磁盘
    '//返回值：成功为1，失败为-1
    '//
          Dim msg
        msg = -1
          If fso.DriveExists(drv) Then
            msg = 1
          Else
            msg = -1
          End If
          ReportDriveStatus = msg
    End Function[/code]