verifycode.asp

来自「简单的企业人事工资管理系统,已经修正bug和简单化美观化, 适合于管理等学」· ASP 代码 · 共 10 行

<%  dim num1
	dim rndnum
	Randomize
	Do While Len(rndnum)<4
	num1=CStr(Chr((57-48)*rnd+48))
	rndnum=rndnum&num1
	loop
	session("verifycode")=rndnum 
%>
<%= session("verifycode")%>