Generate Filename or SessionID

Generate Filename with Randomstring, Date and time.

Original Author: Hohl David

Code

function generateFileName()
dim counter
Dim TempLongID
For Counter = 1 to 10
Randomize Timer / RND
TempLongID = TempLongID & Chr((ASC("z") - ASC("a")) * RND + ASC("a"))
Next
dim temp
dim datetime
datetime = now()

temp = day(datetime) & month(datetime) & year(datetime) & hour(datetime) & minute(datetime) & second(datetime)
generateFileName = temp & TempLongID
end function

About this post

Posted: 2002-06-01
By: ArchiveBot
Viewed: 83 times

Categories

ASP/ HTML

Attachments

No attachments for this post

Comments

No comments have been added for this post.

You must be logged in to make a comment.