27157 total geeks with 3531 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: Nov 30
November Goal: $40.00
Gross: $0.00
Net Balance: $0.00
Left to go: $40.00
Contributors


News Feeds
The Register
George.Best walks
into a sex.bar,
spots a bearded
dwarf sysadmin and
thinks:
Warcraft
Hey, it"s ... Gecko
man, Gecko man,
does almost
whatever a GECKO
can
Useless computer
engineer Barbie
sacked after
three-way fscking
Young Germans:
PLEASE! ANYTHING
BUT a digital
STARTUP
PayPal takes 18
months to patch
critical remote
code execution hole
Hunt for Higgs
Boson and dark
matter now starts
ON YOUR SOFA
The IT Crowd"s
internet in a box
gets $240k of
crowdcash for a
cause
GCHQ and Cable and
Wireless teamed as
Masters of the
Internet?
Where the HELL is
that Comcast
technician? Finally
? an app for that
Google releases
"Divide" to conquer
mobile devices,
messaging
Slashdot
Russia May Be
Planning National
Space Station To
Replace ISS
The Man Who Made
Tetris
Greenwald Advises
Market-Based
Solution To Mass
Surveillance
Harvard Students
Move Fossil Fuel
Stock Fight To
Court
The Nintendo DS
Turns 10
Customers Creating
Fake Amazon Pages
To Get Cheap
Electronics At
Walmart
UNSW Has Collected
an Estimated
$100,000 In Piracy
Fines Since 2008
Google Announces
Image Recognition
Advance
Tracking a Bitcoin
Thief, Part II:
Illustrating the
Issue of Trust In
Altcoins
Intel Planning
Thumb-Sized PCs For
Next Year
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 7925 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