日期:2014-05-17  浏览次数:21173 次

asp源代码中部分代码为大量的字符串,怎么解决?
找了一个asp的源码,但发现有部分的代码可能被作者混淆了,把源代码转换成了大量的字符串,使得我无法修改代码,请问哪位大哥知道有什么方法可以转换回去吗?有哪位高手可以提供解决的办法呀!!!!!!!help!!!!!!!

------解决方案--------------------
<%
select case request( "action ")
case "add "
call SaveAdd()
case "modify "
call SaveModify()
case "del "
call delCate()
case "edit "
isEdit=True
call myform(isEdit)
case else
isEdit=False
call myform(isEdit)
end select


sub SaveAdd
class1=request.Form( "d_position1 ")
pinming=request.Form( "pinming ")
names=Split(pinming, "| ")
pinming=names(0)
guige=names(1)
unit=names(2)

set rs1=server.createobject( "adodb.recordset ")
if guige= " " then
sql1= "select * from store where pinming= ' "&pinming& " ' "
else
sql1= "select * from store where pinming= ' "&pinming& " ' and guige= ' "&guige& " ' "
end if
rs1.open sql1,conn,1,3
if not rs1.eof and not rs1.bof then
rs1( "number ")=rs1( "number ")+request.Form( "use_num ")
rs1( "price ") = request.Form( "use_price ")
else
rs1.addnew
rs1( "class ") = trim(request.Form( "d_position1 "))
rs1( "Unit ") = unit
rs1( "guige ") = guige
rs1( "pinming ") = pinming
rs1( "number ")=request.Form( "use_num ")
rs1( "price ") = request.Form( "use_price ")
end if
rs1.update
rs1.close
set rs1=nothing

set rs=server.createobject( "adodb.recordset ")
sql= "select * from in_store "
rs.open sql,conn,1,3
rs.addnew
rs( "class ") = trim(request.Form( "d_position1 "))
rs( "guige ") = guige
rs( "pinming ") = pinming
rs( "uptime ") = request.Form( "uptime ")
rs( "end_time ") = request.Form( "end_time ")
rs( "Unit ") = unit
rs( "Supplier ") = trim(request.Form( "Supplier "))
rs( "use_price ") = request.Form( "use_price ")
rs( "use_num ") = request.Form( "use_num ")
rs( "use_Amount ") = request.Form( "use_num ") * request.Form( "use_price ")
rs( "content ") = trim(request.Form( "content "))
rs.update
response.Write " <script language=javascript> alert( '入库成功! '); </script> "
response.write " <meta http-equiv= " "refresh " " content= " "0;url=in_store.asp " "> "
response.end
rs.close
set rs=nothing
end sub


sub SaveModify
class1=request.Form( "d_position1 ")
pinming=request.Form( "pinming ")
names=Split(pinming, "| ")
pinming=names(0)
guige=names(1)
unit=names(2)
num=names(3)
num0=request.Form( "use_num ")
num1=num-num0
set rs1=server.createobject( "adodb.recordset ")
if guige= " " then
sql1= "select * from store where pinming= ' "&pinming& " ' "
else
sql1= "select * from store where pinming= ' "&pinming& " ' and guige= ' "&guige& " ' "