📄 filename_upload.asp
字号:
<!-- AspUpload Code samples: filename_upload.asp -->
<!-- Invoked by filename.asp -->
<!-- Copyright (c) 2001 Persits Software, Inc. -->
<!-- http://www.persits.com -->
<HTML>
<BODY>
<%
Set Upload = Server.CreateObject("Persits.Upload")
' we use memory uploads, so we must limit file size
Upload.SetMaxSize 100000, True
' Save to memory. Path parameter is omitted
Upload.Save
' Check whether a file was selected
Set File = Upload.Files("FILE1")
If Not File Is Nothing Then
' Obtain file name
Filename = file.Filename
' check if file exists in c:\upload under this name
If Upload.FileExists("c:\upload\" & filename ) Then
Response.Write "File with this name already exists."
Else
' otherwise save file
File.SaveAs "c:\upload\" & File.Filename
Response.Write "File saved as " & File.Path
End If
Else ' file not selected
Response.Write "File not selected."
End If
%>
</BODY>
</HTML>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -