源码网商城,靠谱的源码在线交易网站 我的订单 购物车 帮助

源码网商城

如何动态生成WBMP?

  • 时间:2021-12-24 21:25 编辑: 来源: 阅读:
  • 扫一扫,手机访问
摘要:如何动态生成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) %>
  • 全部评论(0)
联系客服
客服电话:
400-000-3129
微信版

扫一扫进微信版
返回顶部