📄 index_main.asp
字号:
<html>
<%
if session("username") = "" then
response.write "<script language=JavaScript>{window.alert('对不起,你尚未登陆或者闲置时间过长,请重新登陆系统!');window.location='index.asp'}</script>"
response.end
end if
%>
<!--#include file="clconn.asp"-->
<%
us=session("username")
timer1=year(now)&"-"&right("0"&month(now),2)&"-"&right("0"&day(now),2)
set rs2=server.createobject("adodb.recordset")
if IsSqlDataBase = 0 then
sql="select count(id) as countid,[lianmeng] from [install] where [lianmeng]='" & us & "' and DateDiff('d', time1, '" & timer1 & "')<=0 GROUP BY [lianmeng]"
else
SQL="SELECT count(id) as countid,[lianmeng] FROM install where [lianmeng]='"&us&"' and DateDiff(d, time1, '" & timer1 & "')<=0 GROUP BY [lianmeng]"
end if
rs2.open sql,conn,1,1
set rs1=server.createobject("adodb.recordset")
sql1="select * from [userbiao] where username='" & session("username") & "' "
rs1.open sql1,conn,1,3
%>
<head>
<link href="Images/css.Css" rel="stylesheet" type="text/css">
</head>
<table width="100%" border="0" align="center" cellpadding="2" cellspacing="1" class="border" height="93">
<tr class="title">
<td height="87" align="center"></td>
</tr>
</table>
<p align="center"><strong>今日安装数:</strong>(
<%if rs2.eof then%>
0
<%else%>
<%if rs2("countid")=1 then %>1<%else%>
<%=1+clng(rs2("countid")*(100-rs1("kou"))/100)%>
<%
end if
end if
rs2.close
set rs2=nothing
rs1.close
set rs1=nothing
conn.close
set conn=nothing
%>
)
</p>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -