Direkomendasikan: Asp Instance Learning: Fungsi yang secara acak menghasilkan nama file Berikut ini adalah konten yang dikutip: <html> <meta http-equiv = refresh content = 2> <!-Tempatkan ini
Active Server Pager (Beranda Server Dinamis, disebut sebagai ASP), dapat dengan mudah mewujudkan fungsi penghitung halaman dengan membaca dan menulis file server, menggabungkan bahasa skrip (VBScript atau JScript) dan kode HTML. Buku teks ASP populer dan tutorial ASP di internet telah berbicara tentang masalah desain penghitung ASP, tetapi semuanya terlalu sederhana, seperti tidak menyebutkan cara memisahkan skrip penghitung dan halaman utama dan implementasi penghitung gambar. Di bawah ini adalah pengalaman penulis dalam membuat situs web NT untuk unit, dan memberikan contoh untuk berbicara tentang desain penghitung ASP langkah demi langkah. Saya berharap ini dapat memberikan inspirasi bagi pemula ASP dan netizen yang tertarik dengan pemrograman web ASP.
(I) penghitung sederhana
ASP berisi lima komponen server aktif bawaan, yaitu komponen akses basis data, komponen akses file, komponen rotator iklan, komponen kemampuan brower, dan komponen penghubung konten. Penghitung yang ingin kami desain di bawah ini adalah membaca dan menulis file server melalui komponen akses file (komponen akses file). Ide algoritma adalah: Gunakan file teks (ASCII) di server untuk menyimpan nilai yang dihitung. Setiap kali halaman diakses, nilainya dibacakan dari file, ditampilkan kepada pengguna, dan nilainya ditambahkan oleh 1, dan nilai tambah ditulis kembali ke file.
Pernyataan ASP dan deskripsi untuk menulis data ke file penghitungan server adalah sebagai berikut:
Counfile = server.mappath (nama file yang digunakan untuk menyimpan nilai penghitung)
Metode akses server server Mappath (PATH) mengonversi jalur di mana file yang menyimpan nilai penghitung terletak menjadi jalur fisik.
Set FileObject = Server.CreateObject (Scripting.FilesyStemObject)
Gunakan metode createObject untuk mendefinisikan file filestemObject objek
Set outstream = server.createTextFile (fileObject, true, false)
Gunakan Object FilesystemObject untuk memberikan metode CreateTextFile untuk menghasilkan file teks, di mana parameter benar berarti menimpa file asli, dan salah berarti bahwa file adalah tipe ASCII
Outstream.writeLine data yang akan ditulis
Outstream.WriteLine menulis baris data ke file
Sintaks ASP untuk membaca data dari file server adalah sebagai berikut:
Counfile = server.mappath (nama file yang digunakan untuk menyimpan nilai penghitung)
Set FileObject = Server.CreateObject (Scripting.FilesyStemObject)
Setel instream = server.opentextFile (fileObject, 1, false, false)
Gunakan Object FilesystemObject untuk menyediakan metode openTextFile untuk menghasilkan teks? Di mana parameter true berarti menimpa file asli, false berarti bahwa file adalah tipe ASCII untuk membaca data = instream.readline, di mana instream.readline adalah baris data yang dibaca dari file.
Berikut ini adalah contoh penghitung yang menggunakan ASP untuk mengimplementasikan fungsi penghitung halaman (SimpleCounter.asp). Saya telah mengomentari pernyataan itu secara rinci dalam kode. Anda dapat menempelkan kode berikut ke kode halaman yang perlu Anda hitung. Tentu saja, server Anda harus mendukung ASP, dan Anda telah membuat file teks SimpleCounter.txt dengan konten 0 di direktori tempat halaman beranda berada.
Kode dan Komentar Simple Simple Counter.Asp Simple: App:
| Berikut ini adalah konten yang dikutip: $#@60;% Countfile = server.mappath (simplecounter.txt) File aspconter.txt adalah file teks yang digunakan untuk menyimpan nomor. Konten awal umumnya 0. Set FileObject = Server.CreateObject (Scripting.FilesyStemObject) Atur out = fileobject.opentextFile (countfile, 1, false, false) counter = out.readline |
Baca nilainya di file penghitung
Out.close
Tutup file
| Berikut ini adalah konten yang dikutip: Set FileObject = Server.CreateObject (Scripting.FilesyStemObject) Atur out = fileobject.createTextFile (countfile, true, false) Application.lock |
Metode Application.lock melarang pengguna lain mengubah nilai penghitung
penghitung = penghitung 1
Nilai penghitung meningkat sebesar 1
Out.writeLine (Counter)
Tulis nilai penghitung baru ke file
Application.unlock
Setelah menggunakan aplikasi Method.Lock, izinkan pengguna lain untuk mengubah nilai penghitung
| Berikut ini adalah konten yang dikutip: Response.write (Anda adalah yang pertama) Response.write ($#@60; warna font = merah $#@62;) Response.write (counter) |
Transfer nilai penghitung ke browser dan tampilkan ke pengguna dalam warna merah
| Berikut ini adalah konten yang dikutip: Response.write ($#@60;/font $#@62;) Response.write (pengunjung) Out.close |
Tutup file
%$#@62;
(Ii) penghitung terpisah dari halaman
Dalam aplikasi yang sebenarnya, halaman utama dan program konter dipisahkan. Penghitungan halaman dapat dicapai dengan menambahkan kode yang dikutip ke halaman yang perlu dihitung. Ini adalah penghitung gratis yang sering kami lamar untuk digunakan secara online, tetapi biasanya dibuat oleh CGI. Di sini, kita hanya perlu sedikit memodifikasi penghitung sederhana yang kita buat dengan ASP sebelumnya, dan kemudian menambahkan pernyataan JavaScript ke halaman untuk merujuknya, yang akan mewujudkan fungsi penghitung terpisah dari halaman. Dengan cara ini, sangat nyaman apakah itu penghitung untuk halaman utama atau hitungan untuk halaman tertentu. Jelas, Anda hanya perlu mengubah nama file dan menghitung nama file kode sumber ASP yang menyimpan nilai penghitung untuk mengimplementasikan beberapa penghitung.
Counter txtcounter.asp kode terpisah dari halaman:
| Berikut ini adalah konten yang dikutip: $#@60;% Countfile = server.mappath (txtcounter.txt) Set FileObject = Server.CreateObject (Scripting.FilesyStemObject) Atur out = fileobject.opentextFile (countfile, 1, false, false) counter = out.readline Out.close Set FileObject = Server.CreateObject (Scripting.FilesyStemObject) Atur out = fileobject.createTextFile (countfile, true, false) Application.lock penghitung = penghitung 1 Out.writeLine (Counter) Application.unlock Response.writedocument.write (& counter &) |
Untuk menampilkan nilai penghitung dengan benar pada halaman, hubungi dokumen fungsi vbscript.write
Out.close
%$#@62;
Tambahkan kode berikut ke halaman untuk menghitung:
$#@60; p $#@62;
Kamu yang pertama
$#@60; warna font = merah $#@62;
$#@60; bahasa skrip = javascript src = http: //202.101.209.75/asptemp/counter/txtcounter.asp$#@62;
// Saat mengacu pada server dan jalur direktori di mana penghitung ASP berada.
$#@60;/skrip $#@62;
$#@60;/font $#@62;
Seorang pengunjung
$#@60;/p $#@62;
(Iii) Penghitung gambar terpisah dari halaman
Pengejaran orang tidak ada habisnya, mungkin Anda membutuhkan penghitung nomor grafis yang lebih personal daripada penghitung nomor teks sederhana. Tidak masalah, sekarang mari kita lihat cara menerapkan fungsi penghitung grafis menggunakan ASP. Untuk mengimplementasikan penghitung grafik, titik kunci adalah cara mengonversi nilai data dalam file penghitung menjadi representasi grafis yang sesuai. Karena angka desimal memiliki sepuluh angka yang berbeda, termasuk 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, kita perlu memiliki sepuluh gambar yang sesuai, dan nama file gambar harus sesuai dengan nomor yang ditampilkan. Misalnya, nama file gambar yang sesuai dengan 0 adalah 0.gif, dan 1 adalah 1.gif, ... (gambar dapat dibuat dengan menggunakan alat seperti Photoshop, atau diunduh dari Internet). Di sini kami ingin menggunakan fungsi vbscript len (string | varname) dan mid (string, start [, length]). Jumlah bit dari nilai penghitung dapat diperoleh dari Len (penghitung), dan angka pada bit ke-i dari nilai penghitung dapat diperoleh dari pertengahan (penghitung, i, 1). Kita dapat menggunakan nilai ini untuk memanggil gambar digital yang sesuai. Menggunakan pernyataan Loop For, tidak sulit untuk mendapatkan angka pada setiap bit nilai penghitung dan mengubahnya menjadi gambar digital yang sesuai, sehingga kita dapat mewujudkan transformasi dari nilai teks ke nomor gambar. Di bawah ini adalah contoh penghitung gambar yang ditulis dalam ASP. Karena sebagian besar kode telah dianalisis sebelumnya, hanya beberapa pernyataan yang dianotasi dalam kode.
Counter gambar imgcounter.asp kode terisolasi dari halaman:
$#@60;%@bahasa = vbscript% $#@62;
$#@60;%
gambar redup (20)
Tentukan array untuk menyimpan pernyataan yang menampilkan setiap gambar digit
| Berikut ini adalah konten yang dikutip: Countfile = server.mappath (imgcounter.txt) Set FileObject = Server.CreateObject (Scripting.FilesyStemObject) Atur out = fileobject.opentextFile (countfile, 1, false, false) counter = out.readline Out.close Set FileObject = Server.CreateObject (Scripting.FilesyStemObject) Atur out = fileobject.createTextFile (countfile, true, false) Application.lock penghitung = penghitung 1 Out.writeLine (Counter) Application.unlock Countlen = len (penghitung) |
Dapatkan jumlah bit nilai penghitung
| Berikut ini adalah konten yang dikutip: untuk i = 1 ke county gambar (i) = $#@60; img src = & http: //202.101.209.75/asptemp/counter/images/&/ & mid (counter, i, 1) & .gif $#@62; $#@60;/img $#@62; |
Kode tampilan (html) dari gambar yang sesuai dengan nilai numerik di setiap bit diperoleh dari pernyataan loop dan disimpan dalam array. Harap perhatikan server aktual dan jalur direktori gambar saat menggunakannya secara khusus.
response.writedocument.write (& gambar (i) &);
Hubungi dokumen fungsi. Tuliskan untuk mengeluarkan kode HTML yang menampilkan gambar digital
Berikutnya
Out.close
%$#@62;
Tambahkan kode berikut ke halaman untuk menghitung:
$#@60; p $#@62;
Kamu yang pertama
$#@60; bahasa skrip = javascript src = http: //202.101.209.75/asptemp/counter/imgcounter.asp$#@62;
// Saat mengacu pada server dan jalur direktori di mana penghitung ASP berada.
$#@60;/skrip $#@62;
Seorang pengunjung
$#@60;/p $#@62;
Catatan: Semua penghitung ASP di atas diuji dan diteruskan di bawah Windows NT Server 4.0 (Cina) / IIS3.0. Lingkungan berikut dapat menjalankan ASP:
1. Windows NT Server 4.0 / IIS3.0 atau di atas
2. Windows NT Workstation 4.0 / Microsoft Peer Web Service 3.0 atau lebih dari
3. Windows 95/98 / Microsoft Personal Web Server 1.0a atau di atas
Bagikan: Contoh ASP Penjelasan: Gunakan jeda halaman untuk mewujudkan tampilan paging artikel panjang Halaman artikel panjang ditampilkan dengan istirahat halaman. Jika Anda ingin menggunakan ASP untuk mengimplementasikan fungsi ini, Anda dapat menemukan bahwa hanya metode paging yang didasarkan pada jumlah kata. Namun, metode ini memiliki bug, yaitu, jika ada kode UBB atau HTML dalam konten artikel Anda, dapat dengan mudah menyebabkannya ada di antara [kode] [/kode]