ASP บังคับให้รีเฟรชหน้าเว็บและตัดสินรหัสอินสแตนซ์ไฟล์

บทความนี้ส่วนใหญ่แนะนำ ASP บังคับให้รีเฟรชของหน้าเว็บและการตัดสินรหัสที่อยู่ไฟล์

บังคับให้รีเฟรชของหน้าเว็บ

1. %
2. 'การรีเฟรชบังคับของรหัสการตรวจสอบแบบสุ่ม
3. 'ให้รหัสการตรวจสอบแบบสุ่มจะได้รับการรีเฟรชโดยอัตโนมัติทุกครั้งที่ปุ่มย้อนกลับของ IE ถูกกด
4. Response.expires = -1
5. Response.addheaderPragma ไม่มีแคช
6. Response.addheaderCache-Control ไม่มีร้านค้า
7. %

ตรวจสอบว่าที่อยู่ไฟล์นั้นถูกต้องหรือไม่

1. %
2. Response.write ()
3. onerrorresumenext
4. dimthisurl, thistext
5. thisurl = คำขอ (thisurl) 'กำหนดที่อยู่ไฟล์ (เอกสารรูปแบบที่ไม่ใช่ HTML)!
6. ifthisurl = จากนั้น
7. Response.write (โปรดป้อนที่อยู่ไฟล์ก่อน!)
8. Response.end
9. endif
10. functionObjxmlhttp (xmlurl)
11. onerrorresumenext
12. setObjxml = createObject (microsoft.xmlhttp)
13. objxml.openget, xmlurl, false
14. objxml.setrequestheadercontent-type, แอปพลิเคชัน/x-www-form-urlencoded
15. objxml.send
16. objxmlhttp = objxml.responsebody
17. Iferrthen
18. err.lear
19. Response.write (ไม่สามารถสร้างการเชื่อมต่อไฟล์ไม่มีอยู่หรือมีปัญหาเครือข่าย!; เหตุผลข้อผิดพลาด: & err.description &!)
20. Response.end
21. endif
22. endfunction
23. FunctionByTes2BSTR (VIN)
24. strreturn =
25. fori = 1tolenb (vin)
26. thischArcode = ascb (midb (vin, i, 1))
27. ifthisCharcode <& h80 จากนั้น
28. strreturn = Strreturn & Chr (ThisCharcode)
29. อื่น
30. NextCharcode = ASCB (MIDB (VIN, I+1,1)))
31. strreturn = strreturn & chr (clng (thischarcode)*& h100+cint (nextcharcode))
32. i = i+1
33. endif
34. ต่อไป
35. bytes2bstr = streturn
36. endfunction
37. thisurl2 = split (thisurl ,,)
38. foreachiiinthisurl2
39. thistext = bytes2bstr (objxmlhttp (ii))
40. ifinstr (thistext,) <> 0 แล้ว
41. Response.write (& II & ×
42. -
43. อื่น
44. Response.write (& II & √
45. -
46. endif
47. ต่อไป
48. Iferrthen
49. err.lear
50. Response.write (ฉันพบอุบัติเหตุ!; เหตุผลข้อผิดพลาด: & err.description &!)
51. Response.end
52. endif
53. %

ข้างต้นเป็นรหัสสำหรับการบังคับให้รีเฟรชหน้าเว็บและการตัดสินที่อยู่ไฟล์