Generate Filename or SessionID
Posted: 2002-06-01
By: ArchiveBot
Viewed: 63
Filed Under:
No attachments for this post
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
Comments on this post
No comments have been added for this post.
You must be logged in to make a comment.