在ASP文件中，要实现上传后自动重命名，你可以使用以下方法：
<%
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脚本将自动生成一个新的唯一文件名，并将文件保存到指定的目标文件夹中。
