服务器之家

服务器之家 > 正文

通过表单的做为二进制文件上传request.totalbytes提取出上传的二级制数据

时间:2019-09-09 10:35     来源/作者:asp教程网

代码如下:


<input name="file" type="file"> 
formsize=request.totalbytes 
formdata=request.binaryread(formsize) 
bncrlf=chrB(13) & chrB(10) 
divider=leftB(formdata,clng(instrb(formdata,bncrlf))-1) 
datastart=instrb(formdata,bncrlf & bncrlf)+4 
dataend=instrb(datastart+1,formdata,divider)-datastart 
mydata=midb(formdata,datastart,dataend) 


formsize=request.totalbytes 
取得上传的最大字节数 
----------------------- 
formdata=request.binaryread(formsize) 
取得二进制流的表单form数据 
----------------------- 
bncrlf=chrB(13) & chrB(10) 
设定crlf 回车换行代码变量 
------------------------------ 
divider=leftB(formdata,clng(instrb(formdata,bncrlf))-1) 
取得第一个crlf左边的字节数据 
instrb(formdata,bncrlf)-1机检查出crlf二进制字节的位值减一,即为该标志位信息之前的二进制数据,需要说明的是instrb返回的是clng,所以此处加了一个clng是多余的 
------------------------------ 
datastart=instrb(formdata,bncrlf & bncrlf)+4 
取得图象数据,去除form表单添加的头信息的启始位置,也就是你的type=file在form提交后的真正文件数据的字节起始位置 
二个连续crlf的位置+4(即而个crlfg的长度) 
------------------------------- 
dataend=instrb(datastart+1,formdata,divider)-datastart 
从上的取得的数据位置+1做为检查数据结尾的参考计算值,在datastart+1开始的位置检测返回第一个二进制form分隔头信息的位置,再减去datastar的相对位置 
---------------------------- 
mydata=midb(formdata,datastart,dataend) 
midb()取以上多番周折取得的上传文件数据的star end位制的数据 
ok --------------> 现在干干净净的提取出上传的二级制数据 

注: 
(1).所有 *B系列的VB函数均是按字节byte来处理,处理二级制必须用他们 
(2).type=file 和 相应的form类型的表单数据提交后均对每个文件域附加有相应的头信息 
所以必须按上面的算法来明确找到真正的文件数据 
(3).同时头信息里还包含上传初始文件名的数据如 c:\aaa\aaa.jpg,可以同样处理formdata的数据而提取该段文件域数据的初试文件名 
(4).这些算法是来源于http“form”规范提供的格式数据,所以任何一家的处理算法都是大同小异的!

相关文章

热门资讯

玄元剑仙肉身有什么用 玄元剑仙肉身境界等级划分
玄元剑仙肉身有什么用 玄元剑仙肉身境界等级划分 2019-06-21
华为nova5pro和p30pro哪个好 华为nova5pro和华为p30pro对比详情
华为nova5pro和p30pro哪个好 华为nova5pro和华为p30pro对比详情 2019-06-22
抖音撒撒累累是什么歌 撒撒累累张艺兴歌曲名字
抖音撒撒累累是什么歌 撒撒累累张艺兴歌曲名字 2019-06-05
男生常说24816是什么意思?女生说13579是什么意思?
男生常说24816是什么意思?女生说13579是什么意思? 2019-07-24
叠猫猫队长可以退出吗 叠猫猫队长怎么换队伍
叠猫猫队长可以退出吗 叠猫猫队长怎么换队伍 2019-06-05
返回顶部