fileupload.asp

来自「实验教学系统 很好用 有学生 老师 管理等模块 便于学校使用」· ASP 代码 · 共 20 行

ASP
20
字号
<HTML>  <BODY> 
<%
	set obj = Server.CreateObject("LyfUpload.UploadFile")
	txt = obj.Request("text1")  '得到form元素的值
	Response.Write( "文本框的输入值是: " + txt) 
	Response.Write("<br>")
	'保存文件到ASP所在路径的Files目录下,file1为Form表单中文件框的名字
	strFileName = obj.SaveFile("file1", Server.MapPath("Files"),true)
	'得到文件类型
	strFileType = obj.FileType("file1")
	If strFileName <> "" Then
		Response.Write("选择的文件已经上载到服务器!")
		Response.Write("<br>文件名:" & strFileName) 
		Response.Write("<br>文件类型:" & strFileType)
		Response.Write("<br>文件大小:" & obj.FileSize)
		'Response.Write( obj.About())
	End If
%>
</BODY >  </HTML>

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?