◆ [2017-12-17 星期日 2:11] ◆ 您来自:54.226.172.30,欢迎您访问風雲工作室。 收藏本站 ◆ | ◆ 设为首页
联系站长(腾讯QQ)
5029111 [風雲]
站长当前离线
首  页 论坛交流 游戏频道 无忧脚本 网络硬盘 网店精选 聊 天 室 自助链接 来访记录 访客留言 搜索提供
位置:風雲工作室 - 论坛交流 - 技术专栏 - 后台开发 - 【原创:Asp】風雲 ASP 组件|无组件上传 返回
主题:【原创:Asp】風雲 ASP 组件|无组件上传
Rimifon
★☆☆☆☆☆☆☆☆☆
积分:261
发帖:293
登录:2017/11/15
注册:2006/6/28
(1楼)【原创:Asp】風雲 ASP 组件|无组件上传
最后更新:2009-02-21 21:22

纯Javascript打造的ASP上传组件,支持多文件上传、进度条、数据库存放和文件系统存放

组件下载地址(为方便版本同步,未在此处上传附件):
http://www.fengyun.org/Down/FyUpload.sct(右键下载)

相关说明:
有组件上传方式请右键"FyUpload.sct"注册,然后可以使用:
    Server.CreateObject("Rimifon.Upload")
创建对象。
无组件上传方式请使用
    GetObject("script:" + 组件地址)
创建对象,组件地址为硬盘绝对路径,也可以使用http完整路径。
==============================================
属性和方法说明:
  设置页面字符编码:Upload.Charset = "UTF-8" //默认为gb2312编码。
  文件大小限制:Upload.MaxSize = 1024 * 512 //设置上传大小不超过 512 kb,参数为零时不限制上传文件大小(默认为 0)。
  文件类型限制:Upload.Filter = "rar|zip|txt|gif|jpg|bmp|htm|html|swf|mht"; //(默认值)设置允许上传的文档类型,不限制上传文件类型则使用空值。
  获得上传文件的客户端路径:Upload.Field.输入框名称.FilePath
  获得上传文件的文件名称:Upload.Field.输入框名称.SourceName
  获得上传文件后保存的文件名:Upload.Field.输入框名称.FileName
  获得上传文件的MimeType:Upload.Field.输入框名称.FileType
  获得上传文件实际大小:Upload.Field.输入框名称.FileSize
  获得上传文件被拒绝信息:Upload.Field.输入框名称.Message
  获得表单数据:Upload.Field.输入框名称.Value //如果是文件则返回文件的Unicode编码内容
  指定上传缓冲区大小并读取上传数据:Upload.ReadForm(缓冲大小[bytes], 参数二) //默认为全部缓冲,推荐在200k以下(可解决2003不能上传大文件的问题);提供参数二可为上传生成进度条的Application数据。
  保存文件到指定目录:Upload.SaveFile("保存目录") //默认为当前目录
  简化文本元素数据读取:Upload.Form(输入框名称); // 将Upload.Field.输入框名称.Value简化为习惯性的方法,并可解决vbs调用时“不存在属性”的错误。
==============================================

演示: http://www.fengyun.org/Test/NetDisk

简要代码示例:
Set Upload = Server.CreateObject("Rimifon.Upload")
Upload.ReadForm 204800
'存放文件系统:
Upload.SaveFile "Upload"
'存放数据库:
'Rs(0).AppendChunk Upload.Form("file1")
Upload.Dispose
Set Upload = Nothing

更新记录:
        [06-07-31] 将Upload.Field["Test"].Value简化为Upload.Form("Test")
        [06-08-01] 修改Upload.Form方法,如果是文件则返回Upload.Field["Test"]对象
        [06-08-02] 修改Upload.Form方法,后面不加属性则返回Value值
        [06-08-10] 指定了注册时的clsid,以便能生成正确的“通用类型库”
        [06-08-23] 修正了vbs不能枚举表单元素的Bug


时间:2006年8月29日 8:10:47 IP:已记录 引用 回复

© Copyright 2006-2017,風雲工作室 All rights reserved.
湘ICP备05009306号QQ登录
操作 1 个库,连接 2 次,执行 7 次,耗时 203 毫秒。