Hari ini saya melihat prosedur mengunggah bilah kemajuan di internet.
<!-#termasuk file = sundyupload.asp->
< %
'Pengkodean contoh ini adalah UTF-8.
Dia Obquload, Opt
Redup xmlpath
Redup fileformname, objfile, counter
opt = request.querystring (opt)
Jika opt = unggah maka
xmlpath = server.mappath (request.querystring (xmlpath) '' untuk mengonversi jalur virtual ke jalur yang sebenarnya
Atur oblePload = sundyupload baru '
OBQULOAD.UPLOADINIT XMLPATH, UTF-8
penghitung = 1
Response.write (Formulir Umum: & oblePload.Form (NormalForm) & <br> <br>) 'Dapatkan data formulir
Untuk setiap fileFormName di obleJupload.objfile
Set ObjFile = Objupload.objFile (FileFormName)
FileSize = objFile.filesize
strtemp = objfile.filepath
Response.write strtemp
FileName = mid (strtemp, instrrev (strtemp, /)+1)
'G0 =
f0 = ganti (ganti (ganti (sekarang (), :),),),),) & g0
Jika FileSize> 0 Lalu
Response.write (ukuran file: & fileze & <br>)
Response.write (nama file: & objfile.filepath & <br>)
t = split (nama file ,.)
t1 = t (1)
FileName = ganti (ganti (ganti (sekarang,:,),),-,) & t1
'Response.write (Deskripsi File: & Obpupload.Form (FileDesc & Counter) & <br> <br>)
objfile.saveas server.mappath (.) & / unggah / & file
Response.write save at: & server.mappath (.) & / Unggah / & filename & <br> <br> <br>
Akhiri jika
penghitung = penghitung + 1
Berikutnya
Akhiri jika
'Tentukan jalur virtual untuk file data bilah progres yang diunggah (file XML menentukan jalur virtual)
'Yang terbaik adalah acak, karena banyak orang dapat mengunggah pada saat yang sama, dan data kemajuan yang berbeda membutuhkan data kemajuan yang berbeda
'Jalur ini perlu ditransmisikan ke dalam komponen yang diunggah saat mengirimkan, sehingga data diubah selama proses pengunggahan
'Klien menggunakan JavaScript untuk membaca file XML ini untuk menampilkan kemajuan
xmlpath = unggah/ & timer & .xml
%>
<Html>
<head>
<meta http-equiv = konten tipe konten = teks /html;
<Title> sundy unggah progress bilah contoh </iteme>
<bahasa skrip = javascript>
Fungsi chkfrm () {
var objfrm = document.frmupload;
if (objfrm.file1.value == && objfrM.file2.value ==) {
Peringatan (pilih file);
objfrM.file1.focus ();
Mengembalikan false;
}
ObjFRM.Action = example.asp?
StartProgress ('<%= xmlpath%>');
Kembali Benar;
}
</script>
</head>
<body>
<Form Name = FRMUpload Metode = Posting Tindakan = Contoh.asp enctype = multipart/form-data onsubmit = return chkfrm ()>
Bentuk biasa: <br> <input type = nama teks = ukuran bentuk normal = 40> <br> <br>
File 1: <br>
<input type = file nama = file1 size = 40> </br>
<Input Type = Teks Nama = FileDesc1 Ukuran = 30> <br> <br>
File 2: <br>
<input type = file nama = file2 ukuran = 40> </br>
<Input Tipe = Nama Teks = FileDesc2 Ukuran = 30> <br>
File 3: <br>
<input type = file nama = file3 ukuran = 40> </br>
File 4: <br>
<input type = file nama = file4 ukuran = 40> </br>
File 5: <br>
<input type = file nama = file5 ukuran = 40> </br>
<Input Tipe = Kirim Nama = BtnSubmit Value = Kirim/>
</form>
</body>
</html>