Сначала создайте программу на стороне сервера для создания XML-файла для возврата клиенту (getfolder.asp).
<%
'написано Линьчжан Ченом, 20 апреля 2003 г.
' Пожалуйста, укажите источник и сохраните информацию об авторских правах при перепечатке.
response.write "<?xml version=""1.0""coding=""GB2312""?>"&chr(13)
response.write "<медиафайл>"&chr(13)
папки = запрос («папка»)
если папки="/" тогда
папки=""
конец, если
тусклый счет
количество = 0
папки = заменить (папки, "..", "")
basefolder="../media/"'путь к базовой папке
новая папка = базовая папка и папки
Установите fso =server.CreateObject("Scripting.FileSystemObject")
установите f=fso.getfolder(server.mappath(новая папка))
установить sf=f.подпапки
для каждого fd в sf' возвращает список папок по указанному пути
response.write "<файл>"&chr(13)
response.write "<ftype>папка</ftype>"&chr(13)
response.write "<fname>"&fd.name&"</fname>"&chr(13)
response.write "</file>"&chr(13)
счет=счет+1
следующий
установить SF=ничего
установите ff=f.Files
для каждого фи в фф
fname=fi.name
if instr("asf,wma,wmv",lcase(mid(fname,instrrev(fname,".")+1)))>0 then'Установите типы файлов, которые разрешено возвращать, чтобы предотвратить утечку исходного кода
response.write "<файл>"&chr(13)
response.write "<ftype>файл</ftype>"&chr(13)
response.write "<fname>"&fname&"</fname>"&chr(13)
response.write "</file>"&chr(13)
счет=счет+1
конец, если
следующий
'Если в каталоге нет файла, отправьте пустой элемент
если счетчик = 0, то
response.write "<файл>"&chr(13)
response.write "<ftype>пусто</ftype>"&chr(13)
response.write "<fname>0</fname>"&chr(13)
response.write "</file>"&chr(13)
конец, если
response.write "</mediafile>"
установить ff=ничего
установить f=ничего
установить fso=ничего
%>
Ниже представлена работа клиентского JS (selectfile.asp)
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML>
<ГОЛОВКА>
<TITLE> Выберите видеофайл</TITLE>
<стиль>
тд {размер шрифта: 9pt}
выберите {ширина: 210}
.s2{ширина:250}
</стиль>
<SCRIPT LANGUAGE="JavaScript">
<!--
/*написано Линьчжан Ченом, 20 апреля 2003 г.
Пожалуйста, укажите источник и сохраните эту информацию об авторских правах при перепечатке*/
//Предварительная загрузка изображений.
вар imgback = новое изображение ();
imgback.src = "images/arrow.gif";
вар imgbackgray = новое изображение ();
imgbackgray.src = "images/grayarrow.gif";
вар imgfolder = новое изображение ();
imgfolder.src = "изображения/folder.gif";
вар imggrayfolder = новое изображение ();
imggrayfolder.src = "images/grayfolder.gif";
//Стек массива истории
вар arristory = новый массив ();
вархиси=0;
//Используется для определения имени возвращаемого файла
проверка функции()
{
если (document.all.filename.value=="")
{
alert("Сначала выберите файл");
вернуть ложь;
}
еще
{
window.returnValue =document.f1.folder.value+document.all.filename.value;
окно.закрыть();
}
}
//Получаем содержимое XML-файла
функция getuserlist (url)
{вар oXMLDoc = новый ActiveXObject('MSXML');
oXMLDoc.url = URL;
вар ooRoot=oXMLDoc.root;
вернуть ooRoot;
}
//Когда файл выбран, возвращаем это значение в текстовое поле
функция addfile(txt)
{
document.all.filename.value=txt;
}
var first=1;//Определить глобальную переменную
function userlist(folders,ti)//Перечислить выбранные поля
{document.f1.folder.value=папки;
filebox.document.body.innerHTML="Идет загрузка файла, подождите...";
вар стршоу="";
вар timeoutid = ноль;
вар новая папка = "";
вар arrfolder = новый массив ();
вар arrff = новый массив ();
вар бланкстр="";
вар oItem;
//Определяем исторический статус
хиси+=ти;
arristory[hisi]=папки;
если (хиси==0)
{
arrow.innerHTML="<img src="images/grayarrow.gif">";
}
еще
{
arrow.innerHTML="<img src="images/arrow.gif" border=0 style="cursor:hand" onclick="userlist('"+arrhistory[hisi-1]+"',- 1)" onmouseover="this.src='images/arrow_over.gif'" onmouseout="this.src='images/arrow.gif'">";
}
//Определяем текущую папку
если (document.f1.folder.value=="")
{
folderid.innerHTML="<img src="images/grayfolder.gif">"
}
еще
{newsfolder=checkfolder(document.f1.folder.value)
folderid.innerHTML="<img src="images/folder.gif" border=0 style="cursor:hand" onclick="userlist('"+newsfolder+"',1)" onmouseover= "this.src='images/folder_over.gif'" onmouseout="this.src='images/folder.gif'">"
}
//Назначаем значение раскрывающемуся списку
document.all.select.options.length = 0;
новая папка = папки;
папкаstr=""
вар _obj=document.all.select;
var _o=document.createElement("Опция");
_o.text="Выбрать папку";
_o.value="";
_obj.add(_о);
если (новая папка!="")
{arrfolder=newfolder.split("/")
for(var i=0;i<arrfolder.length-1;i++)
{blankstr+=" ";
folderstr+=arrfolder[i]+"/";
_o=document.createElement("Опция");
_o.text=blankstr+arrfolder[i];
_o.value=folderstr;
_obj.add(_о);
}
}
document.all.select.options[document.all.select.options.length-1].selected=true;
url="getfolder.asp.gl?folder="+folders;
oRoot = getuserlist (url)
strshow="<table class=file cellpacing=0 cellpadding=0>";
len=oRoot.children.length;
если (длин==1)
{oItem = oRoot.children.item(0);
if(oItem.children.item(0).text=="пустой")
strshow="Больше никаких файлов и папок";
еще
{
if(oItem.children.item(0).text=="папка")
{
strshow+="<tr><td><A href="javascript:parent.userlist('"+folders+oItem.children.item(1).text+"/"+"',1)"><img src="images/mediafolder.gif" border=0 >"+oItem.children.item(1).text+"</A></td></tr>";
}
еще
{
strshow+="<tr><td><a href="javascript:parent.addfile('"+oItem.children.item(1).text+"')" ><img src="images/mediafile. gif" border=0>"+oItem.children.item(1).text+"</A></td></tr>";
}
}
стршоу+="</таблица>"
}
еще{
//Заносим данные в стек
для(я=0;я<len;я++)
{ oItem = oRoot.children.item(i);
if(oItem.children.item(0).text=="папка")
{
arrff[i]="<A href="javascript:parent.userlist('"+folders+oItem.children.item(1).text+"/"+"',1)"><img src= "images/mediafolder.gif" border=0>"+oItem.children.item(1).text+"</A>";
}
еще
{
arrff[i]="<A href="javascript:parent.addfile('"+oItem.children.item(1).text+"')"><img src="images/mediafile.gif" border=0 height=12>"+oItem.children.item(1).text+"</A>";
}
}
//Получаем количество столбцов для вывода
если (длин<=6)
{х=1;
у=6;}
еще
{х=длин/6;
у=6;}
for(var i=0;i<y;i++)
{strshow+="<tr>"
for(var j=0;j<x;j++)
{ponits=j*y+i;
если (пониц>=len)
{
strshow+="<td> </td>";
}
еще
{
strshow+="<td>"+arrff[ponits]+"</td>";
}
}
стршоу+="</tr>"
}
стршоу+="</таблица>"
}
filebox.document.body.innerHTML=strshow;
}
//-->
</СКРИПТ>
<script LANGUAGE="vbscript">
функция checkfolder(folderstr)
если (folderstr="" или instr(folderstr,"/")=instrrev(folderstr,"/")), то
проверить папку=""
еще
nfolder=left(folderstr,len(folderstr)-1)
checkfolder=left(nfolder,instrrev(nfolder,"/"))
конец, если
конечная функция
</скрипт>
</HEAD>
<BODY style="margin:0" bgColor=menu onload="javascript:userlist('',0)">
<table width="443" border="0" cellpacing="0">
<тр>
<td height="36"><ширина таблицы="409" border="0">
<тр>
<td width="73" align="right">Диапазон поиска (<u>I</u>):</td>
<td width="214"><select name="select" id="select" size="1" onchange="javascript:userlist(this.value,1);">
</select></td>
<td width="22" valign="baseline" id="arrow" align=right></td>
<td width="20" valign="middle" id="folderid"></td>
<td width="20" align="left"><img src="images/md.gif" width="16" height="15"></td>
<td width="28" align="left"><img src="images/viewtype.gif" width="23" height="14"></td>
</tr>
</таблица></тд>
</tr>
<тр>
<td height="120"><ширина таблицы="100%" height="100%" border="0">
<тр>
<td width="9"> </td>
<тд>
<iframe src="blank.htm" width=415 height=120 id="filebox"></iframe></td>
<td width="13"> </td>
</tr>
</таблица></тд>
</tr>
<тр>
<td height="60"><ширина таблицы="100%" border="0">
<FORM METHOD=POST ACTION="" name="f1">
<input type="hidden" name="folder" value="">
<тр>
<td width="85" align="right">Имя файла (<u>N</u>): </td>
<td width="254"><input type="text" id="filename" size="34"></td>
<td><button onclick="javascript:return check()"> Открыть (<u>O</U>)</button></td>
</tr>
</ФОРМ>
<тр>
<td align="right">Тип файла (<u>T</u>):</td>
<td><select name="select2" class=s2>
<option>Потоковое мультимедиа (*.asf, *.wmv, *.wma)</option>
</select></td>
<td><input type="button" name="Submit" value=" Cancel " onclick="window.close();"></td>
</tr>
</таблица></тд>
</tr>
</таблица>
</ТЕЛО>
</HTML>
Существует также небольшой файл Blank.htm, используемый для определения стиля отображения файлов и папок.
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML>
<ГОЛОВКА>
<TITLE> Новый документ </TITLE>
<стиль>
тд {размер шрифта: 9pt}
тело {размер шрифта: 9pt}
.file A{COLOR: #000000; TEXT-DECORATION: none;font-size:9pt}
.file A:visited{COLOR: #000000; TEXT-DECORATION: none;font-size:9pt}
.file A:hover {COLOR: #000000; TEXT-DECORATION: none;font-size:9pt}
</стиль>
</HEAD>
<BODY style="margin: 0pt">
</BODY>
</HTML>
При вызове используйте следующую функцию, чтобы добиться эффекта выбора файлов на стороне сервера, который будет выглядеть так же, как настоящий.
функция выбора файла()
{
var arr = showModalDialog("selectfile.asp?temp="+Math.random(), "", "dialogWidth:453px;dialogHeight:252px; status:0;help:1");
если (обр!= ноль)
{
возвращение
}
}
Последнее, что возвращает эта функция, — это выбранное имя файла. Вы можете получить несколько изображений, используемых в функции, из окна выбора файла :)
Предполагается, что во время использования вы можете столкнуться с различными неизвестными ошибками. Приветствую всех, кто общается со мной: Электронная почта: [email protected].