在线急等:关注加密!----解决晚上就结帐!

[yb2008]

请大家帮我把下面这段代码加密,!当然,要可以执行!

请写出加密函数方法或步骤!

感谢!
<%

explan=request("explanation")

response.buffer=true

formsize=request.totalbytes

formdata=request.binaryread(formsize)

bncrlf=chrB(13) & chrB(10)

divider=leftB(formdata,clng(instrb(formdata,bncrlf))-1)

datastart=instrb(formdata,bncrlf & bncrlf)+4

dataend=instrb(datastart+1,formdata,divider)-datastart

mydata=midb(formdata,datastart,dataend)



set connGraph=server.CreateObject("ADODB.connection")

connstr="DBQ="+server.mappath("images.mdb")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"

connGraph.open connstr


set rec=server.createobject("ADODB.recordset")

rec.Open "SELECT * FROM [images] where id is null",connGraph,1,3

rec.addnew

rec("说明")="没有说明！"
rec("img").appendchunk mydata

rec.update

rec.close

set rec=nothing

set connGraph=nothing

%>

[yb2008]

如果能把整个asp的文件加密更好!

[yb2008]

我看到很多密码之后都成了乱码,其实我要的也是这种效果!

[中年CodeBoy]

去微软站点下个screnc.exe就解决问题了
加密后木马都不能被杀毒软件查出来

[中年CodeBoy]

注意使用格式
screnc /l vbscript 源.asp 目标.asp
然后目标.asp就是你要的加密过后的文件了

[chjpeng]

因为MDB？改成ASP就行了啊

[hflsj]

去微软站点下个screnc.exe就解决问题了


但听说这个加密后能解密。 呵呵。

[wanghongtaoleifeng]

http://www.ddvip.net/web/asp/safe/12.htm
md5加密