securetrans.aspx

来自「www.gsmlanka.com is a website for tradin」· ASPX 代码 · 共 20 行

<script runat="server">
 Function getsecCode(ByVal minVAL As integer, ByVal MaxVal As integer)

        Dim secCode  As Random
        Dim intRandomNumber As integer

      'Create and init the randon number generator
        secCode  = New Random

        'Get the next random number
        intRandomNumber = secCode.Next(minVAL, MaxVal + 1)

        'Return the random # as the function's return value
        getsecCode = intRandomNumber

    End Function



</script>