Name
フォルダ名設定・取得
文法
Folderオブジェクト.Name
機能説明
フォルダ名の設定・取得
使用例
<![CDATA[
<%
Dim objFs, objFld, i, objFld2, objFldCol
Set objFs = Server.CreateObject("Scripting.FileSystemObject")
Set objFl = objFs.GetFolder("D:\test")
objFld.Name = "test1"
Response.Write "変更後フォルダ名 : " & objFld.Name & "<br>"
Set objFld2 = objFs.GetFolder("D:\")
Set objFldCol = objFld2.SubFolders
Response.Write "フォルダ名を変更した為、変更前のフォルダは存在しません<br>" & vbCrlf
For Each i in objFldCol
Response.Write i.Name & "<br>" & vbCrlf
Next
'オブジェクトを開放
Set objFldCol = Nothing
Set objFld = Nothing
Set objFld2 = Nothing
Set objFl = Nothing
Set objFs = Nothing
%>
]]>
Topへ