นี่คือตัวนับกราฟิกที่สวยงามซึ่งออกแบบโดยไม่มี CGI
ซึ่งแบ่งออกเป็นสามส่วน: 1. สร้างไฟล์กราฟิก
2. สร้างฐานข้อมูล
3. เขียนโค้ด
1. สร้างไฟล์กราฟิก
ขั้นแรก ให้ใช้ซอฟต์แวร์สร้างกราฟเพื่อสร้างกราฟิก 10 ภาพเพื่อแสดงตัวเลข 10 ตัวของตัวนับ: 1, 2, 3, 4, 5, 6, 7, 8, 9, 0 หากคุณมีพรสวรรค์ทางศิลปะ คุณสามารถสร้างกราฟิกที่ดีขึ้นได้
2. สร้างฐานข้อมูล
ใช้เพื่อสร้างฐานข้อมูลชื่อ ฐานข้อมูลประกอบด้วยตาราง
ชื่อคือ โครงสร้างคือ: จำนวนเต็ม มีหนึ่งระเบียน และค่าเริ่มต้นคือ 0
ใช้เพื่อจัดเก็บจำนวนการเข้าชมหน้านี้ครั้งล่าสุด
3. เขียนโค้ด
——————number.asp————————————
<%@ ภาษา = "vbscript" %>
<!--#include file="adovbs.inc"-->
-
ตั้ง objconn=server.createobject("adodb.connection")
objconn.attributes=adxactมุ่งมั่นการรักษา
dbpath=server.mappath("num.mdb")
objconn.open "driver={ไดรเวอร์การเข้าถึง Microsoft (*.mdb)};dbq=" & dbpath
หมายเหตุ: สร้างการเชื่อมต่อกับฐานข้อมูล
sqlquery= "เลือก * จาก numt"
ตั้งค่า rsrecordset=server.createobject("adodb.recordset")
rsrecordset.open sqlquery, objconn, adopenkeyset, adlockoptimistic
หมายเหตุ: เปิดฐานข้อมูล
แอปพลิเคชันล็อค
application("nmb")=rsrecordset("number")
แอปพลิเคชันปลดล็อค
หมายเหตุ: กำหนดจำนวนการเข้าถึงล่าสุดให้กับ Application object
application.lock
application("nmb")=application("nmb")+1
แอปพลิเคชันปลดล็อค
rsrecordset("number")=rsrecordset("number")+1
rsrecordset.update
rsrecordset.ปิด
objconn.ปิด
ตั้งค่า rsrecordset=ไม่มีอะไร
ตั้ง objconn=ไม่มีอะไร
หมายเหตุ: ปิดฐานข้อมูลและปล่อยอ็อบเจ็กต์
dim nmb1
สลัว str()
nmb1=application("nmb")
เรดดิม str(nmb1)
สำหรับ i=1 ถึง len(nmb1)
str(i)=กลาง(nmb1,i,1)
หมายเหตุ: สำหรับแต่ละหมายเลข ให้รับกรณีเลือกไฟล์กราฟิกที่สอดคล้องกัน
str(i)
กรณี"0"
imgF="0.gif"
กรณี "1"
imgF="1.gif"
กรณี "2"
imgF="2.gif"
กรณี"3"
imgF="3.gif"
กรณี"4"
imgF="4.gif"
กรณี "5"
imgF="5.gif"
กรณี"6"
imgF="6.gif"
กรณี"7"
imgF="7.gif"
กรณี "8"
imgF="8.gif"
กรณี"9"
imgF="9.gif"
สิ้นสุดการเลือก
หมายเหตุ: กราฟิกเอาต์พุต
response.write"<img src="&imgF&">"
ต่อไป
-