6行代码实现无组件上传

2016-01-29 18:43 36 1 收藏

6行代码实现无组件上传,6行代码实现无组件上传

【 tulaoshi.com - ASP 】

 

stimson(原作)

(本文来源于图老师网站,更多请访问http://www.tulaoshi.com/asp/)

目前有很多无组件上传类,我大概看了一下,大多写的相当复杂,有的居然还只能传文本最关键的是没有10行代码以下的 :)我花了一个晚上时间研究了一下ADODB.Stream,并且用了6行代码实现了无组件上传:

strFileName = Request.QueryString("file1")
Set objStream = Server.CreateObject("ADODB.Stream")
objStream.Type = 1 ' adTypeBinary
objStream.Open
objStream.LoadFromFile strFileName
objStream.SaveToFile Server."123_onweb.gif",2


使用方法:
把上面的代码写成upload.asp
在浏览器里面输入:
http://XXX/upload.asp?file1=c:上传文件123.gif
XXX为你的主机地址
执行完后你会看到你的目录下面多了一个123_onweb.gif
他就是你要文件拉!!!!


根据原理我们可以扩展以下代码:
upload.asp文件
<%
Function GetFileName(ByVal strFile)
  If strFile < "" Then
   GetFileName = mid(strFile,InStrRev(strFile, "")+1)
  Else
   GetFileName = ""
  End If
End  function

strFileName = Request.Form("file1")
Set objStream = Server.CreateObject("ADODB.Stream")
objStream.Type = 1 ' adTypeBinary
objStream.Open
objStream.LoadFromFile strFileName
objStream.SaveToFile Server.MapPath(GetFileName(strFileName)),2
objStream.Close
%

upload.htm文件
<form name="FORM" action="upload.asp" method="post"
  <input type="submit" name="submit" value="OK"
     <input type="file" name="file1" style="width:400"  value=""
</form

(本文来源于图老师网站,更多请访问http://www.tulaoshi.com/asp/) 

来源:http://www.tulaoshi.com/n/20160129/1507044.html

延伸阅读
标签: ASP
  以前,如果要用ASP操作文件,比如移动、复制、删除或者创建一个记事本文件,基本上都是通过FILESYSTEMOBJECT对象做的,当然,这个东西很专业,也没说什么不好,它可以提供完善的文件信息,比如建立时间,大小,上次修改时间等等,但是如果你不做痛苦的高代价的字符格式转换的话,利用它你无法直接操作二进制文件。 但是,现在我们介绍...
标签: ASP
  简介 文件上传是将任意的文件从客户机发送到服务器的过程。最简单、最方便的上传方法是使用支持RFC1867的浏览器,如微软的Internet Explorer4.0以上版本,Netscape3.0以上版本,或者带附件的Internet Explorer3.0。基于浏览器的文件上传是通过带有属性ENCTYPE="multipart/form-data"的HTML form实现的。这个form也必须包含一...
标签: Web开发
网上有不少生成缩略图的ASP组件。若你的虚拟空间不支持注册新组件,可能会感觉自己的网站失色不少。心晴不才,结合网上资源写了个无组件生成缩略图程序,仅供参考。 还是先看看基础部分吧。首先,我们知道在页面中显示图片是如下代码: img src="pic.gif" border="0" width="300" height="260" src是图片路径,borde...
标签: Web开发
代码如下: %@ page contentType="text/html;charset=gb2312"% html head meta http-equiv="Content-Type" content="text/html; charset=gb2312" /head body leftmargin="0" topmargin="0" bgcolor="#ffffff" form action="upfilea.jsp" method="post" name="form1" enctype="multipart/form-data" input name="FileName" type="FILE" ...
标签: Web开发
前台: upload.htm 代码如下: !DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd" html xmlns="http://www.w3.org/1999/xhtml" head runat="server" titleupload/title link href="upload.css" rel="Stylesheet" / /head body form ul li button id="S...

经验教程

672

收藏

96
微博分享 QQ分享 QQ空间 手机页面 收藏网站 回到头部