Saya percaya setiap orang memiliki pengalaman ini: ada tautan di halaman yang menunjuk ke file kata di server. Ketika mesin klien telah diinstal kantor, mengklik tautan akan memanggil Word untuk membuka dan menelusuri; Ketika mesin klien tidak menginstal Office, mengklik tautan akan memunculkan kotak dialog Simpan. Singkatnya, jika browser mengetahui jenis file, itu akan terbuka secara otomatis; Jika tidak tahu, pelanggan akan diminta untuk menabung. Tetapi kadang -kadang kami berharap apa pun jenis file, kami tidak akan membukanya dan membiarkan klien menyimpannya secara langsung. Untuk memenuhi persyaratan ini, file yang disimpan pada hard disk server harus diimplementasikan menggunakan metode sendBinary dari komponen ASPUpload. Untuk file yang disimpan dalam database, Anda hanya perlu membuka set rekaman dan mengeluarkan data biner langsung ke klien. Namun, Anda perlu memberi tahu jenis mime file browser, nama file dan ukuran file.
1. File di hard drive sisi server
Salinan kode adalah sebagai berikut:
<%
Dimupload, filepath
Setupload = server.createObject ("persits.upload")
Filepath = server.mappath (".") & "/" & "2003529213019.txt"
'Sendbinary Parameter Deskripsi:
'Parameter 1: File Physical Path
'Parameter 2: Apakah akan mentransfer informasi seperti jenis MIME dari file ke browser
'Parameter 3: Jenis File, Anda dapat menentukan jenis MIME tertentu, tetapi umumnya Anda dapat menggunakan aplikasi/octet-biner
'Parameter 4: Biarkan klien menyimpan file atau buka secara langsung. Benar: simpan; False (default): buka
Unggah
%>
2. File di database sisi server
Salinan kode adalah sebagai berikut:
<%
Dimobjconn, objrs
Setobjconn = server.createObject ("adodb.connection")
SetoBjrs = server.CreateObject ("adodb.recordset")
objconn.open "driver = {microsoft accessDriver (*. mdb)}; dbq =" & server.mappath ("db1.mdb")
objrs.open "pilih*fromt5whereid = 2", objconn, 1,3
Response.contentType = "Aplikasi/Octet-Stream"
Response.addheader "disposisi konten", "lampiran; fileName =" & objrs ("nama file")
Response.addheader "length-length", cstr (objrs ("size")) 'Di sini Anda harus mengonversi dengan CSTR
Response.binarywriteobjrs ("file")
objrs.close
Setobjrs = tidak ada
objconn.close
Setobjconn = tidak ada
%>
Metode ini mensyaratkan bahwa nama file dan ukuran file harus disimpan secara bersamaan saat menyimpan file! Jika nama dan ukuran file tidak ditentukan, jika browser mengetahui jenis file, itu akan dibuka secara otomatis; Jika tidak tahu, pelanggan akan diminta untuk menabung!