⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 filename_upload.asp

📁 aspupload
💻 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 + -