Подання до Internet вмісту каталогу засобами ASP

Христофоров Юрій

У цій статті я на прикладі розкажу, як використовуючи ASP (Active Server Pages) можна побудувати вміст каталогу Web аналогічно тому, як це виглядає на FTP сервер.

Постановка завдання: На Web-сервер є каталог, наприклад: C: InetPubwwwrootuser1. Нехай даний каталог має кілька вкладених каталогів і набір файлів в цих каталогах. Примірна структура папок представлена на Рис. 1.

Рис. 1.

У кожному з представлених на малюнку каталогах може перебувати необмежену кількість файлів, або деякі з каталогів можуть бути порожніми. Необхідно представити вміст папки user1 на Web-сторінці в дружньому для користувача вигляді.

Цікавою особливістю скрипта є те, що застосовуючи сторінку з фреймами (кадрами), можна побудувати меню користувача.

Результат повинен виглядати приблизно так:

Знаходимося в папці C: Inetpubwwwrootuser1folder1subfolder2:

На даному скріншоті показаний приклад меню. Сторінка menu.htm розділена на дві фрейму. У лівому фреймі знаходиться файл list_files.asp, а правий фрейм використовується для відображення файлів, посилання на які знаходяться у лівому фреймі. У лівому фреймі можна вільно переміщатися по папках. Т.ч. можна організувати меню користувача.

Рішення: Ключ до вирішення даної задачі - це використання MicrosoftR Scripting Library. Нас цікавитиме такий об'єкт цієї бібліотеки, як FileSystemObject. FileSystemObject надає об'єктну модель доступу до файлової системи. Далі, користуючись засобами мови написання сценаріїв VBScript, що виконується на Web-сервер, можна написати одну ASP-сторінку, яка буде виконувати всю роботу. Отже, приступимо.

Лістинг файлу list_files.asp:        

<% Response.Expires = 0%> 'Відключаємо   кешування сторінки