Direkomendasikan: Pengaturan Instalasi Windows 2003 IIS Bab Instalasi 2003: Instalasi default tanpa IIS. Untuk menginstal, silakan klik Mulai -> Alat Administratif -> Mengkonfigurasi Panduan Server Anda dan kemudian langkah demi langkah. Saatnya memilih item dalam daftar. Pilih Server Aplikasi (IIS, ASP.NET) dari daftar
Contoh Demonstrasi: Pertama -tama buat database sederhana, tulis fungsi untuk membacanya, dan tulis suhu variabel redup:
Kode ASP
| Berikut ini adalah konten yang dikutip: <% Function displayRecords () Redup sql, conn, rs SQL = SELECT ID, [SZD_F], [SZD_T] dari admin Set Conn = Server.CreateObject (AdodB.Connection) conn.open driver = {Microsoft Access Driver (*.mdb)}; Dbq = & server.mappath (db.mdb) Set RS = Server.CreateObject (ADODB.Recordset) rs.open sql, conn, 1, 3 Jika tidak rs.eof maka Suhu redup Temp = <Lebar Tabel = 90% Align = Center Temp = Temp & Border = 1 BorderColor = Silver Temp = Temp & CellPacing = 2 CellPadding = 0> temp = temp & <tr bgcolor =#ccddee> <td width = 5% temp = temp &> id </td> <td> operasi </td> Temp = Temp & <td> Nilai </td> </tr> Sementara tidak rs.eof temp = temp & <tr> <td bgcolor =#ccddee> temp = temp & rs (id) & </td> <td> & rs (szd_f) temp = temp & </td> <td> & rs (szd_t) temp = temp & </td> </tr> rs.movenext Pergi ke Temp = Temp & </able> DisplayRecords = Temp Kalau tidak DisplayRecords = data tidak tersedia. Akhiri jika rs.close Conn.Close Setel RS = Tidak Ada Setel Conn = Tidak Ada Fungsi akhir 'Menulis ke Cache Function displayCachedRecords (SECS) Retval redup, datval, temp1 RetVal = Aplikasi (Cache_Demo) datval = Aplikasi (cache_demo_date) Jika datval = lalu datval = dateadd (s, secs, sekarang) Akhiri jika temp1 = tanggal (s, sekarang, datval) Jika temp1> 0 dan retval <> lalu DisplayCachedRecords = retval 'Kode debugging: Response.write <b> <font color = green> baca data menggunakan cache Response.write ... (& Temp1 & detik tersisa) </font> </b> Response.write <br> <br> Kalau tidak Redup temp2 'Ubah displayRecords () ke fungsi yang 'Nilai Anda ingin cache temp2 = displayRecords () Application.lock Aplikasi (cache_demo) = Temp2 Aplikasi (cache_demo_date) = dateadd (s, secs, sekarang) Application.unlock DisplayCachedRecords = Temp2 'Kode debugging: Response.write <b> <font color = red> refresh cache display ... Response.write </font> </b> <br> <br> Akhiri jika Fungsi akhir %> <!- Response.write displayRecords () -> <Html> <head> <title> Gunakan cache untuk membaca data dari database </iteme> <tyle> tubuh, p, td {font-family: sans-serif; Ukuran font: 8pt; } td {padding-left: 5; } </tyle> </head> <body> <% Redup t1, t2 t1 = timer Response.Write DisplayCachedRecords (20) T2 = timer %> <p align = center> Waktu Dwell: < %= kiri ((CDBL ((T2 - T1) * 1000.0)), 5) %> MS </p> </body> </html> |
Bagikan: Penggunaan komponen adrotator ASP dalam tutorial ASP dasar Komponen Adrotator ASP setiap kali pengguna memasukkan situs web atau menyegarkan halaman, komponen ASP Adrotator membuat objek adrotator untuk menampilkan gambar yang berbeda. Sintaks: Berikut ini adalah konten yang direferensikan