<%Response.Expires= -1 Response.ExpiresAbsolute = Now() - 1 response.CacheControl="no-cache" session.Timeout=600 %> <% if session("m_user")<>"" and session("m_pwd")<>"" then response.Redirect "/download/" end if %> 用户登陆
学员登陆
用户名:
密 码:
验证码: <% session("m_rnd")="" Randomize n=Int((9999-1+1) * Rnd +1) if len(n)<4 then str=n for i=1 to 4-(len(n)) str=0&str next else str=CStr(n) end if session("m_rnd")=str response.Write str %>