易截截图软件、单文件、免安装、纯绿色、仅160KB

在ASP中,如何把‘4F60597D’转为‘你好’?

在ASP中,如何把‘4F60597D’转为‘你好’?
4F60597D
re:
加密后的?

response.write chrw(&H4F60) & chrw(&H597D)

HTML code:
<%
Dim str,s,strlen
s=""
str="4F60597D"
strlen=Len(str)
Do While str<>""
s= s & "%u" & Left(str,4)
str=Mid(str,5,strlen)
Loop
response.write unescape(s)
%>


VBScript code:

Function DecodeStr(s)
With New RegExp
.Pattern = "[\da-fA-F]{4}"
.Global = True
DecodeStr = unescape(.Replace(s, "%u$&"))
End With
End Function

WScript.Echo DecodeStr("4F60597DFF015F889AD851748BA48BC64F603002")



有没有一个function可以直接实现?

晕,直接下一个函数即可
VBScript code:
Function DecodeStr(s)
With New RegExp
.Pattern = "[\da-fA-F]{4}"
.Global = True
DecodeStr = unescape(.Replace(s, "%u$&"))
End With
End Function


这个不是很好的一个函数吗?

希望把三楼的用一个函数实现

引用


相关问答:

求一个在线测试系统 asp的 - Web 开发 / ASP

http://www.zgjhjy.com/Test/PrimaryTest/Index.aspx
就是类似以上的在线测试系统,需要有一个后台的,语言是asp的,数据库是access的,还需要能在后台对信息进行添删改查的。谢谢各位了。。。
程序真的很多,不知 ......

关于ASP批量打印 - Web 开发 / ASP

我想打印数据库里面读取出来的多条数据内容,实现批量打印
先导入excel或者word,然后在打印
或者购买web打印控件

使用acitvex打印。如果不需要选择属性,设置属性,就不需要商业的了。

<style media= ......

新手请教一个asp的类型转换问题! - Web 开发 / ASP

本人不会asp,报错了,请大家帮忙看看。
代码如下:
<%
dim keyword_Name,keyword_YJ,keyword_RQ
if rs("QS_PASS_1_name")<>"0,0" then
keyword_Name=split(rs("QS_ ......

求一ASP嵌套页代码 - Web 开发 / ASP

A页面
<table width="200" border="1">
  <tr>
  <td>1</td>
  <td>3</td>
  <td><!--#include/top.html#-- ......

ASP伪静态 - Web 开发 / ASP

asp虚拟主机实现伪静态的方法:
1、 重写url参数
Step1: 建立前台文件index.asp,修改url参数形式。由于读取数据库中的记录不是专题的重点,故直接给出:
<!--#include file="config.asp" -->
&l ......
© 2009 ej38.com All Rights Reserved. 关于E健网联系我们 | 站点地图 | 赣ICP备09004571号