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

    企业400电话 网络优化推广 AI电话机器人 呼叫中心 网站建设 商标✡知产 微网小程序 电商运营 彩铃•短信 增值拓展业务
    如何动态生成WBMP?

    如何动态生成WBMP?

     

    %@ Language=VBScript %>
    %
    Function StoB(varstr)
    str2bin = ""
    For i = 1 To Len(varstr)
    varchar = Mid(varstr, i, 1)
    str2bin = str2bin ChrB(AscB(varchar))
    Next
    StoB = str2bin
    End Function
    img=chr(0) chr(0) chr(5) chr(2) chr(0) chr(Hf8)

    Response.ContentType="image/vnd.wap.wbmp"
    Response.BinaryWrite stob(img)
    %>

    上一篇:如何一行行地读取文件?
    下一篇:如何处理超时事件?
  • 相关文章
  • 

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

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

    如何动态生成WBMP? 如何,动态,生成,WBMP,如何,