有谁能明白这段asp代码的意思?帮忙解释一下,谢谢. 有些明白的我已经解释

Question

Function GetCode()
Dim TestObj '定义变量
On Error Resume Next '错误则继续执行
Set TestObj = Server.CreateObject("Adodb.Stream")
Set TestObj = Nothing
If Err Then '如果有错误则执行下面
Dim TempNum '定义变量
Randomize timer '??是不是定义随机数rnd用的？
TempNum = cint(8999*Rnd+1000) '变量定义为1000-2000的整数
Session("GetCode") = TempNum '将该变量写入session
GetCode = Session("GetCode") '????
Else
GetCode = "<img src=""./include/GetCode.asp"">"
End If
End Function
哈哈，我自己突然明白了，是随机验证码，呵呵

Answer 1

如果发生错误，会将session中的验证码修改为随机产生的验证码，并且返回该验证码；如果没有错误，就返回GetCode.asp页面的图片。

Answer 2

嗯，确实是生成验证码用的
不过现在大多是图片验证码，纯数字的意义不大