26951 total geeks with 3513 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: Jul 31
July Goal: $40.00
Gross: $0.00
Net Balance: $0.00
Left to go: $40.00
Contributors


News Feeds
The Register
Watching smut at
work is bad but
emailing it is just
fine says Oz court
Fortinet fawns over
fast-if-unfashionab
le ASIC
eBay impulse buyers
STAY AWAY: Holy
Grail Superman
comic book to fetch
$2m+
SMELL YOU LATER,
LOSERS ? Dumbo
tells rats, dogs...
humans
The answer to
faster wireless is
blowing in the wind
World Solar
Challenge contender
claims new speed
record
Mozilla patches
security bugs in
Firefox
Researcher sat on
critical IE bugs
for THREE YEARS
Bad back? Show some
spine and stop
popping paracetamol
Microsoft confirms
secret Surface will
never see the light
of day
Slashdot
The Psychology of
Phishing
Dropbox Head
Responds To Snowden
Claims About
Privacy
Verizon"s Offer:
Let Us Track You,
Get Free Stuff
Microsoft"s CEO
Says He Wants to
Unify Windows
Raspberry Pi
Gameboy
VP Biden Briefs US
Governors On H-1B
Visas, IT, and
Coding
Finding Life In
Space By Looking
For
Extraterrestrial
Pollution
The Secret
Government Rulebook
For Labeling You a
Terrorist
"Just Let Me Code!"
Intel Launches
Self-Encrypting SSD
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 7783 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