<% Function RndCode() '//////// 生成四位的随机数 Dim num Randomize num = int((9999-1000+1)*Rnd+1000) RndCode = num End Function session("lhSecurityCode") = RndCode() %>

 

 

后台管理入口
	登录窗口   用户名：   密　码：   附加码：