?? 66hc_ll.asp
字號:
?<!--#include file="../66hc.asp"--><!--#include file="admin.asp"-->
<card id="main" title="流量查詢" >
<p>
<%
Set rs1= Server.CreateObject("ADODB.Recordset")
sql1="Select sum(lc) as lcc from 66hc_url"
rs1.open sql1,conn
allnum=rs1("lcc")
response.write "總的連出"&allnum&"次<br/>"
rs1.close
set rs1=nothing
Set rs2= Server.CreateObject("ADODB.Recordset")
sql1="Select sum([66hc_zl]) as ljj from 66hc_url"
rs2.open sql1,conn
zjr=rs2("ljj")
response.write "總的連入"&zjr&"次<br/>"
rs2.close
set rs2=nothing
response.write "總的贏利"&zjr-allnum&"次<br/>"
Set rs3= Server.CreateObject("ADODB.Recordset")
sql1="Select sum([66hc_jr]) as jrr from 66hc_url"
rs3.open sql1,conn
jrjr=rs3("jrr")
response.write "今日進入"&jrjr&"次<br/>"
rs3.close
set rs3=nothing
Set rs6= Server.CreateObject("ADODB.Recordset")
sql1="Select sum([66hc_jrc]) as jrc from 66hc_url"
rs6.open sql1,conn
jrcc=rs6("jrc")
response.write "今日連出"&jrcc&"次<br/>"
rs6.close
set rs6=nothing
response.write "今日贏利"&jrjr-jrcc&"次<br/>"
Set rs4= Server.CreateObject("ADODB.Recordset")
sql1="Select sum([66hc_zr]) as zrr from 66hc_url"
rs4.open sql1,conn
zrzr=rs4("zrr")
response.write "昨日進入"&zrzr&"次<br/>"
rs4.close
set rs4=nothing
Set rs5= Server.CreateObject("ADODB.Recordset")
sql1="Select sum([66hc_zrc]) as zrc from 66hc_url"
rs5.open sql1,conn
zrcc=rs5("zrc")
response.write "昨日連出"&zrcc&"次<br/>"
rs5.close
set rs5=nothing
response.write "昨日贏利"&zrzr-zrcc&"次<br/>"
%>
----------<br/>
<a href="d_i.asp?sb=<%=sb%>">返回管理首頁</a><br/>
<a href="/?sb=<%=sb%>">返回網站首頁</a><br/>
報時:<%=time%>
</p></card></wml>
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -