คำแนะนำสำหรับการใช้งาน
1. เพิ่มการอ้างอิงไปยังไฟล์ antirefresh.asp ที่ด้านบนของหน้าเพื่อป้องกันเช่น:
<!-#รวม virtual = "antirefresh.asp"->
2. จากนั้นเพิ่มรหัสการโทร
การคัดลอกรหัสมีดังนี้:
-
const varnamedatearr = "www_domai_net_app_dataarr"
const varnameiparr = "www_domai_net_app_iparr"
สลัว objantirefresh
ตั้งค่า objantirefresh = antirefresh ใหม่
objantirefresh.buffersize = 100 'ขนาดปริมาณ
objantirefresh.cacheitemavailtime = 2'interval เวลา
ถ้าไม่ objantirefresh.isvalidaccess () แล้ว
ตั้งค่า objantirefresh = ไม่มีอะไร
Response.write ("การเยี่ยมชมของคุณเป็นประจำในอดีตโปรดลองอีกครั้งใน 2 วินาที")
Response.end ()
สิ้นสุดถ้า
ตั้งค่า objantirefresh = ไม่มีอะไร
-
ในหมู่พวกเขา
const varnamedatearr = "www_domai_net_app_dataarr"
const varnameiparr = "www_domai_net_app_iparr"
ตัวอย่างเช่นหากคุณต้องการเพิ่มทบทวนให้กับ list.asp และ search.asp คุณจะคัดลอกรหัสการโทรด้านบนไปยังสองหน้านี้หรือตรวจสอบให้แน่ใจว่ารหัสของทั้งสองหน้าสอดคล้องกัน เอฟเฟกต์คือถ้าคุณเยี่ยมชมหน้า list.asp คุณจะไม่สามารถเข้าถึง list.asp หรือ search.asp หน้าภายใน 2 วินาที
หากคุณต้องการให้สองหน้าเป็นอิสระนั่นคือหลังจากที่คุณเข้าถึง list.asp คุณจะไม่สามารถเข้าถึงรายการได้อีกครั้งภายใน 2 วินาที แต่คุณสามารถเข้าถึง Search.asp ได้ มิฉะนั้นคุณต้องตรวจสอบให้แน่ใจว่า const varnamedatearr = "xxx" ของทั้งสองหน้านั้นแตกต่างกัน ตัวอย่างเช่นอันแรกยังใช้ในการใช้ xxxlist และหน้าแรกใช้ XXXSearch,
ชอบ:
const varnamedatearr = "www_domai_net_app_dataarr_search" '(_list)
const varnameiparr = "www_domai_net_app_iparr_search" '(_list)
จู้จี้สิ่งเหล่านี้มีไว้สำหรับเพื่อนที่ไม่รู้จักมากนักเพื่อให้พวกเขาสามารถใช้รหัสเหล่านี้ได้ หากคุณเข้าใจ ASP ข้างต้นจะเข้าใจได้ง่ายสำหรับคุณ
ต่อไปนี้คือรหัสแหล่งไฟล์ antirefresh.asp
การคัดลอกรหัสมีดังนี้:
-
-
'* page anti-refresh module*
'* Wdfrog, 2007-8-16
-
ชั้นเรียน antirefresh
Iparr ส่วนตัว, Datearr
m_buffersize ส่วนตัว
m_cacheitemavailtime ส่วนตัว
คลาสย่อย class_initialize ()
Application.lock ()
m_buffersize = 100
m_cacheitemavailtime = 2
สิ้นสุดย่อย
คลาสย่อย class_terminate ()
application.unlock ()
สิ้นสุดย่อย
ทรัพย์สินสาธารณะรับ cacheitemavailtime
cacheitemavailtime = m_cacheitemavailtime
จุดสิ้นสุดของทรัพย์สิน
ทรัพย์สินสาธารณะให้ cacheitemavailtime (มูลค่า)
m_cacheitemavailtime = ค่า
จุดสิ้นสุดของทรัพย์สิน
ทรัพย์สินสาธารณะรับบัฟเฟอร์
บัฟเฟอร์ = m_buffersize
จุดสิ้นสุดของทรัพย์สิน
ทรัพย์สินสาธารณะให้บัฟเฟอร์ (มูลค่า)
m_buffersize = ค่า
จุดสิ้นสุดของทรัพย์สิน
ส่วนย่อยส่วนตัว ensurearr ()
ถ้า isarray (แอปพลิเคชัน (varnamedatearr)) แล้ว
Datearr = แอปพลิเคชัน (varnamedatearr)
อื่น
Redim Datearr (บัฟเฟอร์)
สิ้นสุดถ้า
ถ้า isarray (แอปพลิเคชัน (varnameiparr)) แล้ว
iparr = แอปพลิเคชัน (varnameiparr)
อื่น
Redim Iparr (บัฟเฟอร์)
สิ้นสุดถ้า
สิ้นสุดย่อย
ฟังก์ชั่นสาธารณะ isvalidaccess ()
dim ip, i
ip = getip ()
isvalidaccess = true