<!DOCTYPE html>
<html>
<body>
<%
Dim max,min
max=100
min=1
Randomize
response.write(Int((max-min+1)*Rnd+min))
%>
</body>
</html>