<%
set fso = createobject("scripting.filesystemobject")
set fldr = fso.getfolder("c:/program files")
response.write "父資料夾名字是：" & fldr & "
"if fldr.isrootfolder = true then
response.write "該資料夾是一根資料夾" & "
"else
response.write "該資料夾不是根資料夾" & "
" end if
response.write "驅動器名字是：" & fldr.drive & "
"%>
首先建立fso元件的連線是必不可少的啦，然後set fldr = fso.getfolder("c:/program files")設定fldr物件被賦值，以作下面程式的引用。
fldr.isrootfolder即為判斷該資料夾是否為一根資料夾，值為布林值（true or false）；fldr.drive則顯示該資料夾所在的驅動器號了。
二、fso.createfolder
下面比較讓人激動的是通過asp建立資料夾了，你可以在你的權力範圍內任意位置建立任意資料夾。
2，creatfldr.asp
<%
set fso = createobject("scripting.filesystemobject")
fso.createfolder ("c:/cnbruce")
response.write "資料夾名為" & fso.getbasename("c:/cnbruce")
%>
執行程式，應該發現c盤多出了cnbruce資料夾，fso.getbasename則是提取資料夾名。
三、fso.deletefolder
通過asp可以建立了資料夾，則同樣可以刪除資料夾。
3，delfldr.asp
<%
set fso = createobject("scripting.filesystemobject")
fso.deletefolder("c:/cnbruce")
response.write "資料夾已刪除"
%>
發現剛建立的cnbruce資料夾確實已被刪除。
注意，有時需要刪除資料夾，而該資料夾不存在時，會出現程式邏輯性錯誤。則應先判斷資料夾的狀態。
那下面就採用乙個通用程式來靈活應變下。
4，mainflr.asp
<%
sub createafolder(file)
dim fso
set fso = createobject("scripting.filesystemobject")
fso.createfolder(file)
response.write "已經建立了"&file
end sub
sub deleteafolder(file)
dim fso
set fso = createobject("scripting.filesystemobject")
fso.deletefolder(file)
response.write "已經刪除了"&file
end sub
%>
<%
subname=request.form("submit")
create=request.form("create")
del=request.form("del")
if subname<>"" then
if create<>"" then
call createafolder(""&create&"")
end if
if del<>"" then
call deleteafolder(""&del&"")
end if
end if
%>
需要注意的是：刪除並不會提示「確認要放入**站」這項。這點你需要謹慎處理，特別是對你的系統資料夾。
四、fso.movefolder
主要作用是進行資料夾的移動，相當於剪下貼上動作。
5，movefldr.asp
<%
set fso = createobject("scripting.filesystemobject")
fso.createfolder ("c:/cnbruce")
fso.movefolder "c:/cnbruce", "c:/program files/"
%>
檢視cnbruce資料夾有沒有移動過來
格式：fso.movefolder "被移動的資料夾","移動到的資料夾"
本程式先是在c盤下建立了cnbruce資料夾，然後將其移動到c:/program files/資料夾下面。
不過同樣需要注意的是你的系統資料夾不能亂移動。
五、fso.copyfolder
主要作用：將資料夾從某位置複製到另一位置。
6，copyfldr.asp
<%
set fso = createobject("scripting.filesystemobject")
fso.copyfolder "c:/program files/cnbruce", "c:/"
%>
檢視cnbruce資料夾有沒有複製過來
asp 中讀寫檔案
維護專案中看到用到生成檔案時竟然出現錯誤了，以前沒有出現過錯誤的 不過上次生成檔案是英文版本的，這次生成的檔案是日文版的，一共生成了三個檔案，前兩個檔案通過 adodb.stream 儲存檔案的一點檔案也沒有 其實生成的三個檔案有兩個的內容來子同一張 的，用 adodb.stream 的沒有問題，可...
asp複製檔案函式,asp移動檔案函式
複製檔案 function copyfiles tempsource,tempend dim fso set fso server.createobject scripting.filesystemobject if fso.fileexists tempend then response.writ...
原來ASP可以讀寫登錄檔
乙個例子 dim read putername set read putername createobject wscript.shell dim putername,regpath regpath hklm system currentcontrolset control putername pu...