function unscrenc(str)
str=split(str,"\")
for i=0 to ubound(str)
response.Write(str(i)&"<br>")
ac=chr(cint(str(i))) <----------总是提示这一行出错!!!
seed=seed&ac
next
unscrenc=seed
end function
function unscrenc(str) str=split(str,"\") for i=0 to ubound(str) response.Write(str(i)&"") ac=chr(cint(str(i))) <----------总是提示这一行出错!!! seed=seed&ac next unscrenc=seed end function str="50\100\94\95\" unscrenc(str)