仓酷云

 找回密码
 立即注册
搜索
热搜: 活动 交友 discuz
查看: 691|回复: 10
打印 上一主题 下一主题

[学习教程] ASP网页编程之最短的无组件上传代码(仅9行)

[复制链接]
简单生活 该用户已被删除
跳转到指定楼层
楼主
发表于 2015-1-16 23:35:17 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有帐号?立即注册

x
ActiveServerPage技术为应用开发商提供了基于脚本的直观、快速、高效的应用开发手段,极大地提高了开发的效果。在讨论ASP的安全性问题之前,让我们来看看ASP是怎么工作的。上传|无组件我研讨了一下无组件上传,并作出了一个最复杂可行的办法
----用9行代码真正完成无组件上传,怎样说来花了才半天就写了9行代码算是有点效力和功效。
因而就写了这篇文章。



formSize=Request.TotalBytes()
formData=Request.BinaryRead(formSize)
DataHeader=LeftB(formData,InStrB(formData,Chrb(13)&Chrb(10)))
strFileData=MIDB(formData,LenB(DataHeader),LenB(formData)-LenB(DataHeader)*2-3)
HeaderPos2=InStrB(strFileData,ChrB(AscB("-"))&ChrB(AscB("T"))&ChrB(AscB("y"))&ChrB(AscB("p"))&C

hrB(AscB("e")))
HeaderPos3=InStrB(HeaderPos2,strFileData,Chrb(13))
DataHeader2=LeftB(strFileData,HeaderPos3+4)
strFileData=MIDB(strFileData,LenB(DataHeader2),LenB(strFileData))
Response.binaryWrite(strFileData)







DataHeader--文件头
strFileData--去向文件头后的数据,最初的输入值
HeaderPos2--Content-Type:的地位
HeaderPos3--比方:Content-Type:image/gif的地位
DataHeader2--全部后面的文件头

头脑:
1。先间接往失落文件头和尾(比方-----------------------------7d230d1f940277)
2。跳过后面一切信息间接查找Content-Type:image/gif
3。提取有效的信息和字段
4。数据都提出来了至于怎样保留就复杂了。至于用FSO或Adodb.Stream就随你了。

成绩:
有人大概会讲一个表单不成能只要一个file
如许的话你的数据就不克不及用这么复杂的举措一般提取了
实在也好办你把他们分隔做不就就完了:)


上面是完全实例

uup.htm
<html>
<ahref="http://www.cgfront.com">www.cgfront.com</a>
<formname="loadfromfile"action="uup.asp"method="post"enctype="multipart/form-data">
  <inputtype="submit"name="submit"value="OK">
<inputtype="file"name="loadfromfile"style="width:400"value="">
</form>
</html>

uup.asp
<%
formSize=Request.TotalBytes()
formData=Request.BinaryRead(formSize)
DataHeader=LeftB(formData,InStrB(formData,Chrb(13)&Chrb(10)))
strFileData=MIDB(formData,LenB(DataHeader),LenB(formData)-LenB(DataHeader)*2-3)
HeaderPos2=InStrB(strFileData,ChrB(AscB("-"))&ChrB(AscB("T"))&ChrB(AscB("y"))&ChrB(AscB("p"))&C

hrB(AscB("e")))
HeaderPos3=InStrB(HeaderPos2,strFileData,Chrb(13))
DataHeader2=LeftB(strFileData,HeaderPos3+4)
strFileData=MIDB(strFileData,LenB(DataHeader2),LenB(strFileData))
Response.binaryWrite(strFileData)
%>




假如你的键盘上ctrl+C+V键都已被你按坏了的话,不妨我还给人人供应了响应的测试地址

http://www.cgfront.com/up/uup.htm

最初但愿人人多多指教。


Leonard</p>对用户来说可预见费用、节约费用,可以做到花少钱办大事。由于省去了购买软件和硬件等的前期费用,用户可以租用较高级的应用软件。ASP的收费是根据软件的类型、客制化程度、用户数量、服务期限来定的,对客户来说这笔费用是可以预见的。方便于客户应用软件的升级。
小妖女 该用户已被删除
沙发
发表于 2015-1-17 16:45:05 | 只看该作者
弱类型造成潜在的出错可能:尽管弱数据类型的编程语言使用起来回方便一些,但相对于它所造成的出错几率是远远得不偿失的。
金色的骷髅 该用户已被删除
板凳
发表于 2015-1-20 19:54:41 | 只看该作者
还有如何才能在最短的时间内学完?我每天可以有效学习2小时,双休日4小时。
分手快乐 该用户已被删除
地板
发表于 2015-1-25 12:14:09 | 只看该作者
Session:这个存储跟客户端会话过程的数据,默认20分钟失效
冷月葬花魂 该用户已被删除
5#
发表于 2015-1-26 23:10:04 | 只看该作者
如何学好ASP,以前也有人问过,把回答给你转过来看看能否对你有帮助:
兰色精灵 该用户已被删除
6#
发表于 2015-2-4 21:25:02 | 只看该作者
交流是必要的,不管是生活还是学习我们都要试着去交流,通过交流我们可以学到很多我们自己本身所没有的知识,可以分享别人的经验甚至经历。
小女巫 该用户已被删除
7#
发表于 2015-2-10 12:49:29 | 只看该作者
弱类型造成潜在的出错可能:尽管弱数据类型的编程语言使用起来回方便一些,但相对于它所造成的出错几率是远远得不偿失的。
飘飘悠悠 该用户已被删除
8#
发表于 2015-3-1 10:46:50 | 只看该作者
我想问如何掌握学习节奏(先学什么再学什么)最好详细点?
因胸联盟 该用户已被删除
9#
发表于 2015-3-10 14:10:37 | 只看该作者
我可以结合自己的经验大致给你说一说,希望对你有所帮助,少走些弯路。
只想知道 该用户已被删除
10#
发表于 2015-3-17 08:09:29 | 只看该作者
我可以结合自己的经验大致给你说一说,希望对你有所帮助,少走些弯路。
蒙在股里 该用户已被删除
11#
发表于 2015-3-24 03:01:42 | 只看该作者
没有坚实的理论做基础,那么我们连踏入社会第一步的资本都没有,特别对于计算机专业的学生学好专业知识是置关重要的。在这里我侧重讲一下如何学习ASP,从平时的学习过程中。
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|Archiver|手机版|仓酷云 鄂ICP备14007578号-2

GMT+8, 2025-1-10 05:30

Powered by Discuz! X3.2

© 2001-2013 Comsenz Inc.

快速回复 返回顶部 返回列表