Cet article présente principalement la solution au problème de UrLencode unique
Il existe un serveur de fonctions système très utile. a également été fourni, mais après l'avoir utilisé, j'ai constaté que le programme a signalé une erreur. Que faire, faites-le vous-même.
Le principe d'Urlencode est en fait très simple.
- Fonction de décodage FURECTURLDECODE (ENSTR)
- divorce
- dimc, i, v
- destr =
- fori = 1Tolen (ENSTR)
- c = mid (Entr, i, 1)
- ifc =% alors
- v = eval (& h + mid (Entr, i + 1,2))
- ifv <128Then
- destr = destr & chr (v)
- i = i + 2
- autre
- ifisvalidhex (mid (entr, i, 3)) puis
- ifisvalidhex (mid (Entr, i + 3,3)) puis
- v = evale
- destr = destr & chr (v)
- i = i + 5
- autre
- v = eval (& h + mid (Entr, i + 1,2) + cstr (hex (asc (mid (Entr, i + 3,1))))))))))))
- destr = destr & chr (v)
- i = i + 3
- endire
- autre
- destr = destr & c
- endire
- endire
- autre
- ifc = + alors
- destr = destr &
- autre
- destr = destr & c
- endire
- endire
- suivant
- UrldeCode = destr
- finition de fin
- fonctionisvalidhex (str)
- isValidhex = true
- str = ucase (str)
- iflen (str) <> 3ThenisValidhex = false: exitfunction
- ifleft (str, 1) <>% thesvalidhex = false: exitfunction
- c = mid (str, 2,1)
- ifnot (((c> = 0) et (c <= 9)) ou ((c> = a) et (c <= z))) thesvalidhex = false: exitfunction
- c = mid (str, 3,1)
- ifnot (((c> = 0) et (c <= 9)) ou ((c> = a) et (c <= z))) thesvalidhex = false: exitfunction
- finition de fin
Il n'y a aucun problème à utiliser ASP au format GB312 après le test.