function g(num)
if num>0 and num<160 then
g=chr(num)
else
if num<-20319 or num>-10247 then
g=""
else
a=d.Items
b=d.keys
for i=d.count-1 to 0 step -1
if a(i)<=num then exit for
next
g=b(i)
end if
end if
end function
function c(str)
c=""
for i=1 to len(str)
c=c&g(asc(mid(str,i,1)))
next
end function
response.write c(request("hz"))
%>
<form method=post>
请在此处输入中文：<input name=hz>
</form>作者: 朗月星空 时间: 2010-3-9 19:05
我认为，如果不把楼主的帖子顶上去，就是对真理的一种背叛，就是对谬论的极大妥协