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>作者: SJPP 时间: 2010-3-11 16:05
我来自火星刚到地球什么都不懂