Сегодня я увидел процедуру загрузки панели прогресса в Интернете.
<!-#Включить файл = sundyupload.asp->
< %
«Кодирование этого примера-UTF-8.
Dia objupload, Opt
DIM XMLPATH
Dim FileFormName, objfile, счетчик
opt = request.querystring (opt)
Если opt = загрузить, тогда
xmlpath = server.mappath (request.querystring (xmlpath) '' для преобразования виртуального пути в фактический путь
Установить objupload = new SundyUpload '
Objupload.uploadinit xmlpath, UTF-8
счетчик = 1
Response.write (общая форма: & objupload.form (normalform) и <br> <br>) 'Получите данные формы
Для каждого файла wordformname в objupload.objfile
Установить objfile = objupload.objfile (fileformname)
FileSize = objFile.filesize
strtemp = objfile.filepath
Response.write strtemp
filename = mid (strtemp, instrrev (strtemp, /)+1)
'G0 =
f0 = заменить (заменить (reply (own (), :),),),),) и g0
Если файл размером> 0, тогда
Response.write (размер файла: & filesize & <br>)
Response.write (имя файла: & objfile.filepath & <br>)
t = split (имя файла ,.)
t1 = t (1)
FileName = Replict (Reply (now (теперь:,),),-,) и T1
'Response.write (Описание файла: & objupload.form (filedesc & counter) и <br> <br>)
objfile.saveas server.mappath (.) & / upload / & file
Response.write Сохранить по адресу: & server.mappath (.) & / Upload / & filename & <br> <br> <br>
Конец, если
счетчик = счетчик + 1
Следующий
Конец, если
'Укажите виртуальный путь для загруженного файла панели данных о процессе прогресса (файл XML указывает виртуальный путь)
«Лучше всего быть случайным, потому что несколько человек могут загружать одновременно, а различные данные о прогрессе требуют разных данных прогресса
«Этот путь должен быть передан в загруженный компонент при отправке, чтобы данные изменялись в процессе загрузки
'Клиент использует JavaScript для прочтения этого файла XML для отображения прогресса
xmlpath = upload/ & timer & .xml
%>
<html>
<голова>
<meta http-equiv = content-type content = text /html;
<Title> Sundult загрузить пример прогресса пример </title>
<сценарий языка = javascript>
Функция chkfrm () {
var objfrm = document.frmupload;
if (objfrm.file1.value == && objfrm.file2.value ==) {
Предупреждение (пожалуйста, выберите файл);
objfrm.file1.focus ();
Вернуть ложь;
}
objfrm.Action = example.asp?
StartProgress ('<%= xmlpath%>');
Вернуть истину;
}
</script>
</head>
<тело>
<Form name = frmupload method = post action = example.asp enctype = multipart/form-data onsubmit = return chkfrm ()>
Обычная форма: <br> <input type = text name = normalform size = 40> <br> <br>
Файл 1: <br>
<input type = file name = file1 size = 40> </br>
<input type = text name = filedesc1 size = 30> <br> <br>
Файл 2: <br>
<input type = file name = file2 size = 40> </br>
<input type = text name = filedesc2 size = 30> <br>
Файл 3: <br>
<input type = file name = file3 size = 40> </br>
Файл 4: <br>
<input type = file name = file4 size = 40> </br>
Файл 5: <br>
<input type = file name = file5 size = 40> </br>
<input type = отправить имя = btnsubmit value = spect/>
</form>
</body>
</html>