asp问题，下了个源码<% %>内的代码全变成这样的了，是如何实现的。如何看真实的源码

发布网友 发布时间：2022-04-22 21:25

我来回答

共2个回答

热心网友 时间：2023-10-29 10:27

<TD height=35 align=center>选择本月报表包含的日期:
开始日期 <input name="time1" type="text" size="10" onFocus="setday(this)" value="<%=session("stime")%>">
结束日期 <input name="time2" type="text" size="10" onFocus="setday(this)" value="<%=session("ntime")%>">
<INPUT type="submit" value="生成报表请稍候" id=submit1 name=submit1>
<P>
<!--#include file="copyright.asp"-->
</TD>
</TR>
</form>

<%
else if request.querystring("action")="sheet" then
if stime="" or ntime="" then
stime=CDate(session("stime"))
ntime=CDate(session("ntime"))
else
stime=CDate(Request("time1"))
ntime=CDate(Request("time2"))
end if
%>
<%
set rs=server.createobject("adodb.recordset")
sql="select * from book where classtype=1 and date between #"&stime&"# and #"&ntime&"#"
rs.open sql,conn,1,3
money1=0
if not (rs.eof and rs.bof) then
do while not rs.eof
money1=money1+rs("money")
rs.movenext
loop
end if
%>
<%
set rs=server.createobject("adodb.recordset")
sql="select * from book where classtype=2 and date between #"&stime&"# and #"&ntime&"#"
rs.open sql,conn,1,3
money2=0
if not (rs.eof and rs.bof) then
do while not rs.eof
money2=money2+rs("money")
rs.movenext
loop
end if

%>
<%
set rs=server.createobject("adodb.recordset")
sql="select * from book where classtype=3 and date between #"&stime&"# and #"&ntime&"#"
rs.open sql,conn,1,3
money3=0
if not (rs.eof and rs.bof) then
do while not rs.eof
money3=money3+rs("money")
rs.movenext
loop
end if

%>

热心网友 时间：2023-10-29 10:27

http://www.dheart.net/decode/index.php

JScript/VBscript脚本解密

只能解出一部分，，还需要你自己来加工，试试吧。/