Viewing source for recipe1608vb.aspx
<%@ Page %>
<script language="vb" runat="server">
Sub Page_Load(sender As Object, e As EventArgs)
Dim randomInt As Integer
Dim randomDouble As Double
Dim myRandom As New Random()
randomInt=myRandom.Next(100)
randomDouble=myRandom.NextDouble()*100
Response.Write(randomInt.ToString() & "<BR>")
Response.Write(randomDouble.ToString())
End Sub
</script>
<html>
<body>
<form id="form1" method="post" runat="server">
</form>
</body>
</html>