热门标签 | HotTags
当前位置:  开发笔记 > 编程语言 > 正文

将16进制代码用vbscript输出为图片的实现方法

<%FunctiongetByteString(sStr)DimI,sB,CForI1toLen(sStr)CMid(sStr,I,1)sBsB&a
<%
Function getByteString(sStr)
Dim I,sB,C
For I=1 to Len(sStr)
    C=Mid(sStr,I,1)
    sB=sB&ChrB(AscB(C))
Next
getByteString=sB
End Function
'-----------------------------用winHex可以抓
str1="%47%49%46%38%39%61%0B%00%0B%00%D5%00%00%00%00%00%FF%FF%FF%00%94%00%00%8C%00%21%B5%21%21%AD%21%21%AD%18%21%AD%10%29%B5%18%29%AD%18%42%D6%31%4A%D6%29%5A%DE%29%5A%DE%21%63%DE%21%73%E7%18%7B%E7%18%8C%EF%10%94%F7%08%94%F7%10%9C%F7%10%9C%EF%18%9C%F7%08%A5%F7%08%A5%EF%18%A5%EF%21%A5%EF%10%AD%F7%08%AD%EF%10%C6%FF%00%CE%FF%00%D6%FF%00%E7%FF%00%EF%FF%00%E7%F7%08%F7%FF%00%FF%FF%FF%00%00%00%00%00%00%00%00%00%00%00%00%00%00%00%00%00%00%00%00%00%00%00%00%00%00%00%00%00%00%00%00%00%00%00%00%00%00%00%00%00%00%00%00%00%00%00%00%00%00%00%00%00%00%00%00%00%00%00%00%00%00%00%00%00%00%00%00%00%00%00%00%00%00%00%00%00%00%00%00%00%21%F9%04%01%00%00%24%00%2C%00%00%00%00%0B%00%0B%00%00%06%4E%40%92%10%51%20%14%0A%C2%24%E9%F0%69%0A%94%42%83%E7%42%79%0A%13%06%43%A2%23%99%0C%8E%05%43%D3%B3%89%40%34%98%CC%C0%D0%B1%48%CC%8F%C6%42%31%48%8C%46%20%48%5C%14%0A%D5%07%80%1C%0E%0C%80%80%49%03%15%73%03%50%24%03%7D%22%8B%50%85%86%42%41%00%3B"
str2="%47%49%46%38%39%61%0B%00%0B%00%C4%00%00%00%00%00%FF%FF%FF%00%8C%00%21%AD%21%21%AD%18%29%AD%18%42%D6%31%4A%D6%29%5A%DE%21%73%E7%18%7B%E7%18%8C%EF%10%94%F7%08%9C%F7%08%A5%EF%18%A5%EF%21%A5%EF%10%AD%F7%08%C6%FF%00%CE%FF%00%D6%FF%00%E7%FF%00%EF%FF%00%E7%F7%08%F7%FF%00%FF%FF%FF%00%00%00%00%00%00%00%00%00%00%00%00%00%00%00%00%00%00%21%F9%04%01%00%00%19%00%2C%00%00%00%00%0B%00%0B%00%00%05%2D%60%26%8E%64%69%9E%65%41%0C%6C%DB%12%14%35%45%50%ED%3C%02%21%35%CC%A2%24%88%83%41%50%C0%60%2A%C8%CB%C5%62%21%0A%9E%D0%28%6A%4A%35%85%00%00%3B"
str17=""
str18=""
str19=""
str20=""
FileType = Request.QueryString("FileType")
If Len(FileType)=0 Then FileType="-"
Select Case FileType
Case "+"
    str=str1
Case "-"
    str=str2
End Select
Response.BinaryWrite(getByteString(unescape(str)))
%>

推荐阅读
  • 项目中想把PD建模的数据库中的Name字段全部在Comment里也填写一份,又不想一个表一个表的复制粘贴,所以在网上查了点偷懒省事的方法,原来可以利用VBScript脚本控制PD中的对象进行一些 ... [详细]
  • 本文介绍了一个在线急等问题解决方法,即如何统计数据库中某个字段下的所有数据,并将结果显示在文本框里。作者提到了自己是一个菜鸟,希望能够得到帮助。作者使用的是ACCESS数据库,并且给出了一个例子,希望得到的结果是560。作者还提到自己已经尝试了使用"select sum(字段2) from 表名"的语句,得到的结果是650,但不知道如何得到560。希望能够得到解决方案。 ... [详细]
  • 在Android开发中,使用Picasso库可以实现对网络图片的等比例缩放。本文介绍了使用Picasso库进行图片缩放的方法,并提供了具体的代码实现。通过获取图片的宽高,计算目标宽度和高度,并创建新图实现等比例缩放。 ... [详细]
  • CSS3选择器的使用方法详解,提高Web开发效率和精准度
    本文详细介绍了CSS3新增的选择器方法,包括属性选择器的使用。通过CSS3选择器,可以提高Web开发的效率和精准度,使得查找元素更加方便和快捷。同时,本文还对属性选择器的各种用法进行了详细解释,并给出了相应的代码示例。通过学习本文,读者可以更好地掌握CSS3选择器的使用方法,提升自己的Web开发能力。 ... [详细]
  • Python正则表达式学习记录及常用方法
    本文记录了学习Python正则表达式的过程,介绍了re模块的常用方法re.search,并解释了rawstring的作用。正则表达式是一种方便检查字符串匹配模式的工具,通过本文的学习可以掌握Python中使用正则表达式的基本方法。 ... [详细]
  • 本文详细介绍了Spring的JdbcTemplate的使用方法,包括执行存储过程、存储函数的call()方法,执行任何SQL语句的execute()方法,单个更新和批量更新的update()和batchUpdate()方法,以及单查和列表查询的query()和queryForXXX()方法。提供了经过测试的API供使用。 ... [详细]
  • 本文介绍了在Vue项目中如何结合Element UI解决连续上传多张图片及图片编辑的问题。作者强调了在编码前要明确需求和所需要的结果,并详细描述了自己的代码实现过程。 ... [详细]
  • 前景:当UI一个查询条件为多项选择,或录入多个条件的时候,比如查询所有名称里面包含以下动态条件,需要模糊查询里面每一项时比如是这样一个数组条件:newstring[]{兴业银行, ... [详细]
  • 开发笔记:Java是如何读取和写入浏览器Cookies的
    篇首语:本文由编程笔记#小编为大家整理,主要介绍了Java是如何读取和写入浏览器Cookies的相关的知识,希望对你有一定的参考价值。首先我 ... [详细]
  • 开发笔记:实验7的文件读写操作
    本文介绍了使用C++的ofstream和ifstream类进行文件读写操作的方法,包括创建文件、写入文件和读取文件的过程。同时还介绍了如何判断文件是否成功打开和关闭文件的方法。通过本文的学习,读者可以了解如何在C++中进行文件读写操作。 ... [详细]
  • 本文讨论了如何使用IF函数从基于有限输入列表的有限输出列表中获取输出,并提出了是否有更快/更有效的执行代码的方法。作者希望了解是否有办法缩短代码,并从自我开发的角度来看是否有更好的方法。提供的代码可以按原样工作,但作者想知道是否有更好的方法来执行这样的任务。 ... [详细]
  • 本文讨论了在手机移动端如何使用HTML5和JavaScript实现视频上传并压缩视频质量,或者降低手机摄像头拍摄质量的问题。作者指出HTML5和JavaScript无法直接压缩视频,只能通过将视频传送到服务器端由后端进行压缩。对于控制相机拍摄质量,只有使用JAVA编写Android客户端才能实现压缩。此外,作者还解释了在交作业时使用zip格式压缩包导致CSS文件和图片音乐丢失的原因,并提供了解决方法。最后,作者还介绍了一个用于处理图片的类,可以实现图片剪裁处理和生成缩略图的功能。 ... [详细]
  • vb.net面试题,请大家帮忙,谢谢。如果需要讲详细一点,那就加我QQ531412815第4题,潜在的错误,这里的错误不是常规错误,属于那种只有在运行是才知道的错误:Catchex ... [详细]
  • 【Python 爬虫】破解按照顺序点击验证码(非自动化浏览器)
    #请求到验证码base64编码json_img_datajson_raw.get(Vimage)#获取到验证码编码 #保存验证码图片到本地defbase64_to_img(bstr ... [详细]
  • Icreatecodelikethis我创建这样的代码aArray(-fx,-cr,-ie)Setiim1CreateObject(imacros)i ... [详细]
author-avatar
黑旦儿
这个家伙很懒,什么也没留下!
PHP1.CN | 中国最专业的PHP中文社区 | DevBox开发工具箱 | json解析格式化 |PHP资讯 | PHP教程 | 数据库技术 | 服务器技术 | 前端开发技术 | PHP框架 | 开发工具 | 在线工具
Copyright © 1998 - 2020 PHP1.CN. All Rights Reserved | 京公网安备 11010802041100号 | 京ICP备19059560号-4 | PHP1.CN 第一PHP社区 版权所有