แนะนำ: การแยกรหัสและหน้าใน ASP เพื่อหลีกเลี่ยงปัญหาการบำรุงรักษาที่เกิดจากการผสมโปรแกรม ASP และรหัส HTML บทความนี้แนะนำวิธีการใช้เทมเพลตเพื่อแยกโปรแกรมและหน้าเพื่อทำให้การเขียนโปรแกรมง่ายขึ้น เมื่อใช้ ASP เพื่อสร้างเว็บไซต์มักจะมีสถานการณ์ที่รหัสโปรแกรมและรหัส HTML ถูกผสมในไฟล์ ASP มีข้อเสียมากมายในการทำสิ่งนี้: 1 ไม่ต้องพูดถึงการเขียนโปรแกรมคุณต้อง
ฟังก์ชั่น: สร้างหมายเลขโทรศัพท์บนหน้าเป็นรูปแบบภาพ
-
โทร com_creatvalidcode (request.querystring (โทร))
Public Sub COM_CREATVALIDCODE (PTEL)
-
Response.exext = 0
Response.addheader Pragma ไม่มีแคช
response.addheader cache-ctrol, ไม่มีแคช
Response.contentType = image/bmp
สุ่ม
Dim I, II, III, RndColor, Strlen, SQL, RS
const codds = 5 - -
const str = 0123456789-
strlen = len (ptel)
rndColor = CHRB (CINT (RND*255)) & CHRB (CINT (RND*255)) & CHRB (CINT (RND*255))
-
Dim Vcolordata (1)
'VCOLORDATA (0) = CHRB (0) & ChRB (0) & ChRB (0)' ----- สีน้ำเงิน 0, สีเขียว 0, สีแดง 0 (สีดำ)
'VCOLORDATA (1) = CHRB (255) & CHRB (255) & CHRB (255) - -
'VCOLORDATA (0) = CHRB (197) & ChRB (106) & ChRB (49)' --- สีน้ำเงิน 0, สีเขียว 0, สีแดง 0 (สีดำ)
'VCOLORDATA (1) = CHRB (238) & ChRB (210) & CHRB (193)' ------- สีน้ำเงิน 250, สีเขียว 236, สีแดง 211 (สีฟ้าอ่อน)
VCOLORDATA (0) = CHRB (0) & ChRB (0) & CHRB (0) - -
VCOLORDATA (1) = CHRB (205) & CHRB (237) & CHRB (245) - -
-
สุ่ม
dim vcode ()
REDIM VCODE (Strlen-1)
สำหรับ i = 0 ถึง strlen-1
vCode (i) = instr (1, str, mid (ptel, i+1,1), 1) -1
ต่อไป
-
Dim Vnumberdata (11)
'Verdana Font
VnumberData (0) = 1111111111000111111111111111011110111101110111101111011101111111111111111111111111111
VnumberData (1) = 11111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111
VnumberData (2) = 111111111100011111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111
VnumberData (3) = 11111111110001111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111
VnumberData (4) = 11111111111111111111111111101111011110111011110111101111100001111111111111111011110111011110111110000111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111
VnumberData (5) = 111111111000001111111111111111111111111111111111111111111111111111111111111111111111
VnumberData (6) = 111111111100011111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111
VnumberData (7) = 111111111100000111011011111111111111111111111111111111111111111111111111111111111111
VnumberData (8) = 111111111100011111011111111111111111000111110111101111111111111111111111111111
VnumberData (9) = 11111111110001111101111111011110111101110111111111000111111111111111111101111011111111111000111111111111111111111111111111111111
VnumberData (10) = 11111111111111111111111111111111111111111111100111111111111111111111111111111111111
VnumberData (11) = 11111111111111111111111111111111111111111111111111111111111111111111111111111111
-
Response.binaryWrite Chrb (66) & Chrb (77) & Chrb (((strlen*8*10*3+54) mod 256)) & chrb (((strlen*8*10*3+54)/ 256) mod 256) & chrb ((((((((((((((((((((((((((((((((((((((" -
Chrb (0) & Chrb (0) & Chrb (54) & Chrb (0) & Chrb (0) & Chrb (0) & Chrb (40) & Chrb (0) & _
Chrb (0) & Chrb (0) & Chrb (strlen*8) & Chrb (0) & Chrb (0) & Chrb (0) & Chrb (0) & Chrb (10) & Chrb (0) & _
Chrb (0) & Chrb (0) & Chrb (1) & Chrb (0)
-
Response.binaryWrite Chrb (24) & Chrb (0) & Chrb (0) & Chrb (0) & Chrb (0) & Chrb (0) & Chrb (0) & Chrb (0) & _
Chrb ((strlen*8*10*3) mod 256) & chrb (((strlen*8*10*3)/256) mod 256) & chrb (((((((((((((((strlen*8*10*3)/256)/256) mod 256) & chrb ((((((((((((((((((((((((((((
Chrb (196) & Chrb (14) & Chrb (0) & Chrb (0) & Chrb (196) & Chrb (14) & Chrb (0) & Chrb (0) & _
Chrb (0) & Chrb (0) & Chrb (0) & Chrb (0) & Chrb (0) & Chrb (0) & Chrb (0) & Chrb (0) & Chrb (0) & Chrb (0)
สำหรับ i = 9 ถึง 0 ขั้นตอน -1 - -
สำหรับ ii = 0 ถึง strlen-1 '--------- หลังจากคำทั้งหมด
สำหรับ iii = 1 ถึง 8 '------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
- -
ถ้า rnd * 99 + 1 <codds แล้ว - -
Response.binaryWrite rndcolor
อื่น
Response.binaryWrite VCOLORDATA (MID (VNUMBERDATA (VCODE (II)), I * 8 + III, 1))
สิ้นสุดถ้า
ต่อไป
ต่อไป
ต่อไป
สิ้นสุดย่อย
-
บันทึกรหัสด้านบนเป็น img.asp และแทรก <img src = img.asp? tel = 0591-26728373> ที่ตำแหน่งที่จะแสดงหมายเลขโทรศัพท์
ที่มา: Muziwu ผู้แต่ง: Dnawo
แบ่งปัน: ASP Tutorial: เคล็ดลับสำหรับ ASP ในการสร้างพารามิเตอร์หลอก สองวันที่ผ่านมาฉันกำลังทำงานกับเครื่องมือค้นหาขององค์กรในสถานที่และพบว่าบางไซต์สามารถเชื่อมโยงไปยังเนื้อหาของไซต์ได้ - ฉันดูมันแปลก ๆ และพบว่ามันเชื่อมโยงตามกฎการกำหนดหมายเลขอัตโนมัติของ ID ฐานข้อมูล ~~ ฉันทำสิ่งต่อไปนี้ในเวลาว่างของฉันโดยหวังว่ามันจะเป็นประโยชน์กับทุกคนในการเขียนโปรแกรม ASP ในอนาคต! % '' // สร้างจำนวนตัวเลขสุ่มที่ระบุ '' // คุณยังสามารถใช้ GUID