ASP文件上傳后如何自動重命名

在ASP文件中，要實現上傳后自動重命名，你可以使用以下方法：

1. 使用UUID（通用唯一標識符）生成新的文件名。這樣可以確保文件名的唯一性，避免覆蓋現有文件。

<%
Dim newFileName, fileExtension, uuid
newFileName = ""
fileExtension = ".jpg" ' 你可以根據需要修改文件擴展名
uuid = CreateObject("Scriptlet.Util").NewGuid()
newFileName = uuid & fileExtension
%>

2. 將新文件名與目標文件夾路徑結合，生成完整的文件路徑。

Dim targetFolderPath
targetFolderPath = "C:\uploads\" ' 你可以將此路徑更改為你的目標文件夾路徑
fullPath = targetFolderPath & newFileName

3. 檢查目標文件夾是否存在，如果不存在則創建它。

On Error Resume Next
Set objFolder = CreateObject("Scripting.FileSystemObject")
objFolder.CreateDirectory targetFolderPath, True
On Error Goto 0

4. 將上傳的文件保存到新的文件路徑。

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表示覆蓋現有文件

5. 如果需要，你還可以將新文件名添加到數據庫中，以便在需要時檢索或刪除文件。

這樣，當用戶上傳文件時，ASP腳本將自動生成一個新的唯一文件名，并將文件保存到指定的目標文件夾中。