27411 total geeks with 3535 solutions
Recent challengers:
 Welcome, you are an anonymous user! [register] [login] Get a yourname@osix.net email address 

Articles

GEEK

User's box
Username:
Password:

Forgot password?
New account

Shoutbox
MaxMouse
It's Friday... That's good enough for me!
CodeX
non stop lolz here but thats soon to end thanks to uni, surely the rest of the world is going good?
stabat
how things are going guys? Here... boring...
CodeX
I must be going wrong on the password lengths then, as long as it was done on ECB
MaxMouse
lol... the key is in hex (MD5: of the string "doit" without the "'s) and is in lower case. Maybe i should have submitted this as a challenge!

Donate
Donate and help us fund new challenges
Donate!
Due Date: Mar 31
March Goal: $35.00
Gross: $0.00
Net Balance: $0.00
Left to go: $35.00
Contributors


News Feeds
The Register
Boffins say Mars
had ocean covering
20 per cent of
planet
GoPro cameras" WiFi
security is
GoAmateur
Shove off, ugly
folk, says site for
people who love
themselves
Tired of IoT hype?
Internet of SLUGS
and SPIDERS is the
reality
Microsoft fluffs
Azure cloud with
search, data
storage, faster
compute
Gigantic gravitic
lens flare shows
boffins a cruciform
supernova
I see what you"ve
done, there,
twiiter.com: Tweet
troops tackle tech
twin
Adobe launches
cashless bug bounty
Australia"s new
broadband
satellites won"t be
all the help
Willowra needs
US Senators hope to
crack down on the
trade of private
information
Slashdot
How Activists Tried
To Destroy GPS With
Axes
Robocops Being Used
As Traffic Police
In Democratic
Republic of Congo
Hubble Discovers
Quadruple Lensed
Ancient Supernova
Musician Releases
Album of Music To
Code By
Apple, Google,
Bringing Low-Pay
Support Employees
In-House
First Fully Digital
Radio Transmitter
Built Purely From
Microprocessor Tech
Harrison Ford"s
Plane Crashes On
Golf Course
Anthem Blocking
Federal Auditor
From Doing
Vulnerability Scans
Red Hat Strips Down
For Docker
Ask Slashdot:
Should I Let My
Kids Become
American Citizens?
Article viewer

ASP Function to Produce a random IDs



Written by:dimport
Published by:dimport
Published on:2003-06-21 07:19:46
Topic:ASP
Search OSI about ASP.More articles by dimport.
 viewed 8046 times send this article printer friendly

Digg this!
    Rate this article :
This nice little function will return a nice little random string which I use to create ID's for ALL my projects, in any language (just got to edit it). In all the time I have used this sub it has NEVER created the same string twice, and if your not happy with it, just call it twice and then it will half the chances again :D


 
'==============================
'============= CODE ============
'==============================

<%
Function Cript()

    Dim strLetters, g, i

    strLetters = "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ"
    Randomize Timer
        i = Int(Rnd * 62) + 1
        g = Mid(strLetters, i, 1)
    Cript = Int(Rnd * 999999) + 1 & g

End Function
%>

'==============================
'============= END ============
'==============================

How To Use IT :
 
<% @LANGUAGE=VBScript %>
<% Option Explicit %>
<!-- #Include file="Functions.asp" -->
<%
Dim Cript_String

Cript_String = Cript

Response.Write(Cript_String)

%>


This article was originally written by Cadey

Did you like this article? There are hundreds more.

Comments:
<none>
Anonymously add a comment: (or register here)
(registration is really fast and we send you no spam)
BB Code is enabled.
Captcha Number:



     
Your Ad Here
 
Copyright Open Source Institute, 2006