/*** ディレクトリリストを読み取る関数* 編集: bbs.it-home.org*/function GetFolders( $resourceType, $currentFolder ){ // 仮想パスをローカル サーバー パスにマッピングします。 $ sServerDir = ServerMapFolder( $resourceType, $currentFolder, 'GetFolders' ) ; // フォルダー名を保持する配列 $aFolders = array() ; $oCurrentFolder = opendir( $sServerDir ) ; while ( $sFile = readdir( $oCurrentFolder ) ) { if ( $sFile != '.' && $sFile != '..' && is_dir( $sServerDir . $sFile ) ) $aFolders[] = '< ;フォルダー名="' . ConvertToXmlAttribute( $sFile ) . '" />' ; } Closedir( $oCurrentFolder ) ; // 「フォルダー」ノードを開きます。 echo "" ; natcasesort( $aFolders ) ; foreach ( $aFolders as $sFolder ) echo $sFolder ; // 「フォルダー」ノードを閉じます。 echo "" ; } 复制代