Direkomendasikan: Cara menggunakan ASP untuk menangani kueri multi-kunci kata Dalam pengembangan web, saya sering menemukan beberapa pasangan kata kunci dari kueri bidang tunggal, yang biasanya saya terapkan melalui array dinamis. Tentu saja, beberapa kata kunci umumnya dipisahkan oleh spasi atau,. Saya berasumsi bahwa beberapa kata kunci dipisahkan oleh spasi, string kata kunci adalah keystr, dan kode spesifiknya
Artikel ini menjelaskan cara menggunakan ASP untuk mengeluarkan file Excel. Salah satu cara untuk menggunakan Excel di ASP adalah dengan menautkan file Excel sebagai database, dan operasinya mirip dengan operasi database Access. Tetapi metode ini tidak selalu berguna, seharusnya Excel bukan database relasional. Untuk format tetap, format ini berisi penggabungan sel yang kompleks, gaya garis batas, pola, hubungan formula antar sel, dll. Saya pikir hal termudah untuk dipahami adalah membuka file dengan templat yang sudah diatur di latar belakang, dan kemudian memasukkan data jika diperlukan, simpan, dan output ...
Metode yang disebutkan di sini adalah secara langsung membuat objek Excel, yang dapat melakukan berbagai operasi pada dokumen Excel lebih nyaman di latar belakang.
Sisi server juga perlu mengatur izin operasi komponen COM. Ketik DCOMCNFG pada baris perintah, dan masukkan antarmuka konfigurasi komponen COM. Pilih Microsoft Excel dan klik tombol Properties. Pilih ketiga opsi tunggal untuk disesuaikan. Tambahkan semua orang ke semua izin selama pengeditan. Mulai ulang server setelah disimpan.
Itu sangat penting. Jika Anda tidak mengaturnya, komputer lain tidak akan dapat menyelesaikan pembentukan objek Excel.
Namun, metode ini juga memiliki kelemahan. Dalam operasi saya yang sebenarnya, jika ada file Excel terbuka di server dan file yang sama dijalankan, kesalahan akan terjadi. Saya masih tidak mengerti mengapa. Mungkin ada beberapa tempat yang belum diatur dengan benar.
Selain itu, format kode contoh dalam artikel yang dikutip di atas tidak terlalu lengkap, dan banyak jeda dan spasi tidak akurat. Jika kode selesai, cukup salin kode dan jalankan dengan sukses. Kemudian perlahan -lahan meneliti dan memodifikasinya, akan mudah untuk memulai. Sekarang kode yang dimodifikasi adalah sebagai berikut (bagian di mana grafik ditarik dihapus):
Berikut ini adalah konten yang dikutip:
<%
Pada kesalahan resume berikutnya
straddr = server.mappath (.)
Setel objexcelapp = createObject (Excel.Application)
objexcelapp.displayalerts = false
objexcelapp.application.visible = false
objexcelapp.workbooks.open (Straddr &/Templet/null.xls)
Set Objexcelbook = Objexcelapp.ActiveWorkbook
Setel objexcelsheets = objexcelbook.worksheets
Setel objexcelsheet = objexcelbook.sheets (1)
Objexcelsheet.range (B2: K2) .value = array (minggu1, minggu2, minggu3, minggu4, minggu5, minggu 6, minggu7)
Objexcelsheet.range (B3: K3) .value = array (67,87,5,9,7,45,45,54,54,10)
Objexcelsheet.range (B4: K4) .value = array (10,10,8,27,33,37,50,54,10,10)
Objexcelsheet.range (B5: K5) .value = array (23,3,86,64,60,18,5,1,36,80)
objexselsheet.cells (3,1) .value = InternetExplorer
objexselsheet.cells (4,1) .value = Netscape
objexselsheet.cells (5,1) .value = lainnya
objexselsheet.range (b2: k5). select
Saveas (Straddr &/Temp/Excel.xls)
objexcelapp.quit
Setel objexcelapp = tidak ada
%>
<! Doctypehtmlpublic-// w3c // dtdhtml4.0transitional // en>
<Html>
<head>
<title> newDocument </iteme>
<Metaname = GeneratorContent = MicrosoftFrontPage5.0>
<Metaname = authorContent =>
<Metaname = KeyWordScontent =>
<Metaname = descriptionContent =>
</head>
<body>
</body>
</html>
Setelah mengoperasikan file Excel, Anda perlu mengeluarkan file. Bahkan, gunakan pengalihan ASP ke metode Excel. Terkadang dibuka langsung di IE, dan kadang-kadang itu adalah unduhan pop-up dan membuka jendela Simpan. Jika Anda perlu membukanya langsung di IE, gunakan FSO untuk memuat file Excel, dan kemudian output di IE.
Berikut ini adalah konten yang dikutip:
<%
Redup fso, fileext, strfilepath, mime
strfilePath = f: /aspxuexi.doc
Atur fso = server.createObject (scripting.filesystemObject)
FileExt = fso.getextensionName (strfilePath)
Atur fso = tidak ada
Pilih case fileext
Kasus Doc
Mime = aplikasi/msword
Kasus XLS
Mime = aplikasi/msexcel
Akhiri Pilih
Output panggilan (strfilePath, mime)
'#######################################################
Output fungsi (strfilePath, mime)
Response.contentType = mime
Const adtypeBinary = 1
Set ObjStream = Server.CreateObject (adodb.stream)
objstream.open
objstream.type = adtypeBinary
ObjStream.LoadFromFile StrfilePath
Response.binarywrite objstream.read
objstream.close
Atur objstream = tidak ada
Fungsi akhir
'#######################################################
%>
Bagikan: Cara Membuat Data Recordset Tampilan Halaman ASP 1. Buat Objek Recordset sebagai berikut: Dim ObjMyrst Set ObjMyrst = Server.CreateObject ("AdodB.Recordse
2 halaman Total halaman sebelumnya halaman berikutnya