มีเฉพาะ urlencode ใน ASP แต่ไม่มีวิธีแก้ปัญหา urldeCode หรือไม่?

บทความนี้ส่วนใหญ่แนะนำวิธีแก้ปัญหาของ urlencode เฉพาะใน ASP และไม่มี urldeCode?

มีเซิร์ฟเวอร์ฟังก์ชั่นระบบที่มีประโยชน์มาก URLENCODE เมื่อผ่านพารามิเตอร์ใน ASP ยังได้รับการจัดเตรียมไว้ แต่หลังจากใช้งานแล้วฉันพบว่าโปรแกรมรายงานข้อผิดพลาด จะทำอย่างไรทำด้วยตัวเอง

หลักการของ urlencode นั้นง่ายมากมันคือการแปลงอักขระพิเศษเป็นค่ารหัส hexadecimal ASC ดังนั้นฟังก์ชั่นการถอดรหัสเพียงแค่ต้องแปลง hexadecimal asc กลับไปที่อักขระที่เกี่ยวข้องและมันจะโอเค

1. ฟังก์ชั่นการถอดรหัส URL Functionurldecode (estr) '
2. สลัว
3. dimc, i, v
4. ทำลาย =
5. fori = 1tolen (enstr)
6. c = mid (enstr, i, 1)
7. IFC =%จากนั้น
8. v = eval
9. IFV <128 จากนั้น
10. Destr = Destr & Chr (V)
11. i = i+2
12. อื่น
13. ifisvalidhex (mid (enstr, i, 3)) จากนั้น
14. ifisvalidhex (mid (enstr, i+3,3)) จากนั้น
15. v = eval (& h+mid (enstr, i+1,2)+mid (estr, i+4,2)))
16. Destr = Destr & Chr (V)
17. i = i+5
18. อื่น
19. V = eval (& h+mid (enstr, i+1,2)+cstr (hex (asc (mid (estr, i+3,1)))))))))))))))))))))))))
20. Destr = Destr & Chr (V)
21. i = i+3
22. endif
23. อื่น
24. Dest = Dest & C
25. endif
26. endif
27. อื่น
28. IFC =+ดังนั้น
29. Destr = Destram &
30. อื่น
31. Dest = Dest & C
32. endif
33. endif
34. ต่อไป
35. urldeCode = dest
36. endfunction
38. functionisvalidhex (STR)
39. isvalidhex = true
40. str = ucase (str)
41. iflen (str) <> 3thenisvalidhex = false: exitfunction
42. ifleft (str, 1) <>%isvalidhex = false: exitfunction
43. c = mid (str, 2,1)
44. ifnot (((c> = 0) และ (c <= 9)) หรือ ((c> = a) และ (c <= z))) thenisvalidhex = false: exitfunction
45. c = mid (str, 3,1)
46. ifnot (((c> = 0) และ (c <= 9)) หรือ ((c> = a) และ (c <= z))) thenisvalidhex = false: exitfunction
47. endfunction

ไม่มีปัญหากับการใช้ ASP ในรูปแบบ GB312 หลังการทดสอบ