📄 copyright.asp
字号:
<table width="760" border="0" cellspacing="0" cellpadding="0" align="center" class="table-zuoyou">
<tr>
<td>
<table width="730" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td>
<div align="center"><br>
<%dim endtime
endtime=timer()
response.Write "客户服务中心信箱:<a href=mailto:"&webemail&">"&webemail&"</a> 客户服务中心热线直拨:"&dianhua&" <br>"
response.Write "公司地址:"&dizhi&" 邮政编码:"&youbian&" <br>"
response.Write "Copyright © "©right
response.Write " <br><a href=http://www.snsn.net><font color=black>动感科技设计开发</font></a> 服务支持QQ:9912515<br><font color=red>页面执行时间"&FormatNumber((endtime-startime)*1000,3)&" 毫秒</font>"
%>
</div>
</td>
</tr>
<%
function todays()
dim tmprs
tmprs=conn.execute("Select Count(bookID) from shop_books Where year(adddate)=year(date()) and month(adddate)=month(date()) and day(adddate)=day(date())")
todays=tmprs(0)
set tmprs=nothing
if isnull(todays) then todays=0
end function
%>
<%
if session("over")="" then
jsqtoday=1
if application("dntime")<=cint(hour(time())) then
conn.execute("update dept set jsqtoday=jsqtoday+1")
tmprs=conn.execute("Select jsqtoday from dept")
jsqtoday=tmprs(0)
else
conn.execute("update dept set jsqtoday=1")
tmprs=conn.execute("Select jsqtoday from dept")
jsqtoday=tmprs(0)
end if
application("dntime")=cint(hour(time()))
set tmprs=nothing
conn.execute("update dept set jsq=jsq+1")
tmprs=conn.execute("Select jsq from dept")
jsq=tmprs(0)
set tmprs=nothing
session("over")=true
else
jsqtoday=1
tmprs=conn.execute("Select jsqtoday from dept")
jsqtoday=tmprs(0)
tmprs=conn.execute("Select jsq from dept")
jsq=tmprs(0)
set tmprs=nothing
end if
%>
<tr>
<td>
<div align="center">○- 今日新加商品数:<font color=red><%=todays()%></font> ○-
今日访问:<font color=red><%=jsqtoday%></font> ○- 访问总数:<font color=red><%=jsq%></font><br>
<br>
</div>
</td>
</tr>
</table>
</td>
</tr>
</table>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -