IT貓撲網(wǎng)：您身邊最放心的安全下載站！ 最新更新|軟件分類|軟件專題|手機(jī)版|論壇轉(zhuǎn)貼|軟件發(fā)布

您當(dāng)前所在位置：首頁 → 網(wǎng)絡(luò)編程 → Asp編程 → ASP實(shí)例教程：FileSystemObject對象

ASP實(shí)例教程：FileSystemObject對象

時(shí)間：2015/6/28來源：IT貓撲網(wǎng)作者：網(wǎng)管聯(lián)盟我要評論(0)

FileSystemObject 對象

指定的文件存在嗎？

本例演示如何首先創(chuàng)建FileSystemObject對象，然后使用FileExists方法來探測某文件是否存在。

本示例代碼如下：

以下為引用的內(nèi)容：

<html>
<body>
<%
Set fs=Server.CreateObject("Scripting.FileSystemObject")
If (fs.FileExists("c:\windows\cursors\xxx.cur"))=true Then
Response.Write("文件 c:\windows\cursors\xxx.cur 存在。")
Else
      Response.Write("文件 c:\windows\cursors\xxx.cur 不存在。")
End If
set fs=nothing
%>
</body>
</html>

本實(shí)例運(yùn)行結(jié)果如下：

 文件 c:\windows\cursors\xxx.cur 不存在。

指定的文件夾存在嗎？

本例演示如何使用FolderExists方法探測某文件夾是否存在。

本示例代碼如下：

以下為引用的內(nèi)容：

<html>
<body>
<%
Set fs=Server.CreateObject("Scripting.FileSystemObject")
If fs.FolderExists("c:\temp") = true Then
      Response.Write("文件夾 c:\temp 存在。")
Else
      Response.Write("文件夾 c:\temp 不存在。")
End If
set fs=nothing
%>
</body>
</html>

本實(shí)例運(yùn)行結(jié)果如下：

 文件夾 c:\temp 不存在。

指定的驅(qū)動(dòng)器存在嗎？

本例演示如何使用DriveExists方法來探測某個(gè)驅(qū)動(dòng)器是否存在。
 
本示例代碼如下：

以下為引用的內(nèi)容：

<html>
<body>
<%
Set fs=Server.CreateObject("Scripting.FileSystemObject")
if fs.driveexists("c:") = true then
      Response.Write("驅(qū)動(dòng)器 c: 存在。")
Else
      Response.Write("驅(qū)動(dòng)器 c: 不存在。")
End If
Response.write("<br>")
if fs.driveexists("g:") = true then
      Response.Write("驅(qū)動(dòng)器 g: 存在。")
Else
      Response.Write("驅(qū)動(dòng)器 g: 不存在。")
End If
set fs=nothing
%>
</body>
</html>

本實(shí)例運(yùn)行結(jié)果如下：

 驅(qū)動(dòng)器 c: 存在。
驅(qū)動(dòng)器 g: 存在。

取得某個(gè)指定驅(qū)動(dòng)器的名稱

本例演示如何使用GetDriveName方法來取得某個(gè)指定的驅(qū)動(dòng)器的名稱。

本示例代碼如下：

以下為引用的內(nèi)容：

<html>
<body>
<%
Set fs=Server.CreateObject("Scripting.FileSystemObject")
p=fs.GetDriveName("c:\windows\cursors\abc.cur")
Response.Write("驅(qū)動(dòng)器名稱是：" & p)
set fs=nothing
%>
</body>
</html>

本實(shí)例運(yùn)行結(jié)果如下：

 驅(qū)動(dòng)器名稱是：c:

取得某個(gè)指定路徑的父文件夾的名稱

本例演示如何使用GetParentFolderName方法來取得某個(gè)指定的路徑的父文件夾的名稱。

本示例代碼如下：

以下為引用的內(nèi)容：

 <html>
<body>
<%
Set fs=Server.CreateObject("Scripting.FileSystemObject")
p=fs.GetParentFolderName("c:\winnt\cursors\3dgarro.cur")
Response.Write("c:\windows\cursors\abc.cur 的父文件夾名稱是：" & p)
set fs=nothing
%>
</body>
</html>

本實(shí)例運(yùn)行結(jié)果如下：

c:\windows\cursors\abc.cur 的父文件夾名稱是：c:\winnt\cursors

取得文件夾擴(kuò)展名

本例演示如何使用GetExtensionName方法來取得指定的路徑中的最后一個(gè)成分的文件擴(kuò)展名。

本示例代碼如下：

以下為引用的內(nèi)容：

<html>
<body>
<%
Set fs=Server.CreateObject("Scripting.FileSystemObject")
Response.Write("文件 3dgarro 的文件擴(kuò)展名是：")
Response.Write(fs.GetExtensionName("c:\windows\cursors\abc.cur"))
set fs=nothing
%>
</body>
</html>

 本實(shí)例運(yùn)行結(jié)果如下：

 文件 3dgarro 的文件擴(kuò)展名是：cur

取得文件名

本例演示如何使用GetFileName方法來取得指定的路徑中的最后一個(gè)成分的文件名。

本示例代碼如下：

以下為引用的內(nèi)容：

 <html>
<body>
<%
Set fs=Server.CreateObject("Scripting.FileSystemObject")
Response.Write("這個(gè)文件名的最后一個(gè)成分是：")
Response.Write(fs.GetFileName("c:\windows\cursors\abc.cur"))
set fs=nothing
%>
</body>
</html>

本實(shí)例運(yùn)行結(jié)果如下：

 這個(gè)文件名的最后一個(gè)成分是：abc.cur

取得文件或文件夾的基名稱

本例演示如何使用GetBaseName方法來返回在指定的路徑中文件或者文件夾的基名稱。

本

關(guān)鍵詞標(biāo)簽：ASP,FileSystemObject

相關(guān)閱讀

文章評論
發(fā)表評論

熱門文章 Active Server Pages 錯(cuò)誤 'ASP 0131'解決方Active Server Pages 錯(cuò)誤 'ASP 0131'解決方

相關(guān)下載

人氣排行 ASP下標(biāo)越界的解決方法ASP代碼中如何屏蔽ip地址 禁止某IP段訪問網(wǎng)站“文件共享鎖定數(shù)溢出” 原因及解決方法無法寫入數(shù)據(jù)庫的解決方法如何用ASP來獲取客戶端真實(shí)IP的地址用Asp編程實(shí)現(xiàn)QQ的在線情況查詢ASP常用函數(shù)列表ASP用FSO生成HTML簡單實(shí)例+詳解[原創(chuàng)]