asp判斷檔案FileExists,檔案夾FolderExists,盤符driveexists

asp判斷檔案FileExists,檔案夾FolderExists,盤符driveexists是否存在

,盤符driveexists

<%
Set fs=Server.CreateObject("Scripting.FileSystemObject")

if fs.driveexists("c:") = true then
      Response.Write("Drive c: exists.")
Else
      Response.Write("Drive c: does not exist.")
End If

Response.write("<br />")

if fs.driveexists("g:") = true then
      Response.Write("Drive g: exists.")
Else
      Response.Write("Drive g: does not exist.")
End If

set fs=nothing
%>

asp 檔案夾FolderExists

<%
Set fs=Server.CreateObject("Scripting.FileSystemObject")

If fs.FolderExists("c:temp") = true Then
      Response.Write("Folder c:temp exists.")
Else
      Response.Write("Folder c:temp does not exist.")
End If

set fs=nothing
%>

asp判斷檔案FileExists

<%
Set fs=Server.CreateObject("Scripting.FileSystemObject")

If (fs.FileExists("c:winntcursors3dgarro.cur"))=true Then
      Response.Write("File c:winntcursors3dgarro.cur exists.")
Else
      Response.Write("File c:winntcursors3dgarro.cur does not exist.")
End If

set fs=nothing
%>