Es gibt nur Urlencode in ASP, aber keine Lösung für das Urldecode -Problem?

In diesem Artikel wird hauptsächlich die Lösung für das Problem von nur Urlencode in ASP und ohne Urldecode vorgestellt.

Es gibt einen sehr nützlichen Systemfunktionserver wurde ebenfalls zur Verfügung gestellt, aber nachdem ich es verwendet hatte, stellte ich fest, dass das Programm einen Fehler meldete. Was zu tun ist, mach es selbst.

Das Prinzip der Urlencode ist eigentlich sehr einfach.

1. FunctionUrldecode (ENSTR) 'URL -Decodierungsfunktion
2. Dimdestern
3. Dimc, i, v
4. Zerstörung =
5. fei = 1tolen (enstr)
6. C = MID (ENSTR, I, 1)
7. Ifc =%dann
8. v = Eval (& H+Mid (ENSTR, I+1,2))
9. IFV <128Then
10. Zerstörungen = Zerstörungen & chrt (v)
11. i = i+2
12. anders
13. ifisvalidhex (MID (ENSTR, I, 3)) dann
14. ifisvalidhex (MID (ENSTR, I+3,3)) dann
15. v = eval (& h+mid (ENSTR, I+1,2)+MID (ENSTR, I+4,2))
16. Zerstörungen = Zerstörungen & chrt (v)
17. i = i+5
18. anders
19. v = eval (& h+mid (enstr, i+1,2)+cstr (hex (ASC (MID (ENSTR, I+3,1)))))))))))
20. Zerstörungen = Zerstörungen & chrt (v)
21. i = i+3
22. Endif
23. anders
24. Zerstörungen = Zerstörungen & c
25. Endif
26. Endif
27. anders
28. ifc =+dann
29. Zerstörung = Zerstörungen &
30. anders
31. Zerstörungen = Zerstörungen & c
32. Endif
33. Endif
34. nächste
35. URLDECODE = Zerstörungen
36. Endfunktion
38. functionisvalidhex (STR)
39. isvalidhex = true
40. STR = UCase (str)
41. iflen (str) <> 3Thenisvalidhex = false: exitFunction
42. ifeft (str, 1) <>%thenisvalidhex = false: exitFunction
43. C = MID (STR, 2,1)
44. ifnot (((c> = 0) und (c <= 9)) oder ((c> = a) und (c <= z)) thenisvalidhex = false: exitFunction
45. C = MID (STR, 3,1)
46. ifnot (((c> = 0) und (c <= 9)) oder ((c> = a) und (c <= z)) thenisvalidhex = false: exitFunction
47. Endfunktion

Bei der Verwendung von ASP im GB312 -Format nach dem Test gibt es kein Problem.