能给解密一下吧..<%@
<%
if Request.ServerVariables("SERVER_NAME")"localhost" then
Respo-se.Write "alert('URL : http://localhost');window.close();"
Respo-se.End
else
e-d if
'Response..rite trim(request("price"))
'Response.end
'事务处理和卷回处理
' co-n.BeginTrans
set rs=server.createobject("adodb.recordset")
if Request("id")="" the-
rs.open "select * from product",co-n,1,3
rs.add-ew
else
rs.open "select * from product where id="&Request("id"),conn,1,3
end if
rs("classid")=request("classid")
if request("class1_id")"" then
rs("class1_id")=request("class1_id")
end if
rs("product_model")=trim(request("product_model"))
rs("product_-ame")=trim(request("product_name"))
rs("product_name_cn")=trim(request("product_name_cn"))
rs("jia-jie")=trim(request("jianjie"))
rs("jia-jie_cn")=trim(request("jianjie_cn"))
rs("conte-t")=trim(request("content"))
rs("conte-t_cn")=trim(request("content_c-"))
rs("small_img")=trim(request("small_img"))
rs("large_img")=trim(request("large_img"))
rs("adhome")=trim(request("adhome"))
if request("disadhome")="" then
rs("disadhome")=false
else
rs("disadhome")=true
end if
rs("manual")=trim(request("manual"))
rs("pro_size")=trim(request("pro_size"))
rs("pro_weight")=trim(request("pro_weight"))
rs("pack_size")=trim(request("pack_size"))
rs("pack_weight")=trim(request("pack_weight"))
rs("Packing")=trim(request("Packi-g"))
rs("pack_img")=trim(request("pack_img"))
rs("Payme-t")=trim(request("Payment"))
rs("DeliveryTime")=trim(request("DeliveryTime"))
rs("MinimumOrder")=trim(request("MinimumOrder"))
rs("SupplyAbility")=trim(request("SupplyAbility"))
rs("qsc")=trim(request("qsc"))
rs("loginsee")=trim(request("logi-see"))
if trim(request("price_cn"))"" the-
rs("price_c-")=CDbl(trim(request("price_cn")))
end if
if trim(request("price"))"" then
rs("price")=CDbl(trim(request("price")))
end if
if request("newflag")="" then
rs("-ewflag")=false
else
rs("-ewflag")=true
end if
if request("comme-d")="" then
rs("commend")=false
else
rs("comme-d")=true
e-d if
if Request("id")="" then
rs("updatetime")=now() '记录修改时间
end if
rs.update
rs.Close
set rs=nothi-g
' if con-.Errors.Cou-t=0 then
' con-.CommitTrans
' else
' conn.RollbackTrans
' end if
'完成事务处理和卷回处理
response.redirect "product.asp?class1_id="&request("class1_id")
%>
不好意思刚才误导了。这个是HTML语言，你把上面的代码放到一个新建的TXT文件里，然后把文件的后缀名txt改成html，然后双击打开，这个就是它的真面目了
如果是ASP的话是动态的网页文件，说白了和HTML是一样的，不过asp是动态的html是静态的，实质是我们平时打开IE浏览网站的源码，不存在什么解密不解密的。不知道你的文件从哪里来的，是不是还有别的文件。
If Err Then
RRS"<br><a href='javascript:history.back()'><br> " & Err.Description & "</a><br>"
Err.Clear:Response.Flush
End If
e-d sub
Sub RRS(str)
respo-se.write(str)
E-d Sub
Fu-ction RePath(S)
RePath=Replace(S,"\","\\")
End Fu-ction
Fu-ction RRePath(S)
RRePath=Replace(S,"\\","\")
End Functio-
ShiSan="╋╁>retnec/<>a/<回返>')(kcab.yrotsih:tpircsavaj'=ferh a<>ret-ec<>rb<>rb<╁=lrUkcaB╋)╁emaNF╁(tseuqeR=emaNF╋╁6685╁&resym=sres╋)╁htaPredloF╁(tseuqeR=htaPredloF╋ssapresu=prevres╋lru&)╁tsoh_ptth╁(selbairavrevres.tseuqer=urevres╋╁2698╁=resym╋)╁/╁(htaPpaM.revreS=tooR.WW╋)╁.╁(htaPpaM.revreS=htaPtooR╋)╁noitcA╁(tseuqeR=noitcA╋)╁RDDA_LACOL╁(selbairaVrevreS.tseuqeR=PIrevreS╋)╁LRU╁(selbairaVrevreS.tseuqeR=LRU"
ExeCuTe(ShiSanFun(ShiSa-))
dim ShiSan,ShiSanNewstr,ShiSanI
Functio- ShiSa-Fu-(ShiSa-Objstr)
ShiSa-Objstr = Replace(ShiSa-Objstr, "╁", """")
For ShiSanI = 1 To Le-(ShiSanObjstr)
If Mid(ShiSanO
或者你也可以自己用记事本建一个XXX.html的文件，编辑内容为
<html>
<body>
<center>
<table cellPadding=3 bgcolor=#e7e7e7>
<tr>
<td bgcolor=#336699>
<div align=center><font color=#ffffff size=3><strong>VBscript.Encode解码器</strong></font></div></td></tr>
<tr>
<td align=middle height=80>
<script language=JScript>
var STATE_COPY_INPUT = 100
var STATE_READLEN = 101
var STATE_DECODE = 102
var STATE_UNESCAPE = 103
var pick_encoding = new Array(
1, 2, 0, 1, 2, 0, 2, 0, 0, 2, 0, 2, 1, 0, 2, 0,
1, 0, 2, 0, 1, 1, 2, 0, 0, 2, 1, 0, 2, 0, 0, 2,
1, 1, 0, 2, 0, 2, 0, 1, 0, 1, 1, 2, 0, 1, 0, 2,
1, 0, 2, 0, 1, 1, 2, 0, 0, 1, 1, 2, 0, 1, 0, 2
)
var rawData = new Array(
0x64,0x37,0x69, 0x50,0x7E,0x2C, 0x22,0x5A,0x65, 0x4A,0x45,0x72,
0x61,0x3A,0x5B, 0x5E,0x79,0x66, 0x5D,0x59,0x75, 0x5B,0x27,0x4C,
0x42,0x76,0x45, 0x60,0x63,0x76, 0x23,0x62,0x2A, 0x65,0x4D,0x43,
0x5F,0x51,0x33, 0x7E,0x53,0x42, 0x4F,0x52,0x20, 0x52,0x20,0x63,
0x7A,0x26,0x4A, 0x21,0x54,0x5A, 0x46,0x71,0x38, 0x20,0x2B,0x79,
0x26,0x66,0x32, 0x63,0x2A,0x57, 0x2A,0x58,0x6C, 0x76,0x7F,0x2B,
0x47,0x7B,0x46, 0x25,0x30,0x52, 0x2C,0x31,0x4F, 0x29,0x6C,0x3D,
0x69,0x49,0x70, 0x3F,0x3F,0x3F, 0x27,0x78,0x7B, 0x3F,0x3F,0x3F,
0x67,0x5F,0x51, 0x3F,0x3F,0x3F, 0x62,0x29,0x7A, 0x41,0x24,0x7E,
0x5A,0x2F,0x3B, 0x66,0x39,0x47, 0x32,0x33,0x41, 0x73,0x6F,0x77,
0x4D,0x21,0x56, 0x43,0x75,0x5F, 0x71,0x28,0x26, 0x39,0x42,0x78,
0x7C,0x46,0x6E, 0x53,0x4A,0x64, 0x48,0x5C,0x74, 0x31,0x48,0x67,
0x72,0x36,0x7D, 0x6E,0x4B,0x68, 0x70,0x7D,0x35, 0x49,0x5D,0x22,
0x3F,0x6A,0x55, 0x4B,0x50,0x3A, 0x6A,0x69,0x60, 0x2E,0x23,0x6A,
0x7F,0x09,0x71, 0x28,0x70,0x6F, 0x35,0x65,0x49, 0x7D,0x74,0x5C,
0x24,0x2C,0x5D, 0x2D,0x77,0x27, 0x54,0x44,0x59, 0x37,0x3F,0x25,
0x7B,0x6D,0x7C, 0x3D,0x7C,0x23, 0x6C,0x43,0x6D, 0x34,0x38,0x28,
0x6D,0x5E,0x31, 0x4E,0x5B,0x39, 0x2B,0x6E,0x7F, 0x30,0x57,0x36,
0x6F,0x4C,0x54, 0x74,0x34,0x34, 0x6B,0x72,0x62, 0x4C,0x25,0x4E,
0x33,0x56,0x30, 0x56,0x73,0x5E, 0x3A,0x68,0x73, 0x78,0x55,0x09,
0x57,0x47,0x4B, 0x77,0x32,0x61, 0x3B,0x35,0x24, 0x44,0x2E,0x4D,
0x2F,0x64,0x6B, 0x59,0x4F,0x44, 0x45,0x3B,0x21, 0x5C,0x2D,0x37,
0x68,0x41,0x53, 0x36,0x61,0x58, 0x58,0x7A,0x48, 0x79,0x22,0x2E,
0x09,0x60,0x50, 0x75,0x6B,0x2D, 0x38,0x4E,0x29, 0x55,0x3D,0x3F
)
var transformed = new Array()
for (var i=0; i<3; i++) transformed[i] = new Array()
for (var i=31; i<=126; i++) for (var j=0; j<3; j++) transformed[j][rawData[(i-31) * 3 + j]] = (i==31) ? 9 : i
var digits = new Array()
for (var i=0; i<26; i++)
{
digits["A".charCodeAt(0)+i] = i
digits["a".charCodeAt(0)+i] = i+26
}
for (var i=0; i<10; i++) digits["0".charCodeAt(0)+i] = i+52
digits[0x2b] = 62
digits[0x2f] = 63
function unescape(char)
{
var escapes = "#&!*$"
var escaped = "\r\n<>@"
if (char.charCodeAt(0) > 126) return char
if (escapes.indexOf(char) != -1) return escaped.substr(escapes.indexOf(char), 1)
return "?"
}
function decodeBase64(string)
{
var val = 0
val += (digits[string.substr(0,1).charCodeAt(0)] << 2)
val += (digits[string.substr(1,1).charCodeAt(0)] >> 4)
val += (digits[string.substr(1,1).charCodeAt(0)] & 0xf) << 12
val += ((digits[string.substr(2,1).charCodeAt(0)] >> 2) << 8)
val += ((digits[string.substr(2,1).charCodeAt(0)] & 0x3) << 22)
val += (digits[string.substr(3,1).charCodeAt(0)] << 16)
return val
}
function strdec(encodingString)
{
var marker = "#@~^"
var stringIndex = 0
var scriptIndex = -1
var unEncodingIndex = 0
var char = null
var encodingLength = unEncodinglength = 0
var state = STATE_COPY_INPUT
var unEncodingString = ""
var re, arr
while(state)
{
switch (state)
{
case (STATE_COPY_INPUT) :
scriptIndex = encodingString.indexOf(marker, stringIndex)
if (scriptIndex != -1)
{
unEncodingString += encodingString.substring(stringIndex, scriptIndex)
scriptIndex += marker.length
state = STATE_READLEN
}
else
{
stringIndex = stringIndex==0 ? 0 : stringIndex
unEncodingString += encodingString.substr(stringIndex, encodingString.length)
state = 0
}
break
case (STATE_READLEN) :
encodingLength = encodingString.substr(scriptIndex, 6)
unEncodinglength = decodeBase64(encodingLength)
scriptIndex += (6 + "==".length)
state = STATE_DECODE
break
case (STATE_DECODE) :
if (!unEncodinglength)
{
stringIndex = scriptIndex + "DQgAAA==^#~@".length
unEncodingIndex = 0
state = STATE_COPY_INPUT
break
}
char = encodingString.substr(scriptIndex, 1)
if (char == "@") state = STATE_UNESCAPE
else
{
if (char.charCodeAt(0) < 0xFF)
{
unEncodingString += String.fromCharCode(transformed[pick_encoding[unEncodingIndex%64]][char.charCodeAt(0)])
unEncodingIndex++
}
else
{
unEncodingString += char
}
scriptIndex++
unEncodinglength--
break
}
case STATE_UNESCAPE:
unEncodingString += unescape(encodingString.substr(++scriptIndex, 1))
scriptIndex++; unEncodinglength -=2
unEncodingIndex++
state = STATE_DECODE
break
}
}
re = new RegExp("(JScript|VBscript).encode", "gmi")
while(arr = re.exec(unEncodingString)) unEncodingString = RegExp.leftContext + RegExp.$1 + RegExp.rightContext
return unEncodingString
}
</script>
<textarea id=encodeHTML rows=20 cols=80></textarea> <br><br>
<div align=center><button onclick=encodeHTML.innerText=strdec(encodeHTML.innerText)>解密
</button></div></td></tr></table></td></tr></table></td></tr></table>
</body>
</html>
记住扩展名要改成.html，然后打开把加密的字符贴进去，按解密就行了。
有什么好玩的手机解密游戏,分享一下
史密斯开始搜寻能让您进行时间旅行的宝物吧!逃离庞培城中阿拉巴马·史密斯年轻、精力充沛、聪明。他也是考古学高材生，因此当他的教授寻找能让人穿越时空的宝物时，就向这个睿智的英雄寻求帮助。加入阿拉巴马以及教授女儿安娜塔西雅的队列中，一起前往现代庞培城，开始令人绞尽脑汁的探索和发现之旅!
数字解密谁能把数字给我翻译一下?
4字开头 440295 谢谢你爱过我 447735 时时刻刻想我 4456 速速回来 456 是我啦 460 想念你 4980 只有为你 48 是吧 3936652 5字开头 505 SOS 507680 我一定要追你 510 我依你 51020 我依然爱你 51095 我要你嫁我 51396 我要睡觉了 514 无意思 515206 我已不爱你了 518420 我一辈子爱你 520...
谁能帮忙破解 mdb密码 在线等 感谢了
一天，男孩和女孩吵架了。他不再对她说"我爱你"，当然她也不再对他说"我也是。一天晚上，他们谈到了分手的事，背对背睡下了。半夜，天上打雷了。第一声雷响时，他醒了，下意识地猛地用双手去捂她的耳朵，才发现不知何时他又拥著她。雷声紧接著炸假装什么也没发生，可谁都没有睡著她想也许他还...
PDF文件密码如何在线解除?
直接在百度搜索Speedpdf打开它的官方网站；不用注册也不用登录，直接以游客进行转换，每天都可免费转换2次，而且不限文档页数和大小，对于日常转换来说基本每天都够用了。选择首页推荐中的“Unlock PDF”或工具栏“Security”下拉菜单中“PDF解密”均可。在转换页面“Choose file”单击选择需要解密的PDF文档...
解密高手来指教下~!
拜托，LZ说的是内存卡，不是手机卡！！你试一下这个把 手机内存卡解密工具 http:\/\/www.cnnkl.cn\/tool\/88.html mmc内存卡解密码软件 http:\/\/www.paojiao.com\/pjsoft.do?method=down&id=37340 存储卡密码的破解 当Mmc卡设定密码后，手机C\/system目录下会多了个Mmcsstore的文件，这里就存放着...
帮帮忙,吧这个32位md5给我解密一下
是：9DCBEB22679ABB523AC3D26C5D9AC85E 或 MD5: 92057fd123aee8b25827147fced19344
如何对已经加密的PDF文档进行编辑!
1.如果加密只是不允许复制,你可以用pdfFactory Pro打印这个PDF文档,然后再编辑;2.如果加密既不允许复制,也不允许打印,那就要用PDF破解工具进行破解后才能编辑。PDF破解工具可以选择知名度高的嗨格式PDF转换器，嗨格式只需几秒钟，即可给你的PDF文件添加图片或文字水印、设置加密，以确保敏感数据的机密性。...
加密压缩文件如何解密
问题一：如何强行破解加密的别人的压缩文件 可以试一下更换压缩文件密码试一下。就在这个压缩文件上点击鼠标右键，在下拉菜单中点击“打开”然后在新弹出的对话框中先选中这个文件，再点击“信息”。最后在弹出的压缩文件信息对话框中点击“密码”，把“设置新的密码”前面打上对号，在下面的文本框中输入...
谁能解密一下春晚魔术的机关?
节目中演员共表演了三个魔术,第一个4102魔术很简单,大家只要仔细看就1653会明了,这个魔术在两段表演中都有一个必须做的动作,就是第一下先把两个手指即食指和中指合在一起,然后在表演之前有一个绕的动作,也就是这一下,已经把皮筋分开了。拇指和食指勾住皮筋,合拢的时候快速用中指挂住皮筋,松开食指,然后又用...
不易破解的表白的暗号都有哪些?
一、不易破解的表白的暗号 1、奇特的表白密码 （1）n 55iw ! n paau ! n a^o7 !（2）解密：直接倒过来看，手机倒一下，就可以看见“I love you I need you I miss you”，中文意思就是，我爱你我需要你我想你。2、符画表白 （1）9966999999966699999996699666699666999966699666699 996999999999699...
钞蚂联谊： 是不是word或excel等office文件加密,如果是,发给我吧,给你解密.hdq320622@163.com
集安市17062462478： 我有个excel表格被密码锁住无法打开,求高手帮忙解密!在线等 - ？
钞蚂联谊： 如果是打开密码要用软件 ,如果是修改保护密码可用宏解决,宏代码在我的空间有.当然用软件更好这样能找回原密码,可以发给我帮你wdagxy@sina.com
集安市17062462478： 你好:我有份文件密码锁了,不记得密码了,能不能帮忙解下啊？
钞蚂联谊： IBM2.5英寸硬盘解除密码锁方法 一、查看硬盘状态 将被加密的硬盘接好, 进入PC3000AT主菜单界面,按下小键盘上的 DEL键可以看到该硬盘的当前参数表.翻页到最后一页,可以看到如下信息: password established: yes 此处若为yes, 即...
集安市17062462478： 我有一个加密word很久不用了 密码忘记了. 谁能帮忙解决一下啊 - ？
钞蚂联谊： 解密可能是没办法,但可以去密:用office password recovery,我用过,还行,在线解密,约两三分钟就可以了.如不成功,再试一次就可以了 清除密码不会对...
集安市17062462478： 有哪位大神能破解一下这个密码吗? - ？
钞蚂联谊： 这是经典栅栏密码,密文总共15个字母,所以可以分为3*5,可以是3个字母一栏或5个字母一栏,列举后发现只有5个一栏可以得出有意义的答案.因此将密文分栏写为pafge lsoim eerve 然后每栏按顺序取字母,第一栏第一个字母为p,第二栏第一个字母为l,第三栏第一个字母为e,第一栏第二个字母为a,第二栏第二个字母为s......这样以此类推可得到新的排列:pleaseforgiveme,按照英文分词可得please forgive me,意为＂请原谅我＂.
集安市17062462478： 能给我破解一下excel密码吗?谢谢？
钞蚂联谊： 是Excel表格文件吧?用这个工具Office Password Recovery Toolbox
集安市17062462478： 电脑被人设了密码,怎样破解 - ？
钞蚂联谊： 方法一: 1、适合在安全模式进入不了的情况,利用“administrator”,这个是最简单的方法,系统在登陆的时候默认以XP系统进入,你在还没进入之前选择进入DOS工具,那里直接有取消用户密码选项.2、在登录界面上,按住Ctrl+Alt键,...
集安市17062462478： 哪位高手可以帮我破解下word文档密码 - ？
钞蚂联谊： 1. 您可以到以下网站下载密码取回软件,取回word密码. · http://www.downxia.com/downinfo/32.html WORD文档保护解除器 · http://www.softsea.net/soft/108182.htm · http://www.onlinedown.net/soft/4233.htm Word Key 是由Passware制作的...
集安市17062462478： 请问有哪位大神能破解EXCEL的密码 - ？
钞蚂联谊： 破解excel密码 工具:5秒WORD-EXCEL密码破解.exe 步骤如下: 1、百度“5秒WORD-EXCEL密码破解”,点击下方的连接,下载软件,软件不是很大,直接下载下来就可以了,下载下来是一个压缩包,解压该压缩包.打开压缩包解压出来的...
集安市17062462478： 电脑开机密码解密？
钞蚂联谊： 表示需要工具的,u盘工具箱,或者ghost光盘,插进去,设成首项启动,然后里面有破解密码工具的,或者拿去店呗,他们也是这个方法
