Randomly generated filename.

J1C · Oct 19, 2005

How could I create a random filename for a single-use download? So, if
a user was to download a file from a site it would send them a unique
filename that could only be used once. That link would not be available
after the download completed.

CJM · Oct 19, 2005

J1C said:
How could I create a random filename for a single-use download? So, if
a user was to download a file from a site it would send them a unique
filename that could only be used once. That link would not be available
after the download completed.

There are plenty of pseudo-random name generators out there. If you
absolutely MUST provide a globally unique name then either record each name
given and check for duplicates or simply use a GUID as a filename.

ljb · Oct 19, 2005

J1C said:
How could I create a random filename for a single-use download? So, if
a user was to download a file from a site it would send them a unique
filename that could only be used once. That link would not be available
after the download completed.

I think the following generates unique names. It might work for you.

MyFile = CreateObject("Scripting.FileSystemObject").GetTempName

McKirahan · Oct 19, 2005

J1C said:
How could I create a random filename for a single-use download? So, if
a user was to download a file from a site it would send them a unique
filename that could only be used once. That link would not be available
after the download completed.

Will this help? Watch for word-wrap.

This copies the file to be downloaded (once) to a unique, temporary
filename then displays a link to it which, when clicked, downloads
the file and deletes the temporary filename.

<%@ Language="VBScript" %>
<% Option Explicit
'*
Const cASP = "TempFile.asp"
Const cTMP = "TempFile.zip"
'*
Dim strGTN
Dim strRQS
strRQS = Request.QueryString()
Dim strRSV
strRSV = Request.ServerVariables("HTTP_HOST")
'*
Dim objFSO
Set objFSO = Server.CreateObject("Scripting.FileSystemObject")
If strRQS = "" Then
strGTN = objFSO.GetTempName()
objFSO.CopyFile Server.MapPath(cTMP), Server.MapPath(strGTN)
Else
If strRSV <> "localhost" Then
Server.Execute strRQS
End If
objFSO.DeleteFile Server.MapPath(strRQS)
Response.End
End If
Set objFSO = Nothing
%>
<html>
<head>
<title><%=cASP%></title>
</head>
<body>
Click to download: <a href="<%=cASP%>?<%=strGTN%>"><%=strGTN%></a>
</body>
</html>

McKirahan · Oct 19, 2005

McKirahan said:
J1C said:

How could I create a random filename for a single-use download? So, if
a user was to download a file from a site it would send them a unique
filename that could only be used once. That link would not be available
after the download completed.

Click to expand...

[snip]

Const cTMP = "TempFile.zip"

Unfortunately, depending on the file extension,
this may bring up the Download dialog.

If the file extension is ".txt" or ".pdf" it opens the file.

Terren · Oct 20, 2005

Why don't you just use the current date prefix by some random letters.
e.g
abc-yyyy-mm-dd-mm-ss-millisecond.fileExtension. This would almost
certainly guarantee uniquiness unless you had a million people
downloading the file at the exact same time with the exact same
regional settings.

Evertjan. · Oct 20, 2005

Terren wrote on 20 okt 2005 in microsoft.public.inetserver.asp.general:

Why don't you just use the current date prefix by some random letters.
e.g
abc-yyyy-mm-dd-mm-ss-millisecond.fileExtension. This would almost
certainly guarantee uniquiness unless you had a million people
downloading the file at the exact same time with the exact same
regional settings.

The easiest uniqueness is just a counter number, though it is not random.

Use a database to get the autonumbered next record and delete the record
after use or timeout.

I bet you will just have 5 or 10 records active.

file = "myTempfile" & mdata("autoID") & ".ext"

You could even store the ip-number of the request as extra measure.

J1C · Oct 20, 2005

That's exactly what I was looking for! Thanks!

Digital Signature field form in PDF generated document from HTML	5	Nov 16, 2022
Remove listing after being entered	8	Dec 21, 2022
A website that I couldn't make a screenshot of it nor save any page from.	1	Oct 29, 2023
(discord.py) 'async_generator' has no attribute 'flatten'	1	Jul 7, 2023
IIS Randomly Hanging	2	Apr 9, 2010
Range / empty list issues??	1	Dec 11, 2023
TF-IDF	1	Aug 19, 2021
Preserving unicode filename encoding	1	Oct 20, 2012

Randomly generated filename.

J1C

CJM

ljb

McKirahan

McKirahan

Terren

Evertjan.

J1C

Ask a Question

Similar Threads

Members online

Forum statistics

Latest Threads