Direkomendasikan: Flash dikombinasikan dengan ASP untuk membuat IP, versi, waktu login, jumlah kunjungan Saya tidak tahu apakah itu asli, tetapi saya melakukannya sendiri tanpa merujuk pada apa pun. Pertama, Anda memerlukan 2 file ASP, 1 file teks, dan 1 file SWF. -----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
Di internet, penghitung yang ditulis dalam ASP ada di mana -mana. Saya pikir tidak masuk akal untuk berbicara tentang penghitung penulisan ASP di sini. Kemudian saya memikirkannya dan perlu membicarakannya, karena ini bukan hanya tentang menulis penghitung, tetapi tentang memperkenalkan pengetahuan ASP dan keterampilan aplikasi kepada semua orang.
Kode program asli adalah sebagai berikut:
$#@60;%Countlong = 8
'Countlong mendefinisikan jumlah bit yang ditampilkan oleh konter
Pada kesalahan resume berikutnya
′ Abaikan semua kesalahan
count = server.mappath ("count.txt")
Set Cou = Server.CreateObject ("Scripting.FilesystemObject")
atur out = cou.opentextFile (Count, 1, false, false)
counter = out.readline
out.close
′ Kode di atas adalah untuk membuka file count.txt dan membaca baris untuk membaca nilai penghitung saat ini
Jika sesi (″ dalam ″) $#@60; $#@62; ″ dalam ″ lalu
′ Tentukan apakah pengguna telah memasuki halaman beranda untuk memastikan bahwa penghitung tidak akan ditambahkan oleh 1 ketika dia menekan refresh atau datang ke halaman ini lagi.
sesi (″ dalam ″) = ″ dalam ″
atur out = cou.createTextFile (count, true, false)
application.lock
penghitung = penghitung+1
'Counter meningkat sebesar 1
out.writeLine (Counter)
application.unlock
out.close
′ Kode di atas adalah membuat file count.txt baru dan menulis baris, dan menulis nilai penghitung setelah menambahkan 1.
akhiri jika
co = cstr (counter)
'Fungsi CSTR digunakan untuk mengubah variabel numerik menjadi karakter
untuk i = 1 ke countlong-len (CO)
response.write ″ ″
Berikutnya
′ Pernyataan loop di atas adalah untuk menyelesaikan penambahan gambar 0 di depan konter
Fungsi Len (CO) Mendapat panjang co variabel, countlong-len (CO) mendapatkan jumlah 0 gambar sebelumnya
untuk i = 1 ke len (CO)
response.write ″ ″
Berikutnya
Fungsi 'Mid (Co, I, 1) digunakan untuk membaca karakter %$#@62 dari bit i-th dari variabel Co;
Penghitung yang lebih sukses adalah menggunakan sesi untuk mencegah pengguna menyegarkan penghitung beberapa kali; Gunakan file teks untuk merekam nilai penghitung. Meskipun kode ditulis lebih lama, jauh lebih baik daripada menggunakan objek aplikasi, karena ketika server reboot atau mengubah global.asa, nilai objek aplikasi akan dihapus; Dan juga menggunakan gambar untuk menggantikan karakter, yang terlihat lebih indah dan murah hati!
Anda dapat merancang sendiri gambar penghitung, menggunakan nama file 0.gif, 1 menggunakan 1.gif, dan sebagainya.
Bagikan: 20 tips yang sangat berguna di ASP 1. Cara menggunakan ASP untuk menentukan jalur fisik virtual dari situs web Anda Jawaban: Gunakan metode mappath p align = ukuran font tengah = 4 wajah = Arial b jalur fisik ke situs web virtual ini adalah: /b /font warna =#ff0000 ukuran = 6 wajah = arial % = server.mappath ( /) % /font /p 2. Bagaimana saya tahu saya pengguna % = server.