• 企业400电话
  • 微网小程序
  • AI电话机器人
  • 电商代运营
  • 全 部 栏 目

    企业400电话 网络优化推广 AI电话机器人 呼叫中心 网站建设 商标✡知产 微网小程序 电商运营 彩铃•短信 增值拓展业务
    通过表单的做为二进制文件上传request.totalbytes提取出上传的二级制数据
    复制代码 代码如下:

    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”规范提供的格式数据,所以任何一家的处理算法都是大同小异的!
    上一篇:asp利用Split函数进行多关键字检索
    下一篇:ASP 使用三层架构 asp中使用类
  • 相关文章
  • 

    © 2016-2020 巨人网络通讯 版权所有

    《增值电信业务经营许可证》 苏ICP备15040257号-8

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