上传表单元素的属性如表8-5所示。
表8-5 上传表单元素的属性
清单8-3 8-3.asp 上传文件表单
<html>
<head>
<title> 上传一个文件示例</title>
</head>
<body>
<H2>上传一个文件</H2>
<center>
<form action='8-4.asp' method='post'enctype='multipart/form-data' >
选择文件:<input type='file'><br>
文件说明:<input type='text'size='30'><br>
作者姓名:<input type='text'size='30'><br>
<input type='submit' value=' 确定 '>
</form>
</center>
</body>
</html>
清单8-4 8-4.asp 上传文件执行程序
<% Option Explicit %>
<html>
<head>
<title>上传一个文件示例</title>
</head>
<body>
<H2>文件已安全上传</H2>
<center>
<%
Dim Upload '声明一个变量
Set Upload = Server.CreateObject('Persits.Upload.1')'创建一个文件上传组件实例
Upload.SetMaxSize 2*1024*1024,False '限制文件不超过2M,否则截断
Upload.OverwriteFiles=True 'True表示可以覆盖
Upload.Save 'C:\inetpub\root\asptemp\chapter8\upload''上传到指定文件夹
Response.Write '上传文件为:' & Upload.Files('upfile').Path &'<BR>'
Response.Write '文件大小为:' & Upload.Files('upfile').Size &'字节<BR>'
Response.Write '文件说明为:' & Upload.Form('intro').value &'<BR>'
Response.Write '作者姓名为:' & Upload.Form('author').value &'<BR>'
%>
</center>
</body>
</html>
程序说明:
1)注意8-3.asp中FORM表单的写法:<form action='8-4.asp' method='post'enctype='multipart/form-data'>,这里一定要写成enctype='multipart/form-data'。
2)还要注意,选择文件用的是FORM表单的选择文件元素:<input type='file'>
3)关于限制文件大小,Upload.SetMaxSize 2*1024*1024,False表示限制文件大小为2MB;False表示如果文件超过2MB,则自动截断为2MB大小;如果改为True,则不自动截断,程序将报错误信息。
本文来自电脑杂谈,转载请注明本文网址:
http://www.pc-fly.com/a/jisuanjixue/article-52796-1.html
然后苏联海军菜打出我舰奉命撞击你舰的警告之后才撞击的