Linux中国  设为主页
 收藏本站
 
当前位置: > 首页 ->编程语言 ->ASP ->ASP无组件上载,带进度条,多文件上载。。
  相关分类: 
ASP
ViualBasic
UML / Rational Rose
PHP4/PHP5
Perl
JAVA/JSP教程
Delphi
ColdFusion
CGI
C/C++
ASP.NET
XML
  站内搜索: 
热门文章排行
热门文章排行 ADO连接数据库字符串大全(04-23)
Asp教程:Response对象(04-23)
网站安全之ASP程序加密/解密方法大揭(04-23)
ASP函数库(05-31)
基于ASP的站内多值搜索(04-24)
精采文章排行
精采文章排行 从本质上看网页(asp,jsp)的编写(06-01)
学以致用 驳“ASP低能论” (06-01)
用VB构建Internet的应用(06-01)
Asp的安全管理(12)(06-01)
Windows 2000 安全性技术概述--3(06-01)
  ·学以致用 驳“ASP低能论” ·用VB构建Internet的应用·Asp的安全管理(12)·Windows 2000 安全性技术概述--3·Windows 2000 安全性技术概述--2·Windows 2000 安全性技术概述--1·ActiveX技术综述(二) ·ActiveX技术综述(一) ·动态网页技术--CGI:ASP:JSP:PHP(4)

ASP无组件上载,带进度条,多文件上载。。

作者:Webmaster   来源:Linuxdby.com   点击:   日期:2007-04-23 [收藏] [投稿]

  IE是否经常中毒?推荐您

各种ASP无组件上载,带进度条的实在太多,用起来也不方便,今天自己写了一个,希望大家给点意见

页面都是UTF-8 编码的,用的时候可根据自己页面编码转换

核心编码:SundyUpload.asp
例子:Example.asp

SundyUpload.asp代码如下:

<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />

<%
Dim SundyUpload_SourceData
Class SundyUpload
  
Dim objForm,objFile,Version,objProgress
    
Dim xmlPath,CharsetEncoding
  
Public Function Form(strForm)
    strForm
=lcase(strForm)
    
If NOT objForm.exists(strForm) Then
      Form
=""
    
Else
      Form
=objForm(strForm)
    
End If

  
End Function

  
Public Function File(strFile)
    strFile
=lcase(strFile)
    
If NOT objFile.exists(strFile) Then

      
Set File=new

 如果您对本文有任何疑问或者建议,请到讨论区发表您的意见: >> 论坛入口 <<

上一页12 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 下一页

上一篇:支持多风格变换的ASP分页类   下一篇:安装JDK 就可同时运行PHP和Java?
文章评论】 【收藏本文】 【推荐好友】 【打印本文】 【我要投稿】 【论坛讨论

   相关文章:
·从本质上看网页(asp,jsp)的编写

   文章评论:(1条)
  
 请留名: 匿名评论   点击查看所有评论 论坛讨论
 

 声明:刊登此文章是为了传递更多信息,文章内容仅供参考,转载请注明出处。