常用到的一些ASPUPLOAD组件的操作

1、Err.Number为8时表示:文件大小超过MaxSize。

2、读取表单内容时可直接使用obj.Form("item")来读取。

3、读取上传文件时 需要Set file1=obj.Files("file1"),然后针对file1来读取各属性的值。

4、相对文件的各属性值如下:
    FileName   文件名(无路径)
    Ext   文件扩展名(有大小写)
    Path   完整的文件绝对路径
    Folder   上传到主机上的绝对路径(后面有/)
    Size   文件大小(Byte)
    ImageType   图片类型(BMP GIF JPG JPEG PNG可以自动辨别)
    ImageWidth   图片高度
    ImageHeight   图片的高度

5、AspUpload上传的判断代码:

Set oUpload = Server.CreateObject("Persits.Upload")   '创建一个Object
On Error Resume Next   '用于读出错误代码
oUpload.SetMaxSize 1048576, True   '设置一个文件最大值
UpCount = oUpload.Save(Server.MapPath("./"))   '上传文件并返回文件的数量
'判断文件大小是否超过限制
If Err.Number = 8 Then
   Response.Write "文件超过指定大小"
   Set oUpload = Nothing
   Response.End
End If
'判断文件是否上传
If UpCount = 0 Then
   Response.Write "没有选择要上传的文件"
   Set oUpload = Nothing
   Response.End
End If
'指定文件的连接
Set file1=oUpload.Files("file1")
'把上传的文件拷贝到temp文件夹下并改名为temp.jpg
file1.Copy Server.MapPath("temp/temp.jpg")
'把上传的文件移动到temp2文件夹下并改名为temp2.jpg
file1.Move Server.MapPath("temp2/temp2.jpg")
'删除文件
file1.Delete

From:http://hi.baidu.com/joyjx/blog/item/ee0d3773d6f4b21d8601b066.html

版权声明:
作者:Kiyo
链接:https://www.wkiyo.cn/html/2008-01/i484.html
来源:Kiyo's space
文章版权归作者所有,未经允许请勿转载。

THE END
分享
二维码
< <上一篇
下一篇>>