Simulare il lancio di un dado

Col seguente script è possibile simulare il lancio di un dado (lo script richiama delle immagini):

<%

randomize()

function dado()

intFaccia = cint ( ( 6 – 1 ) * rnd() + 1 )

dado = “<img src='” & intFaccia & “.gif’>”

end function

response.write dado()

%>