'======================================================
'. urencoding
'转换编码 ： ：
'======================================================
FunctionUrlenCoding (Datatatest)
Dimstrreturn, SI, Thischr, InnerCode, Hight8, Low8
strreturn = "
forsi = 1tolen (Dest)
theychr = mid (datust, si, 1)
ifabs (asc (thischr)) <& hffthen
strreturn = strreturn & thischr
또 다른
InnerCode = ASC (thischr)
ifinercode <0then
InnerCode = InnerCode+& H1
endif
Hight8 = (내부 및 HFF00)/& HFF
LOW8 = 내부 코드 및 HFF
strreturn = strreturn & "%"& hex (hight8) & "& hex (low8)
endif
다음
urlencoding = strreturn
최종 기능 장애