阅读量:0
在ASP文件中,要实现上传后自动重命名,你可以使用以下方法:
- 使用UUID(通用唯一标识符)生成新的文件名。这样可以确保文件名的唯一性,避免覆盖现有文件。
<% Dim newFileName, fileExtension, uuid newFileName = "" fileExtension = ".jpg" ' 你可以根据需要修改文件扩展名 uuid = CreateObject("Scriptlet.Util").NewGuid() newFileName = uuid & fileExtension %>
- 将新文件名与目标文件夹路径结合,生成完整的文件路径。
Dim targetFolderPath targetFolderPath = "C:\uploads\" ' 你可以将此路径更改为你的目标文件夹路径 fullPath = targetFolderPath & newFileName
- 检查目标文件夹是否存在,如果不存在则创建它。
On Error Resume Next Set objFolder = CreateObject("Scripting.FileSystemObject") objFolder.CreateDirectory targetFolderPath, True On Error Goto 0
- 将上传的文件保存到新的文件路径。
Dim fileInput, fileBytes, file Set fileInput = Request.Form("fileInput") ' 假设你的文件输入字段的名称为"fileInput" fileBytes = fileInput.BinaryContent Set file = Server.CreateObject("ADODB.Stream") file.Open file.Write fileBytes file.SaveToFile fullPath, 2 ' 2表示覆盖现有文件
- 如果需要,你还可以将新文件名添加到数据库中,以便在需要时检索或删除文件。
这样,当用户上传文件时,ASP脚本将自动生成一个新的唯一文件名,并将文件保存到指定的目标文件夹中。